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

小菜菜同学

<>就是让程序运行后，干点别的，程序运行完或一到时间，就不管你做什么，就一下子弹到最先，起一提示作用。就象有的下棋网络游戏，对方一下棋，棋盘就自动跳出来。</P>
: v+ @) F* |8 h8 J+ q2 f<>望大侠解答一下，</P>[em02][em02]

ilikenba

<>用一个时钟控件，在OnTimer事件中加上Form2-&gt;Show();</P><>使窗体在最前面主要是重载Form的虚拟函数CreateParams，改变TCreateParams的成员WndParent就可以了。  

class  TForm2  :  public  TForm  
{  
2 h+ e* a( u, k& X__published:            //  IDE-managed  Components  
2 w/ `: B$ d" Yprivate:            //  User  declarations  
* Y% R) R5 V3 r4 U! v/ k$ @3 xprotected:  
: v7 H* ?1 u; D& {       virtual  void  __fastcall  CreateParams(TCreateParams  &amp;  Param);  
9 w  z+ M7 ~) `+ x. a. X3 gpublic:            //  User  declarations  
) l& P/ R: b, k  g7 f  c       __fastcall  TForm2(TComponent*  Owner);  
* o5 o. K, C+ x9 Z. x0 A4 y};  
+ ~  K2 o0 e; T0 z. F, H0 @* t5 A
void  __fastcall  TForm2::CreateParams(TCreateParams  &amp;  Param)  
{  
       //调用基类的函数  
1 m+ ~: c# t% D       TForm::CreateParams(Param);  

       Param.ExStyle    &brvbar;=  WS_EX_TOPMOST;   
9 q! U# @% M; X( A0 W& i
       //这儿最关键的是只要Param.WndParent不是Application-&gt;Handle就可以了，  
" X! S5 f) e" e2 o. c       //不一定非要用GetDesktopWindow()，用其它的窗口也可以。  
       Param.WndParent  =  GetDesktopWindow();   
, d, ?# S' a) [2 F% V# T}
2 Y/ ]# W3 v! @9 ?; ~8 x- q9 D</P>