请问，怎样让程序一到时间，就弹到最前呢？

小菜菜同学

<>就是让程序运行后，干点别的，程序运行完或一到时间，就不管你做什么，就一下子弹到最先，起一提示作用。就象有的下棋网络游戏，对方一下棋，棋盘就自动跳出来。</P>
, d- ?$ B) ^0 P$ Q$ z1 c<>望大侠解答一下，</P>[em02][em02]

ilikenba

<>用一个时钟控件，在OnTimer事件中加上Form2-&gt;Show();</P><>使窗体在最前面主要是重载Form的虚拟函数CreateParams，改变TCreateParams的成员WndParent就可以了。  
& P7 O  ]; S. w# B; k; Q: s
7 C" O1 r( c" P: M( h+ p) iclass  TForm2  :  public  TForm  
{  
9 u/ U* U7 H. _8 e( W2 @__published:            //  IDE-managed  Components  
private:            //  User  declarations  
1 U8 P8 v8 p# d0 g/ V1 Fprotected:  
       virtual  void  __fastcall  CreateParams(TCreateParams  &amp;  Param);  
public:            //  User  declarations  
) n) M- @; P- _4 z( L       __fastcall  TForm2(TComponent*  Owner);  
};  

/ Q/ {, j4 ^1 Zvoid  __fastcall  TForm2::CreateParams(TCreateParams  &amp;  Param)  
{  
2 S8 w/ P* X1 l3 l; x       //调用基类的函数  
       TForm::CreateParams(Param);  
' ]5 J$ i. p5 s5 }
" g2 t  B* h. t! `7 T/ \       Param.ExStyle    &brvbar;=  WS_EX_TOPMOST;   

% Z; h6 L+ n) e       //这儿最关键的是只要Param.WndParent不是Application-&gt;Handle就可以了，  
$ R" s9 d" U. F2 z0 Y1 |0 }. H       //不一定非要用GetDesktopWindow()，用其它的窗口也可以。  
" t4 E! V, {- m5 w5 h! ?& _+ c       Param.WndParent  =  GetDesktopWindow();   
}
</P>