請問高手

Question

1、建立testge ID varchar(10), photo image(16)
2、第一个按钮的onclick事件中加入：
openpicturedialog1.execute;
image1.picture.loadfromfile(openpicturedialog1.fielname;
3、第二个按钮的onclick事件中加入：
var g:Timage;
g:=timage.create(self);
g.picture.loadfromfile(openpicturedialog1.filename);
adotable1.append;
adotable1.fieldbyname('id').asstring:='121';
adotable1.field[1].assign(g.picture);
adotable1.post;
end;

Answer 1

Query.FieldByName('FieldName').LoadFromFile(FileName);

Answer 2

TBLOBFIELD（Query.FieldByName('FieldName')）.LoadFromFile(FileName);

Answer 3

ADOQUERY.SQL.TEXT ：='INSERT INTO t1 TEXT，iMAGE VALUES（：TEXT，：IMAGE'；
ADOQUERY.PARAMS[0].VALUE :='SSSS';
tBLOBFIELD(ADOQUERY.PARAMS[1]).LOADFROMFILE(FILENAME);
EXERSQL;