Mausrad simulieren

[googy]

Hallo,

ich würde gerne wissen wie man eine Bewegung des Mausrads (scrollen nicht clicken) per Delphi simulieren kann, jedoch ohne Hooks und Messages zu versenden.
Habe schon gesucht doch nichts konkretes außer hooks gefunden.

Nun meine Frage es gibt ja "mouse_event", damit kann man ganz einfach Mausclicks ausführen für rechte, linke und mittlere Maustaste

Beispiel:

Delphi-Quellcode:

var point:TPoint;

mouse_event(MOUSEEVENTF_LEFTDOWN, point.x, point.y, 0, 0);
mouse_event(MOUSEEVENTF_LEFTUP, point.x, point.y, 0, 0);

dies funktioniert Fensterunabhängig und überall

gibt es sowas auch für das Mausrad?

oder eine andere (möglichst einfache) Möglichkeit dies zu bewerkstelligen


Vielen Dank im Voraus