无论Form1（主窗体）的状态如何，如何使Form2可见？

Question

使用Delphi XE（1）我有一个带有两种表格的应用程序

Form1是主要形式..

Form2是一个类似msn的通知（幻灯片显示通知然后消失的表单）。

工作顺利，直到form1最小化。

问：即使form1（main）被最小化到任务栏，我如何使form2显示可见

Answer 1

您可以使用CreateParams覆盖默认行为。像这样：

向表单添加声明

  protected
    procedure CreateParams(var Params: TCreateParams); override;

添加程序

procedure TMyForm.CreateParams(var Params: TCreateParams);
begin
  inherited CreateParams(Params);

  with Params do
  begin
    Style := WS_POPUP or WS_BORDER;
    ExStyle := WS_EX_TOPMOST or WS_EX_NOACTIVATE;
    WndParent := 0;
  end;
end;