Minggu, 16 November 2014

CARA MEMANGGIL FILE WORD DELPHI

CARA MEMANGGIL FILE WORD DELPHI
Delphi

Menjalankan atau membuka Program atau file eksternal dari Aplikasi Delphi sering menjadi kebutuhan yang cukup penting, karena sewaktu-waktu kita mungkin membuat program yang memiliki file eksekusi (.exe) yang berbeda, atau mungkin membutuhkan untuk membuka file dari aplikasi seperti MS Word, MS Excel, Winnamp, dll. Kita dapat melakukan hal tersebut dalam delphi dengan menggunakan fungsi Window API ShellExecute yang menyatakan teknik menjalankan aplikasi-aplikasi eksternal dari aplikasi Delphi yang kita buat.

procedure TForm1.Button1Click(Sender: TObject);

var
cmd : AnsiString;
begin
cmd := '';
ShellExecute  (Handle ,'open', 'winword','F:\hp\wewe.docx', nil, SW_SHOW);
end;


pada uses ditambakan  ShellAPI

uses
   ShellAPI,Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;

Memanggil dari PC sendiri :


  1. procedure TForm1.Button1Click(Sender: TObject);  
  2.   
  3. begin  
  4.   
  5. ShellExecute(Handle,'open','D:\Data\fileku.doc',nil,nil,SW_SHOWNORMAL) ;  
  6.   
  7. end;  

Memanggil dari PC lain, dengan catatan udah dishare drive nya :

  1. procedure TForm1.Button1Click(Sender: TObject);  
  2.   
  3. begin  
  4.   
  5. ShellExecute(Handle,'open',pChar('\\10.10.1.208\d$\Folder\data.doc'),nilnil, SW_SHOWNORMAL);  
  6.   
  7. end;  

TERIMA KASIH ATAS KUNJUNGAN SAUDARA
Judul: CARA MEMANGGIL FILE WORD DELPHI
Ditulis oleh Unknown
Rating Blog 5 dari 5
Semoga artikel ini bermanfaat bagi saudara. Jika ingin mengutip, baik itu sebagian atau keseluruhan dari isi artikel ini harap menyertakan link dofollow ke http://tips-triks-ilmu-komputer.blogspot.com/2014/11/cara-memanggil-file-word-delphi.html. Terima kasih sudah singgah membaca artikel ini.
Anda Ingin Kursus Mastering Komputer ?
KLIK DISINI
1 komentar:
  1. bro, kalau memanggil file PDF gmn ya ? terus cara agar file nya dapat dijadikan portable include dengan delphi gmn ? supaya meski di pindah2 file tetap bisa di buka, terima kasih.

    BalasHapus