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.
Sumber : klik-kanan
0 komentar:
Posting Komentar