DBImage控件的使用!!!!!!!!(100分)

X

xiaogu

Unregistered / Unconfirmed
GUEST, unregistred user!
通过DBImage控件如何向数据库里插入图片,数据库中的表的字段是image类型
 
请大家帮忙啊!!!!!!!!
 
DbImage与Datasource相连
Datasource与Query1相连

Query1.Active := FALSE ;
Query1.SQL.Clear ;
Query1.RequestLive := TRUE ;
Query1.SQL.Add('sql语句');
Query1.Active := TRUE ;
Query1.Edit ;
DBImage1.Picture.LoadFromFile('文件名') ;
Query1.Post ;
 
附上一段我编程时的一个小例子:
procedure TForm1.AddButtonClick(Sender: TObject);
begin
if OpenDialog1.Execute then
begin
ADODataSet1.First;
if ADODataSet1.Bof then
ADODataSet1.Insert
else
ADODataSet1.Edit;
end;
CSBXImage.Picture.LoadFromFile(OpenDialog1.FileName); {CSBXImage:TDBImage}
end;

下面是在"保存"按钮中的部分代码:
ADODataSet1.FieldByName('CSBX').Assign(CSBXImage.Picture);
ADODataSet1.Post;

CSBXImage:datasource--->dataSource1
dataField---->CSBX
 
这也用问?不要给我分
 
我用的是ADOQuery控件,按照noyamm的方法做,可是在最后保存的时候出错
提示TBlobField和Picture类型不匹配。
 
顶部