Delphi - Menutup aplikasi lain

Delphi7 adalah aplikasi pembuat program aplikasi seperti aplikasi pengolah data, dan aplikasi pendukung sisterm kerja windows. seperti aplikasi untuk menutup aplikasi lain.

Untuk dapat membuat aplikasi seperti itu, kita bisa menggunakan komponen TButton untuk mengakses kode perintah yang akan kita tambahkan di aplikasi. 

Kode Menutup Aplikasi Lain dengan Delphi 7

Tambahkan kode berikut pada even ONCLICK pada komponen TButton yang telah kita tambahkan tadi :

Procedure TForm1.Button1Click(Sender: TObject);

var Cari:HWND;

Begin

Cari:=FindWindow(nil,'Title Aplikasi');

if Cari<>0 then PostMessage(h,WM_CLOSE)

end;

Setelah menambahkan kode di atas, kamu bisa menggaanti "Title Aplikasi" dengan title aplikasi target yang ingin kamu tutup.

Setelah itu kamu bisa coba jalankan aplikasi dengan klik tombol RUN, atau tombol F9 pada keyboard.

Itu saja tutorial singkat kali ini tentang cara membuat aplikasi untuk menutup aplikasi lain dengan Delphi 7.

Berbagi :