September 27, 2014

Menjalankan Aplikasi Windows Lainnya

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;
  1. Parameter pertama merupakan nama file *.exe yang akan dijalankan beserta pathnya.
  2.  
  3. Parameter kedua menunjukkan bagaimana aplikasi tersebut dijalankan. Parameter ini dapat bernilai :
  4.  
  5. SW_SHOWMINIMIZED
  6. Menampilkan aplikasi secara minimal (berbentuk icon)
  7.  
  8. SW_SHOWMAXIMIZED
  9. Menampilkan aplikasi dengan (ukuran) window maksimal
  10.  
  11. SW_SHOWNORMAL
  12. Menampilkan aplikasi dengan window normal
  13.  
  14. Ada sembilan nilai parameter lainnya yang dapat Anda lihat pada referensi Windows API pada bagian ShowWindow
  15.  
  16. 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 :
  17.  
  18. 0
  19. Windows mengalami out of memory atau resources
  20.  
  21. ERROR_BAD_FORMAT
  22. File yang dijalankan bukan merupakan file aplikasi Windows
  23.  
  24. ERROR_FILE_NOT_FOUND
  25. File yang dijalankan tidak ditemukan
  26.  
  27. ERROR_PATH_NOT_FOUND
  28. Path file salah
  29.  
  30. Contoh berikut mungkin akan memperjelas Anda.
  31. <pre lang="Delphi">procedure TForm1.Button1Click(Sender: TObject);
  32. begin
  33.      if (WinExec ('C:\Windows\notepad.exe',
  34.        SW_SWOWMAXIMIZED) < 32) then
  35.        MessageDlg ('Gagal menjalankan Notepad',
  36.        mtError, [mbOK],0);
  37. end;
Pada contoh di atas, pada saat pemakai mengklik Button1 maka program akan menjalankan file Notepad.exe yang terletak di C:\Windows.

Sumber : klik-kanan

Posting Lebih Baru Posting Lama Beranda

0 komentar:

Posting Komentar