Recent Posts
Selamat datang di Coding Delphi Land Weblog kumpulan source code pemogram delphi
(Bukan maksud untuk menggurui tetapi marilah kita berbagi ilmu tuk perkembangan kemajuan teknologi kita
Senin, 16 November 2009
Menjalankan Aplikasi Lewat Delphi
Untuk menjalankan aplikasi atau mengeksekusi file dalam lingkungan Win32 dalam delphi kita bisa menggunakan fungsi API Windows ShellExecute.
contoh dibawah ini potong program penggunaan fungsi ShellExecute.
uses ShellApi;
.......................
// Menjalankan Aplikasi Notepad Windows
ShellExecute( Handle, 'open', 'c:\windows\notepad.exe', nil, nil, SW_SHOWNORMAL );
// Menjalankan Aplikasi Notepad Windows dan membuka file readme.txt
ShellExecute( Handle, 'open', 'c:\windows\notepad.exe', 'c:\readme.txt', nil, SW_SHOWNORMAL );
// Membuka Folder Download C:\Download folder
ShellExecute( Handle, 'open', 'c:\download', nil, nil, SW_SHOWNORMAL );
// Membuka File Microsoft Word
ShellExecute( Handle, 'open', 'c:\docs\coba.doc', nil, nil, SW_SHOWNORMAL );
// Membuka Alamat Web
ShellExecute( Handle, 'open', 'http://www.freeiklamu.blogspot.com', nil, nil, SW_SHOWNORMAL );
...................
0 komentar:
Posting Komentar