如何把JPG和DOC文件转换成Bin形式存在数据库的bin字段里如何读取bin字段里的内容,我有用一个字段来存文件类型
解决方案 »
- 讨论写什么样的软件赚钱的群,,有兴趣的朋友可以加入!
- delphi7中如何加入delphi6的ClientSocket控件
- 数组问题
- 急:表中有自动增加的字段,用ClientDataSet怎样能一次性增加多条记录到数据库中啊??谢谢!
- treeview 响应问题(30大分)
- delphi 如何实现三层结构,如何操作,火急
- 怎么可以按了DBGRID1的记录然后在DBGRID2中显示对应的全部出来
- 有关FTP编程问题,请指教!
- 提供SQL SERVER 触发器开发技术支持
- 类似点击“设置”或“高级”按钮后在窗体边延伸出一个窗体区域,怎样作?
- 如何在Delphi中和BCB的IMAGE控件中实现图片的放大和缩小.好似windows的看图软件的功能.
- 我想做兼职程序员,最好可以远程办公
http://www.csdn.net/expert/topic/623/623053.xml?temp=5.704898E-02
如:
var
ms: TMemoryStream;
begin
ms.Assign(DBImage.Picture.Bitmap); //这里可以把JPEG Load 进来
ms.Position := 0;
Query1.ParamByName('ImageField').LoadFromStream(ms, ftBlob);
Query1.ExecSQL;
end;
//aStream: TStream;
//Btn: TSpeedButton;aBlobField := TBlobField(adoq.FieldByName('BlobData'));
aStream := aBlobField.DataSet.CreateBlobStream(aBlobField, bmRead);
jpg.LoadFromStream(aStream);
Btn.Glyph.Assign(jpg);
aStream.Free;