请帮助菜鸟:如何从文本文件中读取一行数据?(每行数据以回车结尾) a: Tstrings;a := TStringList.Create;a.LoadFromFile('a.txt');a[0]就是第一行a[1]就是第二行如此类推 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 Var F: TextFile; S: string;begin ... AssignFile(F,FilePath);//FilePath是要访问的文件路径字符串 Reset(F); While not Eof(E) do begin Readln(F,S);//这里的S就是每一行的文本内容了 end;end;夏安! to:linkie(linkie) 我觉得你的答案更正确,可是你回答的时候我已经给分了,实在是对不起了。夏安too! Mac 地址获取 关于不能编译的问题 使用TNMPOP3控件接收到的邮件附件,为什么总是多1~2字节。 怎样让一个delphi程序去执行windowsXP的一个程序? 新手的问题:期待大侠们指导 简单问题,路过不要错过. 网吧管理系统-源代码 有空进来坐坐 我的程序运行时候,开始老是弹出Database Login的对话框,怎么才可以不要它出来??? 用键盘操作时如何用tab键使按钮处于选中?一回车即运行此按纽功能;出现某一对话框时,如何使某一按纽处于默认的选中状态? 关于InterBase C/S 设置问题 有谁知道怎么用OLE实现与手机的通讯啊?
S: string;
begin
...
AssignFile(F,FilePath);//FilePath是要访问的文件路径字符串
Reset(F);
While not Eof(E) do
begin
Readln(F,S);//这里的S就是每一行的文本内容了
end;
end;夏安!
我觉得你的答案更正确,可是你回答的时候我已经给分了,实在是对不起了。
夏安too!