如何把C盘里的1.TXT显示在Edit1控件里? - Delphi论坛

编程论坛 → 开发语言 → 『 Delphi论坛』 → 如何把C盘里的1.TXT显示在Edit1控件里?

标题：如何把C盘里的1.TXT显示在Edit1控件里?

只看楼主

Winmillion

来　自：China
等　级：新手上路
帖　子：63
专家分：0
注　册：2008-8-1

楼主

问题点数：0 回复次数：2

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

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

搜索更多相关主题的帖子: 控件　

2008-11-06 18:14

ruanjian2110

来　自：武汉
等　级：论坛游民
威　望：7
帖　子：486
专家分：50
注　册：2008-5-25

第 2 楼

得分:0

procedure TForm1.Button1Click(Sender: TObject);
var
FileName:string;
i:integer;
begin
  FileName:='c:\1.txt';
  i:=FileCreate(FileName);
  Edit1.Text:=FileName;
  showmessage(Edit1.Text);
end;
end.

武汉信控科技有限公司：http://www. 超越技术，本身就是一个美好技术。。。。。。

2008-11-11 15:15

Winmillion

来　自：China
等　级：新手上路
帖　子：63
专家分：0
注　册：2008-8-1

第 3 楼

得分:0

楼主,我是想写个扫描工具,把扫描的结果在C盘目录里创建一个IP.TXT,然后把IP.TXT显示在Edit1里!

http://hi.baidu.com/winmillion

2008-11-18 00:06

参与讨论请移步原网站贴子：https://bbs.bccn.net/thread-242795-1-1.html