Criar arquivo de log (.log)

Delphi

01/02/2003

preciso criar um arquivo de log mas nã sei como, se alguém puder me passar eu agradeceria..


Anonymous

Anonymous

Curtidas 0

Respostas

Skaarj

Skaarj

01/02/2003

faz assim:
Manda copiar o texto que voce quer em um richedit, por exmplo, no onclick d um botao:
RichEdit1.Lines.Add(´Linha1´);
RichEdit1.Lines.Add(´Linha2´);
depois salva em um txt:
RichEdit1.Lines.SaveToFile(´ c:\log.txt´);
Dpois renomeia o txt [se usar Win 9x exstem 2 modos]:
RenameFile(´c:\log.txt´,´c:\log.log´);
ou
WinExec(´Command.com /c ren c:\log.txt c:\log.log´, 0) ;
[o segundo ñ testei :D ]


GOSTEI 0
Dor_poa

Dor_poa

01/02/2003

O geito que nosso amigo Skaarj esta muito bom.. Mas aconselho a utilizar o memo e ao invez de fazeer isto

RichEdit1.Lines.SaveToFile(´ c:\log.txt´);
Dpois renomeia o txt [se usar Win 9x exstem 2 modos]:
RenameFile(´c:\log.txt´,´c:\log.log´);
ou
WinExec(´Command.com /c ren c:\log.txt c:\log.log´, 0) ;


faz isto

memo1.lines.savetofile(´log.log´);


GOSTEI 0
Skaarj

Skaarj

01/02/2003

O geito que nosso amigo Skaarj esta muito bom.. Mas aconselho a utilizar o memo e ao invez de fazeer isto RichEdit1.Lines.SaveToFile(´ c:\log.txt´); Dpois renomeia o txt [se usar Win 9x exstem 2 modos]: RenameFile(´c:\log.txt´,´c:\log.log´); ou WinExec(´Command.com /c ren c:\log.txt c:\log.log´, 0) ; faz isto memo1.lines.savetofile(´log.log´);


Cara vc tá certo.. è bm mais rápido.. Vou usar assim tb..


GOSTEI 0
Skaarj

Skaarj

01/02/2003

A minha ideia ali, Dor_poa, foi, por exemplo, pegar de um edit e mandar, adicionar no Richedit uma area selecionavel..


GOSTEI 0
POSTAR