Re: [delphi-br] Acrescentar Linha Arquivo TXT

Eu faco o seguinte: Renomeio o arquivo para .tmp. Abro-o em modo de leitura. Crio um arquivo novo com o nome original, acrescento todo o conteudo do arquivo .tmp e em seguida acrescento a linha nova. Fecho o arquivo novo e se nao der erro apago o .tmp. - Original Message - From: Emerson

Re: [delphi-br] Acrescentar Linha Arquivo TXT

José, Tipo assim, eu sou iniciante, venho me esforçando para aprender um pouco de delphi, porem é a primeira vez que trabalho com arquivo de texto, se não fosse pedir muito, você poderia fazer um esboço da sua dica para mim. Emerson = - Original Message - From:

Re: [delphi-br] Acrescentar Linha Arquivo TXT

Emerson, Vc pode usar uma stringlist para isto: Function Escreve_Arq(NomeArq,Texto : String ) : Boolean; var sArquivo : tStrings; Begin Try sArquivo:=tStringList.Create; sArquivo.LoadFromFile(NomeArq); sArquivo.Add(string); sArquivo.SaveToFile(NomeArq);