Zitat von
Sunlight7:
Ähm, der Code tut das gleiche, als das Du die Leertaste drücken würdest.
Warum flackert Dein Button???
Hat der den Fokus, bzw. wie oft rufst Du den Code auf?
Mit diesen Makros steure ich immer andere Programme, normal klappt das.
Also dein Tastaturevent an sich geht, daran liegt es nicht, habs anderweitig getestet.
Irgendwas stimmt also mit meinem Code nicht, vielleicht kann mir jemand weiterhelfen.
Fakt ist: Der andere Button bekommt zwar den Focus (gestrichelte Umrandung), aber einzig der Ausgangsbutton
von dem die procedure ausgeht flackert (gedrückt, nicht gedrückt etc)
Delphi-Quellcode:
var wnd: HWND;
begin
wnd := FindWindow('TForm1','Form1');
wnd := FindWindowEx2(wnd,'TButton', 8);
// wnd := FindWindow('#32770','ZoneAlarm-Sicherheitswarnung');
// wnd := FindWindowEx2(wnd,'ZaButton', 3);
if wnd <> 0 then
begin
SendMessage(wnd, WM_SETFOCUS, 0, 0);
end;
keybd_event(VK_SPACE, 0, 0, 0);
keybd_event(VK_SPACE, 0, KEYEVENTF_KEYUP, 0);