Ola Pessoal estou precisando estar alterando um linha dentro de um arquivo
txt e não estou conseguindo pois estou lendo o arquivo mas não estou
conseguindo gravar pois acho que não estou pegando a lógica da coisa veja.
Assignfile(Arquivo,'web\GE.INFO');
Reset(Arquivo);
While not eof(Arquivo) Do begin
Readln(Arquivo,wlinha);
if Substring(wLinha,1,5) = '#date' then
Writeln(Arquivo,'#date='+wdata);
end;
closeFile(Arquivo);
O problema e que se utilizo o rewrite au invés de reset ele zera o arquivo .
Ai então minha duvida como fazer para alterar somente uma linha de um
arquivo txt.
Aguardo a ajuda de alguém que puder me ajudar.
_____
<http://www.3wnetcom.com.br/>
Wildner Bernardes Ferreira
Desenvolvimento Delphi / Firebird
<mailto:[EMAIL PROTECTED]> [EMAIL PROTECTED]
Av. Amazonas, 502 S. 98 CEP 38400-734 Uberlândia/MG
Fone: (34)3087 4931 Fax: 3211 2010 [EMAIL PROTECTED]
_____
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
