怎样从一个文本文件中从提出指定的数据？？？？？？？？

procedure TForm1.Button1Click(Sender: TObject);
var
   TestFile:TextFile;
   First,Second:integer;
   v01:String[3];
begin
   AssignFile(TestFile,'aa.txt');
    Reset(TestFile);     Read(TestFile,v01);
     Read(TestFile, First);
     Read(TestFile, Second);  Edit1.text:=IntToStr(First);
  Edit2.text:=IntToStr(Second);
end;Win2000+Delphi5通过
当然，这只是个例子，如果要读整个文件，还要做一些处理
其实很简单，因为结构以定
你只要把你要的数据读出即可