Membuka PDF di Delphi XE5

By: QMPC Network on 01.56

Pada postingan kali ini penulis akan menjelaskan cara membuka pdf lewat delphi xe5, ok langsung saja kita akan lakukan langkah-langkah berikut :

Langkah 1 :
Komponen yang diperlukan seperti berikut ini :
1. OpenDialog (Dialogs)
2. Edit (Standard)
3. Button (Standard)
4. WebBrowser (Internet)

Setelah itu susun pada sebuah form dalam project baru, kira kira seperti tampilan dibawah ini:

Logikanya seperti berikut :
Kita klik tombol buka dan setelah itu kita mencari file PDF yang ingin di tampilkan setelah itu di pilih akan tampil di form.

Langkah 2 :
Jika sudah membentuk seperti form diatas, kita isikan properties Filter pada open dialog seperti dibawah ini, tujuanya untuk memfilter agar file PDF saja yang nanti bisa dipilih oleh user.

Langkah 3 :
Jika sudah, maka kita cukup masukan source code di bawah ini pada button buka :

procedure TForm1.Button1Click(Sender: TObject);
begin
OpenDialog1.Execute;
Edit1.Text:=OpenDialog1.FileName;
WebBrowser1.Navigate(Edit1.Text);
end;

Langkah 4 :
Jika sudah jalankan Aplikasi yang kita buat, tekan tombol buka, dan pilih dimana file PDF berada, seperti berikut ini :