Question

Delphi中如何用Ado连Sql server存取图片

快要疯了，请高手进来指点一下，最好有详细代码，谢谢

Answer 1

首先要明确数据库里面的存储的图片格式，最好为Jpeg或者BMP
因为在Delphi常用的数据库控件里面DBImage支持Jpeg和bmp
假设程序中已经存在一些ADOQuery，ADOConnection对象和数据源对象DataSource1，还有一个用来显示图片的数据敏感控件DBImage
那么
DBImage.DataSource := DataSource1;
DBImage.DataField := '指定的图片字段';

DataSource1.DataSet := ADOQuery;
ADOQuery.Connection := ADOConnection//设置ADOQuery对象的数据连接器
ADOConnection.ConnectionString := 'xxxxx';//设置数据连接器的连接字符串
ADOConnection.Connected := True//连接数据库
//然后使用ADOQuery在数据库中查询图片
ADOQuery.Close;
ADOQuery.SQL.Clear;
ADOQuery.SQL.Add('SELECT 某图片字段 FROM 表名...');
ADOQuery.Open;
如果能正确查询图片，DBImage控件上面就会显示出来

Answer 2

SQL 字段类型为 Image
delphi 中使用语句
存:
Ado.Append;
TBlobField(Ado.fieldbyname('图片')).LoadFromFile('文件路径');
Ado.Post;
取是反操作.