TSavedialog

//Tsavedialog

{

TSavedialog adalah komponen yang berguna untuk mengambil lokasi (path)
Biasanya berguna untuk Memilih tempat penyimpanan

Seperti contoh dibawah ini ...


Sebelumnya Buat Dulu Komponen (Tsavedialog , Tmemo , Tbutton)

Setelah itu masukkan Kode kedalam Tbutton ...

}

// ==============================================


procedure TForm1.Button1Click(Sender: TObject);
begin

SaveDialog1.Execute() ;
Memo1.Lines.SaveToFile(SaveDialog1.FileName + '.txt') ;

end;


//===============================================