İçeriğe geç
ShiftDelete.Net
Haber ara/ SDN'ye SorGiriş
Haber Akışı SDNTV İnceleme Forum Yapay Zeka Akıllı Telefon Elektrikli Otomobil Oyun ShiftDelete.Net Global Teknoloji Haberleri Mobil Otomobil Donanım Savunma Bilim Sosyal Medya İnternet Giyilebilir Teknoloji Rehber Ürünler Son dakika Yazarlar
  1. Ana sayfa
  2. Topluluk
  3. Programlama
  4. Programlama Dilleri
Programlama Dilleri

Web Browser Yapımı (GELİŞMİŞ)

WinDPzero04.07.20142 cevap14.331 görüntüleme
2014'den beri562 mesaj
#1
Not : Bu anlatılanlar Visual Basic 2008, Visual Basic 2010 & Visual Studio 2013 programlarında çalışmaktadır. Tüm adımlar basittir. Hepsini dikkatle uyguladığınızda güzel bir İnterntet Tarayıcınız olacaktır.
İpucu : Yazı yerine görsel eklerseniz programınız daha güzel gözükebilir. Ama bu karar size kalmış tabi.

Form1'e Eklenecekler :

1.1 Adet ToolStrip
2.1. Adet WebBrowser

ToolStrip'in İçine Eklenecekler :

1.6 Adet Button
2.1 Adet TextBox
3.1 Adet ProgressBar
4.1 Adet Label
5.2 Adet Separator

Form2'ye Eklenecekler :

1.1 Adet RichTextBox
--------------------------------------------------
Form1
--------------------------------------------------

TollBox'u açıp 1 adet ToolStrip ekliyoruz.
Yine ToolBox'tan 1 Adet WebBrowser ekliyoruz.


ToolStrip'e tıklıyoruz ve en solda bir buton ve yanında bir ok görüyoruz.
Bu oka basıp sırasıyla :

1 Label
1 TextBox
1 Button
1 Separator
3 Button
1 Separator
2 Button

ekliyoruz.

1. Label'in yazısı : Adres Girin
1. Button'un yazısı : Git
2. Button'un yazısı : Yeniden Yükle
3. Button'un yazısı : Durdur
4. Button'un yazısı : Ana Sayfa
5. Button'un yazısı : Yazdır
6. Button'un yazısı : Kaynağı Görüntüle

1. Button'un kodları :
WebBrowser1.Navigate(ToolStripTextBox1.Text)
Select Case WebBrowser1.ReadyState
ToolStripProgressBar1.Maximum = 4
Case WebBrowserReadyState.Loading
ToolStripProgressBar1.Value = 1
Case WebBrowserReadyState.Loaded
ToolStripProgressBar1.Value = 2
Case WebBrowserReadyState.Interactive
ToolStripProgressBar1.Value = 3
Case WebBrowserReadyState.Loaded
ToolStripProgressBar1.Value = 4
End select

2. Button'un Kodları :
WebBrowser1.Refresh()

3. Button'un Kodları :
WebBrowser1.Stop()

4. Button'un Kodları :
WebBrowser1.GoHome()

5. Button'un Kodları :
WebBrowser1.ShowPrintPreviewDialog()

6. Button'un Kodları :
Form2.Show()
Form2.RichTextBox1.Text = WebBrowser1.DocumentText
--------------------------------------------------
Form2
--------------------------------------------------

Buraya Kod Eklemenize Gerek Yok.

İyi Programcılık Dilerim
Cevaplar
2012'den beri173 mesaj
#2
Yemek tarifi gibi olmuş :)
2020'den beri3.960 mesaj
#3
1 bardak su :)
birde ben tam anlayamadım da toolstrip nedir? yeniyim de vs'ye
offf hortlatmışım yaa :D

Cevabını yaz

Cevap yazmak için giriş yap ya da üye ol. Eski forum kullanıcı adın ve parolanla girebilirsin.