Thema: Delphi Scrollen im TWebBrowser

Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
43.186 Beiträge
 
Delphi 12 Athens
 
#6

Re: Scrollen im TWebBrowser

  Alt 30. Mai 2004, 00:38
Also ein bissl Wissen hab ich mir ja zum Glück dank des netten Wetbewerbs angeeignet, unteranderem vieles zum TWebBrowser.
Und hier ist die gekürzte Variante für den Zugriff auf die ScrollPosition.

Code:
OleVariant(WebBrowser1.Document as IHTMLDocument2).Document.ScrollTo(0, 0);
OleVariant(WebBrowser1.Document as IHTMLDocument2).Body.ScrollTop := 0;
OleVariant(WebBrowser1.Document as IHTMLDocument2).Body.ScrollLeft := 0;

...

OleVariant(WebBrowser1.Document as IHTMLDocument2).Document.ScrollBy(x, y);
Also ab Document/Body ist das JavaScript-Syntax (überall nachlesbar - z.B. selfHTML)

Das Funktioniert 100%ig, aber wenn nicht, dann schau mal was du davon noch brauchst - hier mal ein Ausschnitt meines Uses-Bereichs:
XMLDOM, XMLIntf, MSXMLDOM, XMLDoc, IdHTTP, OleCtrls, SHDocVw, ActiveX, MSHTML...
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests
  Mit Zitat antworten Zitat