如何将db文件里面定义的memo字段读到txt文件中?

hjliang 2001-07-16 02:25:53
如何将db文件里面定义的memo字段读到txt文件中?
最好有例子
...全文
213 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
chills 2001-07-16
  • 打赏
  • 举报
回复
得到Lines以后,用Lines.SaveToFile保存就可以了
chills 2001-07-16
  • 打赏
  • 举报
回复
function LoadTextBlob( Field: TField; Lines:TStrings ): Boolean;
var
BlobStream: TStream;
begin
Result := Field.IsBlob;

if Result then
begin
BlobStream := Field.DataSet.CreateBlobStream(Field, bmRead);
try
with Lines do
begin
BeginUpdate;
LoadFromStream(BlobStream);
EndUpdate;
end;
finally
BlobStream.Free;
end;
end;
end;
myxfang 2001-07-16
  • 打赏
  • 举报
回复
dbmemo1.Lines.SaveToFile(文件);

5,388

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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