Web Browser

Download

I.       TujuanPraktikum

Tujuan Praktikum kali ini adalah untuk mempelajari bagaimana membuat web browser secara sederhana dengan menggunakan Delphi.

II.    Diskripsi Program

Program ini menggunakan bahasa pemrograman visual embarcadero XE4.Pada program ini merupakan program web browser. Dalam program ini terdapat tombol back, forward dan home. Selain itu juga terdapat tombol go untuk mengakses web.

III. Interface Program

IV. Coding Program

NamaKomponen	Event	Perintah
Bit button1	On Click	procedure TForm56.BitBtn1Click(Sender: TObject); begin webbrowser1.GoBack; end;
Bit button2	On Click	procedure TForm56.BitBtn2Click(Sender: TObject); begin webbrowser1.GoForward; end;
Bit button3	On Click	procedure TForm56.BitBtn3Click(Sender: TObject); begin webbrowser1.GoHome; end;
Bit button4	On Click	procedure TForm56.BitBtn4Click(Sender: TObject); begin webbrowser1.Navigate(combobox1.Text); combobox1.Items.Add(combobox1.Text); end;
Bit button5	On Click	procedure TForm56.BitBtn5Click(Sender: TObject); begin webbrowser1.GoSearch; end;