abrir arquivos...

[nolfolk 0]

como faço para abrir um arquivo no Delphi? por exemplo, quero que o Delphi abra (CRIANDO) um arquivo 'funcionou.txt' e insira neste arquivo a mensagem 'funcionou.' . aproveitando, como faço para também pegar o conteudo desse arquivo (depois de ja te-lo fechado) e colocar numa variavel?mto obrigado! :D

[nolfolk 0]

CONSSEGUI!!! :D :D http://forum.imasters.com.br/public/style_emoticons/default/clap.gif http://forum.imasters.com.br/public/style_emoticons/default/clap.gif http://forum.imasters.com.br/public/style_emoticons/default/joia.gif http://forum.imasters.com.br/public/style_emoticons/default/joia.gif

fiz assim:

 

procedure TForm1.AddLog(Sender: TObject);

var

log: textfile;

begin

try AssignFile(log, 'c:\log.txt');

if not FileExists('c:\log.txt') then

Rewrite(log,'c:\log.txt');

Append(log);

WriteLn(log, Edit1.Text);

finally

CloseFile(log);

end;

end;

end.

 

mas vlw pessoal, http://forum.imasters.com.br/public/style_emoticons/default/hug.gif http://forum.imasters.com.br/public/style_emoticons/default/hug.gif http://forum.imasters.com.br/public/style_emoticons/default/hug.gif