Einzelnen Beitrag anzeigen

Benutzerbild von toms
toms
(CodeLib-Manager)

Registriert seit: 10. Jun 2002
4.648 Beiträge
 
Delphi XE Professional
 
#11

Re: Atomatischer klick auf TWebBrowser geht nicht

  Alt 18. Aug 2008, 08:14
Hallo,

Ersetze mal diesen Code

Delphi-Quellcode:
setCursorPos(m,n);
sleep(100);
mouse_event(MouseEventF_leftDown,x,y,0,0);
sleep(500);
mouse_event(MouseEventF_leftUp,x,y,0,0);
sleep(100); //Sleeps sind notwending aber nicht in der Größe ... nur zu testzwecken
durch diesen:

Delphi-Quellcode:
SetCursorPos(m, n);
mouse_event(MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0);
mouse_event(MOUSEEVENTF_LEFTUP, 0, 0, 0, 0);
Thomas
  Mit Zitat antworten Zitat