如何向SQL Server中保存bmp图象以及读取

[入库:2005年8月18日] [更新:2007年3月25日]

本文简介:选择自 wangzn1979 的 blog

插入修改 保存图象
bmtemp:=tbitmap.create;
ms:=tmemorystream.create;
try
    qryface.close;
    qryface.sql.clear;
    qryface.sql.add('update video_face_image set face_image2=:face_image2');
    qryface.sql.add(format('where event_id=%d',[qryprepare.fieldbyname('event_id').asinteger]));
    bmtemp.loadfromfile('c:\face2.bmp');
    bmtemp.savetostream(ms);                      
    qryface.parameters.parambyname('face_image2').loadfromstream(ms,ftblob);
finally
    ms.free;
    bmtemp.free;
end;

如何在image组件中显示
bmtemp:=tbitmap.create;
ms:=tmemorystream.create;
try
    tblobfield(qryface.fieldbyname('face_image1')).savetostream(ms);
    ms.position:=0;  //最最重要的一点
    bmtemp.loadfromstream(ms);
    imgface1.picture.bitmap:=bmtemp;
finally
    ms.free;
    bmtemp.free;
end;

本文关键:delphi 图象存取
 

本站最佳浏览方式为 分辨率 1024x768 IE 6.0(或更高版本的 IE浏览器)

go top