高手帮忙，如何向其它程式发送按下不起的键，急用谢谢

Question

请教下各位：  setForegroundWindow(hh1);
  keybd_event(VK_UP,0,0,0);我想实现以上代码的功能，（按下UP键不起），但又不能将这个程式置前．实现方法不限，最好能给出示例代码。急用，望高手不吝赐教，谢谢！！！

Answer 1

按下回车键
postmessage(handle,wm_keydown,vk_return,0);
如果要弹起就是wm_keyup

Answer 2

  PostMessage(hh1, WM_KEYDOWN, VK_UP, 0);
  SendMessage(hh1, WM_KEYDOWN, VK_UP, 0);
都不对

Answer 3

 EnableWindow(h,true);
postmessage(h,wm_keydown,vk_up,0);

Answer 4

var
  AInput: TInput;
begin
  ZeroMemory(@AInput, SizeOf(AInput));
  AInput.Itype:=INPUT_KEYBOARD;
  AInput.ki.wVk:=VK_UP;
  if AKey>127 then
    AInput.ki.dwFlags:=KEYEVENTF_EXTENDEDKEY;
  SendInput(1, AInput, SizeOf(TInput));
end;