Cara Membuka File CHM dengan Delphi

File Chm atau lebih akrab nya diisebut file Help. Mungkin sangat dituntuk adanya pada sebuah aplikasi apapun. Sebagai panduan dasar dalam penggunaan aplikasi tersebut. Dalam kesempatan ini saya akan coba share bagaimana caranya mengintegrasikan file Chm dengan proyek aplikasi delphi kita.

Oke. Langsung saja. Siapkan dulu file Help CHM nya. Kalau belum tahu cara membuatnya anda bisa brousing lah di internet. Banyak kok tutorialnya. Setelah file Helpnya siap. Sekarang kita ke proyek delphi kita.

Untuk mempermudah disini saya akan coba paparkan dengan membuat sebuah proyek kecil delphi. Buka Delphi kesayangan anda dan buat satu proyek baru. Tambahkan satu label dan satu tombol button. Atur tampilan seperti berikut:
ds0

Double klik pada button1 dan ketikkan kode berikut:

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
shellexecute(0, pchar(‘open’),pchar(ExtractFilePath (Application.ExeName)
+’Help.chm’),nil,nil,sw_show);
end;

Ganti text berwarna merah dengan alamat tempat anda meletakkan file Help CHM anda. Tapi sebelumnya anda harus mengintegrasikan usesnya. Yaitu ShellApi. Sehinggan usesnya seperti berikut:

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

Setelah selesai silakan di Run proyeknya. Bisa dengan menekan tombol F9 di keyboard. Dan silahkan klik tombol Help nya.

ds1

Dan hasilnya akan membuka file Help nya. Seperti contoh berikut:

ds2

Demikian Semoga bermanfaat.

Berlangganan konten blog ini:

Tinggalkan Komentar

Email anda tidak akan di publikasikan. Lengkapi Data di bawah ini :