GARANTIR DESCONTO

Fórum Comando read #319801

23/04/2006

0

E ai galera tudo beleuza!!
Bom fiquei sabendo sobre um tal de comando (LER) que no delphi é o read e readln , e gostaria de saber como eu uso e para quais situações gostaria de algum exemplo.

Se alguem puder me ajudar agradeço.
Valeu!! :wink:


Alecsandro Moura

Alecsandro Moura

Responder

Posts

24/04/2006

Paullsoftware

Normalmente é usado para leitura de arquivios como txt, ini e outros..

um exemplo básico de seu uso:
Criando o arquivo txt
var
  log: textfile;
begin
  try
  AssignFile(log, ´c:\log.txt´);
  if not FileExists(´c:\log.txt´) then Rewrite(log,´c:\log.txt´);
  Append(log);
  WriteLn(log, ´informações a serem inclusas´);
  finally
  CloseFile(log);
  end;
end;

lendo o arquivo txt
var arq: TextFile; 
linha: String; 
begin 
AssignFile ( arq, ´c:\log.txt´ ); 
Reset ( arq ); 
ReadLn ( arq, linha ); 
while not Eof ( arq ) do 
begin 
{ Processe a linha lida aqui. } 
{ Para particionar a linha lida em pedaços, use a função Copy. } 
ReadLn ( arq, linha ); 
end; 
CloseFile ( arq ); 
end; 


também é usado para leitura e gravação de arquivos ini...


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar