delphi 虚拟键

Question

如何按下一个Button相当于同时安下ctrl+F2

Answer 1

     keybd_event(17,0,0,0);  //17为ctrl
　　 keybd_event(113,0,0,0); //113为F2 
　　 keybd_event(115,0,KEYEVENTF_KEYUP,0);
　　 keybd_event(18,0,KEYEVENTF_KEYUP,0);

Answer 2

晕，上面的后面忘改了
     keybd_event(17,0,0,0);  //17为ctrl
　　 keybd_event(113,0,0,0); //113为F2 
　　 keybd_event(113,0,KEYEVENTF_KEYUP,0);
　　 keybd_event(17,0,KEYEVENTF_KEYUP,0);

Answer 3

 keybd_event(17,0,0,0);  //17为ctrl
　　 keybd_event(113,0,0,0); //113为F2 
　　 keybd_event(113,0,KEYEVENTF_KEYUP,0);
　　 keybd_event(17,0,KEYEVENTF_KEYUP,0);