Arquivos

Delphi

17/06/2005

alguem poderia me ajudar estou com problemas pra criar arquivo em um determinado diretorio, quero q quando eu clicar enter , seja criado um arquivo .txt em um subpasta chamada LOG dentro na pasta principal do meu sistema.


Kenshinhimura

Kenshinhimura

Curtidas 0

Respostas

Beppe

Beppe

17/06/2005

Para criar um .txt:

SetCurrentDir(ExtractFileDir(Application.ExeName));
with TStringList.Create do
try
  Add(´Uma linha´);
  Add(´Duas linhas´);
  SaveToFile(´LOG\teste.txt´);
finally
  Free;
end;


PS: A pasta precisa estar criada antes de executar este trecho. Pode fazer com ForceDirectories(´LOGS´).


GOSTEI 0
POSTAR