Einzelnen Beitrag anzeigen

hanspeter

Registriert seit: 26. Jul 2003
Ort: Leipzig
1.350 Beiträge
 
Delphi XE2 Professional
 
#2

Re: Mouse_Event und PostKeyEx32

  Alt 2. Nov 2006, 03:00
Also habe gefunden.
Ist eigentlich ganz einfach, ich hatte mich nur an der falschen API Funktion festgebissen.

Delphi-Quellcode:
procedure TAutoAnsage.Click;
begin
Keybd_Event(VK_SHIFT,0,0,0);
Mouse_Event(MOUSEEVENTF_RIGHTDOWN,0,0,0,0);
Sleep(100);
Mouse_Event(MOUSEEVENTF_RIGHTUP,0,0,0,0);
Keybd_Event(VK_SHIFT,0,KEYEVENTF_KEYUP,0);
end;
Gruß Peter
  Mit Zitat antworten Zitat