一个函数返回几十行的文本,请问,怎么把这个返回值保存到文本文件? 如题 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 ADD到一个TStringList对象里,然后直接SaveToFile或者直接写文本文件也行 [code]var TmpStrLst: TStringList;begin TmpStrLst := TStringList.Create; TmpStrLst.Text := FunctionResult; //函数返回值 TmpStrLst.SaveToFile(FileName); //保存为文件名 TmpStrLst.Free;end;[/code] var TmpStrLst: TStringList;begin TmpStrLst := TStringList.Create; TmpStrLst.Text := FunctionResult; //函数返回值 TmpStrLst.SaveToFile(FileName); //保存为文件名 TmpStrLst.Free;end;居然把CSDN格式化的代码记错了发了一片空白 为什么用SPY++捕捉不到TListView里的LVM_XXXXX这些消息? delphi 开发三层 望指教 关于网络转发 socket句柄保护 一个令我百思不得奇解的问题!关于字节数! 请问一下对日期类型的值的如何加减? 在delphi 中可不可以用BCP DEPHI中怎样能使用SENDKEYS这个PROCEDURE InsertObject(Index, S, nil)用法? 自动编号并且不重复 请高手们去黑了这个网站:www.fuckchinese.com , TMD! 怎么样用ADOTable读取数据库最新的记录 借宝地向大家问个问题
或者直接写文本文件也行
var
TmpStrLst: TStringList;
begin
TmpStrLst := TStringList.Create;
TmpStrLst.Text := FunctionResult; //函数返回值
TmpStrLst.SaveToFile(FileName); //保存为文件名
TmpStrLst.Free;
end;
[/code]
TmpStrLst: TStringList;
begin
TmpStrLst := TStringList.Create;
TmpStrLst.Text := FunctionResult; //函数返回值
TmpStrLst.SaveToFile(FileName); //保存为文件名
TmpStrLst.Free;
end;居然把CSDN格式化的代码记错了发了一片空白