Mengetahui path dari aplikasi

Dalam membuat aplikasi, kadang-kadang kita perlu mengetahui path atau letak file *.exe dari suatu program. Bagaimana caranya ?

Caranya cukup mudah sekali. Anda hanya cukup menambahkan property ExeName dari kelas TApplication.


procedure TForm1.Button1Click(Sender: TObject); 
begin 
     Label1.Caption := Application.ExeName; 
end;


Potongan program di atas akan "mencari" letak file *.exe dan menuliskannya pada komponen Label1, jika pemakai mengklik Button1.