如何在delphi 中实现ＶＢ中的sendkeys的功能？

Question

查到有个api: keybd_event 
但不大好用，不知有没有更好的办法？

Answer 1

普通的键盘事件都可以，但如果要实现比如alt+tab,ctl+shirt+x这样的组合键就不知道了

Answer 2

例子：
Ctrl + Vkeybd_event(VK_CONTROL, MapVirtualKey(VK_CONTROL,0), 0,0);
keybd_event(byte('v'), MapVirtualKey(byte('v'),0), 0,0);
keybd_event(byte('v'),MapVirtualKey(byte('v'),0), KEYEVENTF_KEYUP,0);
keybd_event( VK_CONTROL, MapVirtualKey(VK_CONTROL,0),KEYEVENTF_KEYUP,0);

Answer 3

    很简单的
    SendMessage(Form1.Handle , WM_NEXTDLGCTL, 0, 0);