一个窗体问题

主窗体创建一个Show窗口，并且通过CreateParams使该窗体在任务栏显示，现在我在该Show窗体中需要创建一个ShowModal窗体，就像FoxMail的新建邮件时选取联系人的效果。
但现在给窗体却把主窗体给疲敝了

解决方案 »

  1.   

    不要用ShowModal方式，还用Show方式显示，将子窗体的FormStyle设为fsStayOnToop就可以了。
      

  2.   

    procedure TForm.CreateParams(var Params: TCreateParams);
    begin
      inherited CreateParams(Params);
      Params.ExStyle := Params.ExStyle or WS_EX_APPWINDOW;
      Params.WndParent := GetDeskTopWindow;
    end; 创建的时候
    直接 Show 没问题呀
      

  3.   

    SHOWMODAL和SHOW没什么大的区别，只不过SHOWMODAL把其它窗体变为不可用了！
    ENABLED ：= FALSE