memanggil program lain di delphi7

Home » » memanggil program lain di delphi7
Kali ini kita akan bahas tentang cara memanggil aplikasi lain di delphi7,Oke kalo gitu tanpa basa basi mari kita muali pelajaran kali.....
Simak baik2 dan perhatikan dengan seksama

1.Buka delphi7
-Buat form baru dengan cara click File>New>Application


2.sebagai contoh kita akan buat  3 button yang berfungsi
Button1 – untuk memanggil Program
Button2 – untuk memanggil notepad
Button3 - untuk memanggil web/bog
-ganti caption ke3 button tersebut sesuai keinginan anda,atau ikuti tutorial(biar lebih mudah)

3.tambahkan Shellapi pada Uses(Ketik manual saja)
-Setelah selesai kembali ke form design

4.Double Click pada Button1(Program)
-Isikan code berikut (Code ini hanya untuk memanggil cmd)
ShellExecute(Handle, 'open',PChar('C:\Windows\System32\cmd.exe'), nil, nil, SW_SHOW);

-program disini adalah “cmd”kita akan memanggil cmd melalui program yang kita buat
-Jika ingin memanggil aplikasi lain selain cmd,ganti tulisan berwarna merah dan tebal,ganti sesuai dengan directory program yang kalian ingin panggil…

5.Double Click pada button2(Notepad)
-isikan Code berikut (Code ini hanya untuk memanggil notepad)
ShellExecute(Handle, 'open',PChar('C:\Users\s4tri0s\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Accessories\Notepad.lnk'), nil, nil, SW_SHOW);

6. Double Click pada button3(Web/Blog)
-isikan Code berikut (Code ini hanya untuk memanggil Web/Blog)
ShellExecute(Handle, 'open',PChar('http://kopakesoft.blogspot.com/'), nil, nil, SW_SHOW);
-Ganti alamat blog yg berwarna merah dan huruf tebal dengan alamat web/blog yang kalian punya atau yang kalian inginkan

7.Setelah selesai memberi kode eksekusi pada ke3 button tersebut,tekan F9 pada keyboard atau RUN pada program Delphi untuk mengetahui hasilnya….


7.selamat mencoba….

-Jika kurang faham dengan tutorial ini silahkan download tutorial step by step disertai gambar
-Download Tutorial 
-Source Code Program memanggil program lain di delphi7  Download DISINI
-bagaimana cara download di Kopakesoft CLICK DISINI
.
Share this article :