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;