Hi
DP !
Ich habe einen TWebBrowser auf meiner Form liegen und möchte den Cursor an der Ecke unten links vom Browser platzieren. D.h. unabhängig von der Desktop-Auflösung oder der Screen-Position der Anwendung wird der Cursor immer an der Ecke unten links vom Browser platziert.
Delphi-Quellcode:
procedure TFmain.Button1Click(Sender: TObject);
var
pt: TPoint;
begin
WB_ScrollTo(WebBrowser1, wbPosBottom); //Webbrowser: an das ende scrollen
pt := WebBrowser1.ScreenToClient(Mouse.CursorPos);
e_x.Text:=IntToStr(pt.X);
e_y.Text:=IntToStr(pt.Y);
SetCursorPos(pt.X,pt.Y); //mouseposition setzen
Ich dachte damit kann ich zumindest den Cursor auf den Webbrowser der Anwendung setzen, aber der Cursor verlässt das Fenster der Anwendung.
Gibt es eine Methode, den Cursor auf den Ursprung (0/0) einer Komponente zu platzieren ?