我现在写了个软件,在内部运行,程序是隐藏的,该程序是配合外部程序一起运行,他们的外部程序,也有是ontop型的,就是显示在所有窗口的最前面,现在我要的是,我的对话框,显示在他的上面,也是就说,显示在所有程序的最前面,就是WINDOWS的报错提示一样的.

解决方案 »

  1.   

    自己写Form做对话框
    用API设置为TopMost就OK
      

  2.   

    摘自超级猛料:
    Public
      procedure Createparams(Var Params:TCreateParams);override;
    ...procedure TFormDrop.Createparams(var Params:TCreateParams);
    begin
      Inherited CreateParams(Params);
      With Params do
      begin
       EXStyle:=ExStyle or WS_EX_TOPMOST OR WS_EX_ACCEPTFILES or WS_DLGFRAME
       wndParnet:=GetDesktopWindow;  //关键一行,用SetParent都不行!!
      end;
    end;
      

  3.   

    可以使用Application.MessageBox('错误信息!','错误',MB_OK or MB_TOPMOST);
      

  4.   

    自己写Form做对话框
    用API设置为TopMost就OK同意