delphi 读取txt文件
1、 放一下memo控件、一个button、opendialog
在button的click事件中
if opendialog1.Execute then
memo1.Lines.LoadfromFile(opendialog1.filename);
2、滥简单的事啊
var
Mytxt : TStringList;
begin
MyText :=
TStringList('你的文本文件及路径');
MyText.Free;//使完后要FREE哦
end;
用一个Memo,然后用Memo1.Lines.LoadfromFile('C:\...\*.txt');
OK!
还有一种方法:
var
f:textfile;
s:string;
begin
assignfile(f,'路径和文件名.txt');
reset(f);
readln(f,s);
showmessage(s);
closefile(f);
end;
相关文档:
Delphi中建议使用的语句
楼主zswang(伴水清清)(专家门诊清洁工)2002-05-15 13:37:54 在 Delphi / VCL组件开发及应用 提问
No.1 判断逻辑类型
var B: Boolean;
begin
B := Boolean(2); //这样只是为了调试//B ......
对象空间