A abcxca Unregistered / Unconfirmed GUEST, unregistred user! 2003-01-02 #3 showwindow(TagHwnd,SW_SHOW);<br> 不行,是否调用的窗口还要交出焦点? 但怎样交?
A aizb Unregistered / Unconfirmed GUEST, unregistred user! 2003-01-02 #4 本来是不用的,ShowWindow是可以自动将打开的窗口设为焦点的,但是如果你是通过鼠标操作<br>来调用ShowWindow的话可能就麻烦点,因为当OnClick事件发生时你ShowWindow,但是紧接着的<br>MouseUp又会把焦点抢过来.
本来是不用的,ShowWindow是可以自动将打开的窗口设为焦点的,但是如果你是通过鼠标操作<br>来调用ShowWindow的话可能就麻烦点,因为当OnClick事件发生时你ShowWindow,但是紧接着的<br>MouseUp又会把焦点抢过来.
X xzh2000 Unregistered / Unconfirmed GUEST, unregistred user! 2003-01-02 #5 flashwindow(TagHwnd,true);
A aizb Unregistered / Unconfirmed GUEST, unregistred user! 2003-01-02 #6 procedure TForm1.Button4Click(Sender: TObject);<br>Var HA:THandle;<br>begin<br> HA:=FindWindow(nil,'ss');<br> if ha<>0 then<br> SetForegroundWindow(HA);<br>end;<br>
procedure TForm1.Button4Click(Sender: TObject);<br>Var HA:THandle;<br>begin<br> HA:=FindWindow(nil,'ss');<br> if ha<>0 then<br> SetForegroundWindow(HA);<br>end;<br>
A abcxca Unregistered / Unconfirmed GUEST, unregistred user! 2003-01-03 #7 SetForegroundWindow(HA);<br> 呵呵,就是它,ok了.<br>