Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Netzwerke (https://www.delphipraxis.net/14-netzwerke/)
-   -   Delphi TembeddedWB / TWebbrowser Cursor Mouseevents abfangen (https://www.delphipraxis.net/95449-tembeddedwb-twebbrowser-cursor-mouseevents-abfangen.html)

SnakeWTS 6. Jul 2007 16:16


TembeddedWB / TWebbrowser Cursor Mouseevents abfangen
 
Hi an alle.
Ich schreibe gerade einen HTML Editor für eine Anwendung.
Für das verschieben der Tabellen bzw deren Spalten möchte ich eigene Cursors setzen, leider verwendet der Webbrowser immer seine eigenen Cursor settings. Lt. MS kann man das ausschalten:
IDM_OVERRIDE_CURSOR Command ID
Commands the MSHTML Editor never to change the mouse pointer. The mouse pointer will remain fixed as the last icon before the IDM_OVERRIDE_CURSOR command was issued.

Ich lese daraus das ich dem Interface nur das command IDM_OVERRIDE_CURSOR senden muß und dann läßt er die Pfoten vom Cursor und ich kann sie selber setzen?!

Tue ich jedoch so,:
(browser.Document as IHTMLDocument2).execCommand('IDM_OVERRIDE_CURSOR', true,true);
bekomme ich einen Fehler 'Ungültiges Argument' -> IDM_... kennt er nicht :-(

Vielleicht hat jemand eine Idee wie man da zwischen kommt.

(Über nen msg Hook die msg (WM_SETCURSOR) direkt auszutauschen ist zu doof :-\)

Ich habe leider in Foren und Newsgroups keine Lösung gefunden ausser das es wohl so funktioniert (aber nicht wie :()
I
initialize the browser by passing in a IDM_OVERRIDE_CURSOR so that
TWebBrowser doesn't change the cursor when the mouse moves over the
browser. Instead the cursor stay the same as I set it - Screen.Cursor
= crHourglass, for example. This is great.


Alle Zeitangaben in WEZ +1. Es ist jetzt 11:58 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz