Open dan Save file ( Delphi )

Open dan Save file ( Delphi )

Oktober 24, 2007 pada 12:48 am · Filed under delphi, Programming

jika pada bagian nulis dan baca file ke /dari notepad telah dibahas maka untuk menentukkan direktory yang akan dibaca/ditulis gak harus manual, karena di delphi menyediakan komponen Topendialog dan Tsavedialog.

Open File dengan Topendialog

untuk keperluan ini dapat dipakai perintah: Opendialog.execute karena akan mereturn kan true atau false

if Opendialog1.Execute then
var :
filename:string;
begin
filename:opendialog1.filename;
//aksi setelah kita mendapatkan string filename membuka file yang berada di directory filename
end;
Save File dengan Tsavedialog

untuk keperluan ini dapat dipakai perintah: Savedialog.execute karena akan mereturn kan true atau false

if Savedialog1.Execute then
var :
filename:string;
begin
filename:Savedialog1.filename;
//aksi setelah kita mendapatkan string filename yaitu menyimpan file ke directory filename
end;