(Resolvido) Como salvar conteudo do memo em um arquivo .TXT

[valSistemasDelphi]

Olá pessoal do Fórum quero saber como salvar por exemplo um texto que aparecer no TMemo, e salvar ele como  um arquivo TXT.

[Jhonas]

procedure TForm1.Button1Click(Sender: TObject);
begin
   Memo1.Lines.SaveToFile('C:\Memo1.Txt');
end;

abraço

 

[valSistemasDelphi]

Ola jhonas obrigado por responder tenho um código aqui que o usuário escolhe o nome da pasta, tem como ele salvar na pasta que eu renomear. E se tiver como posso implementar isto, a minha dúvida desde já agradeço..

1 minuto atrás, valSistemasDelphi disse:

Ola jhonas obrigado por responder tenho um código aqui que o usuário escolhe o nome da pasta, tem como ele salvar na pasta que eu renomear. E se tiver como posso implementar isto, a minha dúvida desde já agradeço..

Código:  AssignFile(_Arquivo, edtCaminho.Text + edtNomeArquivo.Text +'.txt');

 

[Jhonas]

tem como ele salvar na pasta que eu renomear.

não sei se é isso que voce quer...  usa o componente SaveDialog

procedure TForm1.Button1Click(Sender: TObject);
begin
   if SaveDialog1.Execute then
      Memo1.Lines.SaveToFile(SaveDialog1.FileName);
end;

abraço

[valSistemasDelphi]

Jhonas muito obrigado isso que eu estava precisando valeu pela ajuda. :D