Mouse_Event und PostKeyEx32

[hanspeter]

Mit

Delphi-Quellcode:

Mouse_Event(MOUSEEVENTF_RIGHTDOWN,0,0,0,0);
Mouse_Event(MOUSEEVENTF_RIGHTUP,0,0,0,0);

Sende ich einen Mouseclick an ein anderes Programm

Mit

Delphi-Quellcode:

PostKeyEx32(VK_SHIFT,[ssRight],false);

kann ich an ein anderes Programm einen Tastendruck senden.

Aber wie sende ich Shifttaste und Mouseclick rechts an ein Programm?

Für einen Tip dankbar.

Mit Gruß Peter

[hanspeter]

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