delphi 对Image字段存取图片、文件
1、存入字段
if p1.Graphic <> nil then
begin
Tmp.FieldByName('TP').Assign(p1.Graphic);
end;
2、读出到文件
TBlobFile(Tmp.FieldByName('TP') ).SaveToFile('c:\1.jpg');
提示：
1.Tmp.FieldByName('TP') 为Image字段
2.p1为TPicture控件或变量
————————————————
原文链接：https://blog.csdn.net/chelen_jak/article/details/18950005
推荐分享
图文皆来源于网络，内容仅做公益性分享，版权归原作者所有，如有侵权请告知删除！
Copyright © 2014 DelphiW.com 开发 源码 文档 技巧 All Rights Reserved
晋ICP备14006235号-8 晋公网安备 14108102000087号
执行时间: 0.078646898269653 seconds