Hello semua... :), this i will tell you how to open text files.. enjoy this code...

var
   f: Text;
   s: String;
 
begin
   Assign(f,'c:\windows.txt');
   Reset(f);
   while not eof(f) do
   begin
      Readln(f,s);
      writeln(s);
      end;
   readln;
end.

Continue reading ...