二进制字段
保存:
(query1.FieldByName('img') as TBlobField).LoadFromFile('e:\temp.bmp');
TBlobField(Table1.FieldByName('Image')).Assign(Image1.Picture.Bitmap);
取出:
(query1.FieldByName('img') as TBlobField).Savetofile('e:\temp.bmp');
Image1.Picture.Bitmap.assign(TBlobField(Table1.FieldByName('Image')));
保存:
(query1.FieldByName('img') as TBlobField).LoadFromFile('e:\temp.bmp');
TBlobField(Table1.FieldByName('Image')).Assign(Image1.Picture.Bitmap);
取出:
(query1.FieldByName('img') as TBlobField).Savetofile('e:\temp.bmp');
Image1.Picture.Bitmap.assign(TBlobField(Table1.FieldByName('Image')));
解决方案 »
- 如何通过消息方式获取单击的菜单项相关信息
- 求教下delphi多线程的初级问题。
- 关于Delphi操作复杂的XML文件的方法,谢谢。
- ???DBGrid1DrawColumnCell??
- 怎样让win2000用程序关机,并且最后不出现“你可以安全的关闭计算机了”谢谢回复!
- 传输接收问题
- 我需要MDAC SDK文档,我想知道数据类型的具体说明,有谁能给,尽快!!!马上给分!!
- 如何设置用固定IP的ADSL接入因特网?
- 有《DELPHI5开发人员指南》电子书及用DELPHI开发过电业局售电系统大侠看过来!!!
- 控件的tag属性到底有什么用?
- 高手快来!让两个MEMO相同状态
- 多线程程序运行时死掉了(主窗体响应不了消息,新线程也不再工作)
(query1.FieldByName('img') as TBlobField).savetostream(ms);
ms是你保存时候同类型的流