delphi如何读取TXT、
delphi如何读取TXT、
日期：2016-10-26 15:02:52 人气：1
窗口上放一个打开对话框,一个memo,一个按钮
procedure TForm1.Button1Click(Sender: TObject);
var
F: TextFile;
S: string;
begin
if OpenDialog1.Execute then { Display Open dialog box }
begin
AssignFile(F, OpenDialog1.FileName); //绑定文件到文件类型