Webkit ScrollPos

07/11/2012 - 10:43 von Hermie | Report spam
Hallo!

Ich hatte in der Mozilla-Version des Webbrowsers eine Scroll-Funktion
eingebaut.
Ich war aber blöd und habe nach dem Erscheinen von Olafs WebKit-Browser
mein Mozilla-Browser-Control gelöscht, und das ist auch schon so lange
her, dass ich keine Sicherheitskopien mehr davon habe.

Jetzt habe ich gemerkt, dass ich in meinem Code einen Teil einfach
auskommentiert habe, den wollte ich wohl spàter noch einbauen, habe es
dann aber vergessen.

frmMain.ucWebKit1.SetScrollPos frmMain.ucWebKit1.ScrollPosX + 50,
frmMain.ucWebKit1.ScrollPosY

Könnte mir jemand sagen, wie ich mit dem WebKit-Browser eine Seite nach
links, recht, oben und unten scrollen kann?

Vielen Dank!!
Hermann
 

Lesen sie die antworten

#1 Schmidt
07/11/2012 - 11:47 | Warnen spam
Am 07.11.2012 10:43, schrieb Hermie:

frmMain.ucWebKit1.SetScrollPos frmMain.ucWebKit1.ScrollPosX + 50,
frmMain.ucWebKit1.ScrollPosY

Könnte mir jemand sagen, wie ich mit dem WebKit-Browser eine Seite nach
links, recht, oben und unten scrollen kann?



Man kann die aktuelle BrowserViewInstance zu IWebViewPrivate casten,
und dann dort die .scrollBy Methode benutzen, welche mit relativen
Koordinaten funktioniert.

Dim WVP As IWebViewPrivate, tP As tagPOINT
Set WVP = WebKitOcx1.Browser.WebViewPrivate
tP.x = 0: tP.y = 15 '<- relativ, um 15 Pixel nach unten
WVP.scrollBy tP

Das funktioniert also dann, wenn man die WebKit.tlb in
das jeweilige Projekt eingebunden hat (damit die obigen
Typen verfügbar werden).

Alternativ ginge aber wie immer auch Javascript-Injektion.

Olaf

Ähnliche fragen