Question

delphi 中怎么向指定进程发送键盘消息

如题最好做个例子比如向QQ进程或记事本程

Answer 1

procedure KeyPress(bKey:Byte ); //按键
begin
keybd_event(bKey,0,0,0);
Sleep(64);
keybd_event(bKey,0,KEYEVENTF_KEYUP,0);
end;

想发什么消息用 VK_*****
或者用数字， a 好像是 65