Arquivo delphi

[Asenna 0]

:rolleyes:

[Mário Monteiro 179]

Voce tem o delphi?

[Eisenheim 67]

Olá amigos!

 

Criar e utilizar arquivos no delphi:

 

...
var
 Arq: TextFile;
 sLinha: String;
begin
 AssingFile( Arq, 'C:\Exemplo.txt' );
 Reset( Arq );
 while not Eof( Arq ) do
 begin
   ReadLn( Arq, sLinha );
 end;
 CloseFile( Arq );
end.

 

Até a próxima. :thumbsup: