Menjalankan Aplikasi Windows Lainnya

Klik Kanan

This entry was posted on: Tuesday, September 11th, 2001 03:43:09 and is filed under Delphi

Untuk menjalankan aplikasi Windows lainnya dari program Anda, Anda bisa menggunakan salah satu fungsi Windows API, yaitu WinExec. Adapun deklarasi dari fungsi WinExec adalah sebagai berikut :
function WinExec (lpCmdLine : PChar; uCmdShow : integer) : integer;

Parameter pertama merupakan nama file *.exe yang akan dijalankan beserta pathnya.

Parameter kedua menunjukkan bagaimana aplikasi tersebut dijalankan. Parameter ini dapat bernilai :

SW_SHOWMINIMIZED
Menampilkan aplikasi secara minimal (berbentuk icon)

SW_SHOWMAXIMIZED
Menampilkan aplikasi dengan (ukuran) window maksimal

SW_SHOWNORMAL
Menampilkan aplikasi dengan window normal

Ada sembilan nilai parameter lainnya yang dapat Anda lihat pada referensi Windows API pada bagian ShowWindow

Fungsi WinExec ini akan mengembalikan nilai lebih besar dari 31 jika aplikasi berhasil dijalankan. Sedangkan bila gagal, nilai yang dikembalikan kurang dari atau sama dengan 31. Detail dari nilai kembalian adalah :

0
Windows mengalami out of memory atau resources

ERROR_BAD_FORMAT
File yang dijalankan bukan merupakan file aplikasi Windows

ERROR_FILE_NOT_FOUND
File yang dijalankan tidak ditemukan

ERROR_PATH_NOT_FOUND
Path file salah

Contoh berikut mungkin akan memperjelas Anda.
procedure TForm1.Button1Click(Sender: TObject);
begin
if (WinExec ('C:\Windows\notepad.exe',
SW_SWOWMAXIMIZED) < 32) then
MessageDlg ('Gagal menjalankan Notepad',
mtError, [mbOK],0);
end;

Pada contoh di atas, pada saat pemakai mengklik Button1 maka program akan menjalankan file Notepad.exe yang terletak di C:\Windows.

Older: Mengatasi Komputer Hang
Newer: Mengganti RegisteredOwner & Organization

Sopranos Theme Ringtone