TOpendialog

//TOpendialog ...

{

TOpendialog adalah Sebuah komponen yang berguna untuk memilih file yang ada pada PC

COntohnya Jika ingin mengambil image di PC


Sebelumnya masukkan komponen (Topendialog , tbutton , timage)

Kemudian masukkan kode kedalam tbutton

Dan masukkan "JPEG" di bagian USES pada CODE....
}

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

procedure TForm3.Button1Click(Sender: TObject);
Begin

opendialog1.execute;
if opendialog1.files.count <> 0 then begin
image1.picture.loadfromfile(opendialog1.filename);
end;

end;


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



//Jalankan dan klik button1 ,, Lalu pilih Image.nya


{

Topendialog Memiliki Property Filename , Yang artinya Namafile

Nama File yang dimaksud adalah Lokasi.nya + Nama + extensi file ...
Seperti ini
"D:\FOto.jpg"

Lokasi = D:\
Nama = Foto
Extensi = .jpg


}