IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

Kod:
Add edit

 

WebBrowser1.OleObject.********.GetElementByID('sf_url').Value := Edit1.Text;

 

Post

 

WebBrowser1.OleObject.********.GetElementByID('sf_form').Submit;

WebBrowser1.OleObject.********.F1.onSubmit;

 

Show Url

 

Webbrowser1.OleObject.********.Url;

 

Show Title

 

Webbrowser1.OleObject.********.title;

 

***

  ShowMessage('ScrollHeight: ' + IntToStr(TWebbrowser.OleObject.********.Body.ScrollHeight));

   ShowMessage('ScrollWidth: ' + IntToStr(TWebbrowser.OleObject.********.Body.ScrollWidth));

 

   // amount that the ******** has been scrolled down 

  // Um wieviel das Dokumkent nach Unten gescrollt wurde 

  ShowMessage('ScrollTop: ' + IntToStr(TWebbrowser.OleObject.********.Body.ScrollTop));

   ShowMessage('ScrollLeft: ' + IntToStr(TWebbrowser.OleObject.********.Body.ScrollLeft));

 

   // Shows the physical height, width of the browser screen 

  // Zeigt die Hohe, Breite des Anzeigebereichs 

  ShowMessage('ClientHeight: ' + IntToStr(TWebbrowser.OleObject.********.Body.ClientHeight));

   ShowMessage('ClientWidth: ' + IntToStr(TWebbrowser.OleObject.********.Body.ClientWidth));

 

   // Show the ******** referrer 

  // Referer von Twebbrowser anzeigen. 

  ShowMessage('Referer: ' + TWebbrowser.OleObject.********.referrer);

 end;