无论 Form1(主窗体)的状态如何,如何使 Form2 可见?
how to make Form2 visible no matter what the state of Form1 (main form ) is?
使用 Delphi XE (1) 我有一个包含两种形式的应用程序
Form1为主窗体..
Form2 是一个类似 msn 的通知(一种滑动显示通知然后消失的表单)。
在 form1 被最小化之前,一切顺利进行。
问:即使 form1(main) 最小化到任务栏,我如何让 form2 显示可见
您可以使用 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;
使用 Delphi XE (1) 我有一个包含两种形式的应用程序
Form1为主窗体..
Form2 是一个类似 msn 的通知(一种滑动显示通知然后消失的表单)。
在 form1 被最小化之前,一切顺利进行。
问:即使 form1(main) 最小化到任务栏,我如何让 form2 显示可见
您可以使用 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;