delphi如何把数据库的图片(二进制文件)导到本地文件夹
发布网友
发布时间:2022-05-05 06:19
我来回答
共1个回答
热心网友
时间:2023-10-12 15:20
if opendialog1.Execute then
begin
ADOQuery1.Close;
ADOQuery1.SQL.Text:='select pic from text where ccc = ''' + trim(Edit1.Text) +'''';
ADOQuery1.open;
(ADOQuery1.Fields[0] as TBlobField).SaveToFile('d:\\photo\\aaa,jpg');