Fórum Arquivos #285164

17/06/2005

0

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

Responder

Posts

18/06/2005

Beppe

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´).


Responder

Gostei + 0

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

Aceitar