怎样将键盘输入焦点设定在指定的窗体上？

Question

这个问题我之前问过，是和其他问题一起问的，没有得到答案，在这里专门开一个帖子再问一次。就是，我已经找到一个窗口的句柄，怎么才能把键盘的输入焦点设定在这个窗口上呢？我试过SetFocus()函数和SendMessage()函数，都没有效果，还有什么其他方法能实现？

Answer 1

function SetForegroundWindow(hWnd: HWND): BOOL;

Answer 2

HWND SetActiveWindow(    HWND hWnd  // handle of window to activate
   );