数据库Image字段服务器更新到本地数据库无效

bengerpi8050 2020-03-18 10:26:55
TPADO.Edit;
TPADO.FieldByName('Dbarcode').AsString := FieldByName('Dbarcode').AsString;
TPADO.FieldByName('DKINDNO').AsString := FieldByName('DKINDNO').AsString;
TPADO.FieldByName('DKINDNAME').AsString := FieldByName('DKINDNAME').AsString;
TPADO.FieldByName('DKINDNO2').AsString := FieldByName('DKINDNO2').AsString;
TPADO.FieldByName('DKINDNAME2').AsString := FieldByName('DKINDNAME2').AsString;
TPADO.FieldByName('DNAME').AsString := FieldByName('DNAME').AsString;
TPADO.FieldByName('DUNITNAME').AsString := FieldByName('DUNITNAME').AsString;
TPADO.FieldByName('DSPEC').AsString := FieldByName('DSPEC').AsString;
TempStream := TMemoryStream.Create;
TBlobField(FieldByName('DPICTURE')).SaveToStream(TempStream);
TempStream.Position := 0;
TBlobField(TPADO.FieldByName('DPICTURE')).LoadFromStream( TempStream);
TempStream.Free;
TPADO.Post;

也没报错 除了DPICTURE字段 其他的都更新成功了 求大神协助啊
...全文
24 回复 打赏 收藏 转发到动态 举报
写回复
用AI写文章
回复
切换为时间正序
请发表友善的回复…
发表回复

2,497

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 数据库相关
社区管理员
  • 数据库相关社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧