XE2: TWebbrowser verliert Fokus beim scrollen, wenn Dokumentende erreicht ist

[alleinherrscher]

Hi@all.

Ich schreibe eine Art kleinen E-Mail Client, den ihr euch wie Thunderbird vorstellen müsst. Oben ist eine Liste (DrawGrid) mit den Nachrichten, unten ist ein TWebbrowser, um die HTML Mails anzuzeigen. Ich möchte gerne mit dem Mauswheel in der Komponente scrollen, über welcher sich die Maus gerade befindet.

Im DrawGrid ist das kein Problem. Dort wird im OnMouseEnter ein Fokus gesetzt. Im Webbrowser habe ich die WindowMessages WMMOUSEMOVE und CMMOUSELEAVE abgefangen, wie es hier beschrieben ist. Allerdings verliert der Browser wieder den Fokus, sobald man an den oberen oder unteren Rand eines Dokuments gescrollt hat, bzw das dokument so kurz ist, dass man nicht scrollen kann. In diesem Moment bekommt das DrawGrid wieder den Fokus.

Hat jemand eine Ahnung, woran dies liegen kann? Könnt ihr mal testen, ob ihr auch dieses Verhalten habt? Ich nutze XE2 Prof.

Danke und schönen Sonntag, Michael