cara membuat web browser dengan gambas

Web browser adalah suatu perangkat lunak yang digunakan untuk menampilkan halaman-halaman website yang berada di internet.
contoh :

 1. IE               = Internet Explorer = OS Windows
2. MyIE          = OS Windows
3. Opera        = OS Windows / Linux
4. Firefox       = OS Windows / Linux
5. Mozilla       = OS Linux (GNOME)
6. Qonquerer  = OS Linux (KDE)
7. Netscape Navigator
8. Links          = OS Linux/BSD mode text
9. Lynk           = OS Linux/BSD mode text
                                                                          10. dll

di sini kita akan mencoba untuk membuat web browser tersebut..
Kita membuat nya dengan versi linux yaitu dengan Gambas. dan itu pun cuma sebatas dasar 
dari web browser, masih banyak yang harus di tambah.
Dan untuk yang bisa mengembangkan saya harap agar bisa mengembang kan nya hingga
sempurna seperti web ke 9 web browsing di atas. saya juga akui kalau membuat web seperti
yang di atasn tidak segampang membuat aplikasi konversi warna ke grayscale,tidak seperti
membuat langkah-langkah membuat skripsi eh ga nyambung ya hehehe..tapi yang jelas tidak
semudah cara membuat aplikasi untuk upload gambar dengan gambas juga,,,

ya sudah untuk membuat nya kita sedia kan di form gambas yang baru..

web browse ganti name dengan webtest
label ganti name dengan lbllink
textbox ganti name dengan txtlink
button ganti name dengan quit dan caption dengan keluar

atur seperti gambar di atas..

dan paste kan code berikut ini :


' Gambas class file

PUBLIC SUB _new()

END

' Gambas class file

PUBLIC SUB Form_Resize()

txtLink.Move(0, 0, ME.ClientW)

webTest.Move(0, txtLink.H, ME.ClientW, ME.ClientH - txtLink.H - lblLink.H)

lblLink.Move(0, webTest.Y + webTest.H, ME.CLientW)

END

PUBLIC SUB webTest_Change()

txtLink.Text = LAST.Path

'DEC Application.Busy

END

PUBLIC SUB webTest_Click()

txtLink.Text = " " & LAST.Link

'INC Application.Busy

END

PUBLIC SUB webTest_Link()

lblLink.Text = LAST.Link

END

PUBLIC SUB txtLink_Activate()

DIM sPath AS String

sPath = txtLink.Text

IF NOT (sPath LIKE "http://*") THEN sPath = "http://" & sPath

webTest.Path = Trim(sPath)

END

PUBLIC SUB Form_Open()

txtLink.Text = "http://gambas.sourceforge.net"

txtLink_Activate

END

PUBLIC SUB quit_Click()

me.close

END

sekian..
semoga berhasil...
kamu pasti bisa mengembangkannya..

Untuk contoh Aplikasi yang sudah ada kamu bisa download di sini..
sukses ya...


Baca Juga :

# cara koneksi kan mysql dengan gambas
# belajar Bahasa Jepang
# Langkah-langkah menginstal Apache,php dan mysql di ubuntu
# Membuat aplikasi mengitung bunga pinjaman dengan vb
# Cara mendapatkan uang dengan Facebook/FB
# cara membuat aplikasi untuk upload foto/gambar dengan gambas
# Langkah-langkah membuat skripsi
# Cara mengajar yang efektif
# Beberapa hal mudah dalam mengajar
# cara membuat status fb/facebook terbalik
# Cara Penulisan Kerja Praktek
# Cara Mudah menginstal Java di sistem operasi Linux
# Cara membuat web browser dengan Gambas di linux
# Cara membuat facebook untuk pemula
# Cara mengkonversi warna dengan VB
# 10 Keunggulan Linux
# Cara instal matlab di ubuntu 10.04
# Cara koneksikan gambas dan mysql
# Cara membuat baca selengkapnya di blog
# Kumpulan skripsi Matematika
# Kumpulan skripsi Informatika
# Kumpulan skripsi bahasa inggris
# Kumpulan skripsi Pertanian
# Kumpulan skripsi Bahasa Indonesia
# Kumpulan skripsi Keperawatan
# Cara mematikan Komputer/Labtop Yang tidak bisa Shut Down
# Daftar Repository Lokal Ubuntu 10.10 Maverick Meerkat di Indonesia
# Mengenal Backlink dan Fungsinya
# Fungsi Backlink dalam search engine
# Panen BackLink


Related Article: