read text file, assign command


Posted by Kreso on June 22, 2000 at 15:37:50:

I get an error message:"incompatible TPerssistant and Text" when I try to assign a file to a program!If somebody knows how to do that please tell me.
that part goes something like this:

var
  ATextFile: Text;
  ATextLine,
  AFileName: String;
begin
  AFileName := 'file.txt';
  Assign(ATextFile, AFileName);
  Reset(ATextFile);
  while not Eof(ATextFile) do begin

whats wrong!?!


Related Articles and Replies: