我的一个表内 temp 内有一个字段 pict ，类型是M型。

OutputFile='D:\ABC.JPG'
replace pict with filetostr(OutputFile) &&将文件保存为字串


我在表格GIRL1的column1 内添加了一个 image1 控件

然后怎样才能在表格COLUMN1内显示这个这个图片呢？是不是不能用这个image1控件

像这样显示。

要稍微复杂一点的技巧才行，涉及著名的 BackStyle 属性
百度一下，关键字：vfp grid 显示图片 BackStyle

https://bbs.

[此贴子已经被作者于2022-7-13 17:51编辑过]

谢谢3楼 csyx。功力不够，我以为几句就完事

可以釆用固定表格行数的分页方法，比如只显10行，添加10个图片控件在表单上，用上一页下一页来显示对应的图片，但也有一些编辑上的问题，显得不是太方便，但足够用了，比放在表格上要间单多了

先说说怎样用image显示M字段的JPG

假设ppath字段存放JPG路径
主要大概是这样

DEFINE CLASS myform as Form
    ADD OBJECT grid1 as grid
    PROCEDURE grid1.init
        this.RowHeight = 100
        this.column1.RemoveObject("text1")
        this.column1.AddObject("image1","myImage")
        this.column1.sparse = .F.
    ENDPROC
ENDDEFINE

DEFINE CLASS myImage as Image
    Stretch = 1
    Visible = .T.
    PROCEDURE BackStyle_ACCESS
        this.picture = ppath 
        RETURN this.BackStyle
    ENDPROC
ENDDEFINE

图片的话,还是放二进制字段好一些,不要放M字段中.

采用set key to 加以控制，也基本可行

是每页限制固定记录数，上表图片是从M字段取得的数据流，即pictureval，
用这种方式是当删除一行时，图片就没了。如果额外存放，当多页面操作删除时，忘删图片时会造成很多垃级，当这些图放在同一个目录时还要去维护名称。有利有弊吧。文件方式表格上容易操作。