Delphi Dünyası Facebook'ta

Kodbank İndir

! CODEBANK 2012 !

İNDİRMEK&DETAYLI BİLGİ ALMAK İÇİN BURAYI TIKLAYINIZ.

Gönderen Konu: webbrowser enter  (Okunma sayısı 521 defa)

0 Üye ve 1 Ziyaretçi konuyu incelemekte.

Çevrimdışı XLG

  • Delphi 2 Level 5
  • *****
  • İleti: 91
  • Rep: +0/-0
  • Cinsiyet: Bay
  • BEST-OF-GKN
webbrowser enter
« : 30 Kasım 2009 12:28:06 »
hocalarım ben size daha önce webbrowser ile ilgili bir soru sormuştum örneğin google girince
aratılacak kelimeyi google yazacaz enter a bastığımızda google yazdığımız kelime aratılacak
girecek bu iş nasıl olur ve facebook gibi sitelere kullanıcı adı ve şifremizi yazdığımızda entere
basınca otomatik sayfa açılacak bunu webbrowser da nasıl yapabilirim
BEST-OF-GKN

Çevrimdışı cdmesut

  • Delphi 3 Level 2
  • **
  • İleti: 111
  • Rep: +1/-3
Ynt: webbrowser enter
« Yanıtla #1 : 30 Kasım 2009 21:02:07 »
bunu nornmal el ile yazdığın zaman
http://www.google.com.tr/#hl=tr&source=hp&q=musa&fp=ee62abce62615dc2
ben burada musa kelimesini el ile arattım.
webbrowser.navigate('http://www.google.com.tr/#hl=tr&source=hp&q='+edit1.text+'fp=ee62abce62615dc2');
şöyle bir kod ile yapabilirsin..

Çevrimdışı webci

  • Delphi 1 Level 1
  • *
  • İleti: 6
  • Rep: +0/-0
Ynt: webbrowser enter
« Yanıtla #2 : 25 Ocak 2012 21:34:57 »
edit'deki metni google'da aratmayı yazmışsınız, ben şunu yapmak istiyorum bunu da cevaplayabilirseniz sevinirim.
   webbrowser'da button'a basınca edit'deki text'i imlecin olduğu yere yazdıracak.

Çevrimdışı sheshman

  • Delphi 2007 Level 1
  • *
  • İleti: 501
  • Rep: +10/-0
  • Cinsiyet: Bay
  • So others may live...
    • http://www.sheshman.com
Ynt: webbrowser enter
« Yanıtla #3 : 25 Ocak 2012 23:24:32 »
imlecin olduğu yeri almak çözüm üretmez, web formlarını dolurma ve post etme methodlarını kullanmanız gerekir
Kod:  (Unknown Language)
  1. WebBrowser1.OleObject.Document.GetElementByID('firstName').Value := Edit3.Text;
  2. WebBrowser1.OleObject.Document.GetElementByID('lastName').Value := Edit4.Text ;
  3. WebBrowser1.OleObject.Document.GetElementByID('address1').Value := Edit5.Text;
  4. WebBrowser1.OleObject.Document.GetElementByID('address2').Value := Edit6.Text ;
  5. WebBrowser1.OleObject.Document.GetElementByID('city').Value := Edit7.Text;
  6. WebBrowser1.OleObject.Document.GetElementByID('state').Value := Edit8.Text ;
  7. WebBrowser1.OleObject.Document.GetElementByID('zip').Value := Edit9.Text;
  8. WebBrowser1.OleObject.Document.GetElementByID('phoneOne').Value := Edit10.Text ;
  9. WebBrowser1.OleObject.Document.GetElementByID('phoneTwo').Value := Edit11.Text;
  10. WebBrowser1.OleObject.Document.GetElementByID('phoneThree').Value:=Edit12.Text ;
  11. WebBrowser1.OleObject.Document.GetElementByID('phoneWhole').Value:=Edit13.Text ;
  12. WebBrowser1.OleObject.Document.GetElementByID('gonder').click;
  13.  
gibi
Dünya sizden nefret ederse sizden önce benden nefret etmiş olduğunu bilin. Dünyadan olsaydınız dünya kendisine ait olanı severdi.
http://www.sheshman.com