delphi 如何将edit文本的内容text保存到文本.txt中?
答案:2 悬赏:30 手机版
解决时间 2021-12-23 22:06
- 提问者网友：城市野鹿
- 2021-12-22 22:49
delphi 如何将edit文本的内容text保存到文本.txt中?
最佳答案
- 五星知识达人网友：摆渡翁
- 2021-12-23 00:04
procedure TForm1.btn1Click(Sender: TObject);
var
text:TextFile;
s:string;
begin
s:=edt1.text;
AssignFile(text,'e:\test.txt');
Rewrite(text);
Writeln(text,s);
closefile(text);
end;
var
text:TextFile;
s:string;
begin
s:=edt1.text;
AssignFile(text,'e:\test.txt');
Rewrite(text);
Writeln(text,s);
closefile(text);
end;
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯