jinyuwei 发表于 2014-8-7 09:08:13

Delphi读取文本内容

program Project2;

uses
Windows;

var
MyTextFile : TextFile;
ALine : string;
begin
AssignFile(MyTextFile,'FileName.Txt');
Reset(MyTextFile);
ReadLn(MyTextFile,ALine);
MessageBox(0, PChar(Aline), '', 0);
end.

重庆生活网c 发表于 2018-10-23 21:12:11

辛苦辛苦,谢谢了~~
页: [1]
查看完整版本: Delphi读取文本内容