• Web sitemizin içeriğine ve tüm hizmetlerimize erişim sağlamak için Web sitemize kayıt olmalı ya da giriş yapmalısınız. Web sitemize üye olmak tamamen ücretsizdir.
  • Sohbetokey.com ile canlı okey oynamaya ne dersin? Hem sohbet et, hem mobil okey oyna!
  • Soru mu? Sorun mu? ''Bir Sorum Var?'' sistemimiz aktiftir. Paylaşın beraber çözüm üretelim.

Delphi'de Web Browser Yapalım

Üyelik Tarihi
7 Ocak 2015
Konular
4,091
Mesajlar
4,274
MFC Puanı
40
Bu dersimizde web browser yapmayı öğreneceğiz. Sistemi kasmayan bir özelliğe sahip olmasını istiyoruz.

Formumuza:

<ul>
<li><span style="color: red;">1 Combobox</span></li>
<li><span style="color: red;">5 tane command button</span></li>
<li><span style="color: red;">1 webbrowser</span></li>
</ul>


oluşturduk. Şimdi kod kısmına gelelim.

Web Browser kısmına:

<ul>
<li><code style="white-space: nowrap;"><code><span style="color: #000000;"><span style="color: #0000bb;">WebBrowser1</span><span style="color: #007700;">.</span><span style="color: #0000bb;">Navigate</span><span style="color: #007700;">(</span><span style="color: #0000bb;">combobox1</span><span style="color: #007700;">.</span><span style="color: #0000bb;">Text</span><span style="color: #007700;">); </span></span></code></code></li>
</ul>


Git butonuna:

<ul>
<li><code style="white-space: nowrap;"><code><span style="color: #000000;"><span style="color: #0000bb;">WebBrowser1</span><span style="color: #007700;">.</span><span style="color: #0000bb;">GoForward</span><span style="color: #007700;">;;
</span></span></code></code></li>
</ul>


Ana Sayfa Butonuna;

<ul>
<li><code style="white-space: nowrap;"><code><span style="color: #000000;"><span style="color: #0000bb;">WebBrowser1</span><span style="color: #007700;">.</span><span style="color: #0000bb;">GoHome</span><span style="color: #007700;">;</span></span></code></code></li>
</ul>


Geri Butonuna;

<ul>
<li><code style="white-space: nowrap;"><code><span style="color: #000000;"><span style="color: #0000bb;">WebBrowser1</span><span style="color: #007700;">.</span><span style="color: #0000bb;">GoBack</span><span style="color: #007700;">;</span></span></code></code></li>
</ul>


İleri Butonuna;

<ul>
<li><code style="white-space: nowrap;"><code><span style="color: #000000;"><span style="color: #0000bb;">WebBrowser1</span><span style="color: #007700;">.</span><span style="color: #0000bb;">GoForward
</span></span></code></code></li>
</ul>


Arama Butonuna;

<ul>
<li><code style="white-space: nowrap;"><code><span style="color: #000000;"><span style="color: #0000bb;">WebBrowser1</span><span style="color: #007700;">.</span><span style="color: #0000bb;">GoSearch </span><span style="color: #007700;">; </span></span></code></code></li>
</ul>


Çıkış efekti vermek için:

<ul>
<li><code style="white-space: nowrap;"><code><span style="color: #000000;"><span style="color: #0000bb;">FORM1</span><span style="color: #007700;">.</span><span style="color: #0000bb;">Close</span><span style="color: #007700;">; </span></span></code></code></li>
</ul>


Kolay gelsin.
 
Üst