Question

Delphi如何将指定文件的内容读入

谁能给个例子代码最好附上注释新人刚学Delphi

Answer 1

如果是读文本文件，以下代码最简单：
在窗体上加一个按钮，一个Memo。
把C盘上tzh.txt的内容读入到Memo1中。
只要一句：Memo1.Lines.LoadFromFile('c:\tzh.txt');

全部代码如下：
unit Unit3;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm3 = class(TForm)
Memo1: TMemo;
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form3: TForm3;
implementation
{$R *.dfm}
procedure TForm3.Button1Click(Sender: TObject);
begin
Memo1.Lines.LoadFromFile('c:\tzh.txt');
end;
end.

Answer 2

看你如何使用读取出来的数据，要是逐行出来的话，可以使用下面的方式
//使用TStringList加载Txt文件
var
StrList: TStringList;
Begin
//初始化字符串列表
StrList := TStringList.Create;
//加载文件
StrList.LoadFromFile('c:\tzh.txt');
//再用就是对TStringList的操作了
……

Answer 3

先说明指定文件的格式，我再告诉你。