[讨论]如何把C盘里的1.TXT显示在Edit1控件里?

您所在位置：社区首页 — Delphi讨论区 — [讨论]如何把C盘里的1.TXT显示在Edit1控件里?

主题：[讨论]如何把C盘里的1.TXT显示在Edit1控件里?

Winmillion [专家分：0] 发布于 2008-11-06 18:14:00

请问在按钮1执行后在C盘创建一个1.TXT,如何把C盘里的1.TXT显示在Edit1控件里?

沙发

ninuxf [专家分：30] 发布于 2008-12-21 22:02:00

如果是读到memo中我知道
memo1.lines.loadfile(c:\1.txt)

板凳

Winmillion [专家分：0] 发布于 2008-12-23 20:35:00

谢谢了!
这年头牛人真多!

3 楼

qf095 [专家分：10] 发布于 2008-12-25 10:40:00

有很多种方法呀!
var
  f:TextFile;
  str:string;
begin
  AssignFile(f,'c:\1.txt');
  Reset(f);
  Readln(f,str);
  edit1.Text:=f;
  CloseFile(f);
end;

4 楼

Winmillion [专家分：0] 发布于 2008-12-25 17:35:00

3楼的代码比较多.程序的可读性没1楼的好!

您尚未登录，请登录后再回复。点此登录或注册