如何无需关注地运行应用程序? (替代方式)

时间:2017-06-14 20:34:31

标签: delphi

procedure TForm1.FormCreate(Sender: TObject);
begin
  ShowWindow(Handle, SW_SHOWNOACTIVATE);
end;

不幸的是,上面的代码与激活的jvTrayIcon组件(tvVisibleTaskBar:=false)结合使用效果不佳。主窗体仍然可见,缺少UI元素:

image

1 个答案:

答案 0 :(得分:-1)

您是否尝试过设置

Application.MainFormOnTaskbar := False;
Application.ShowMainForm := false;

之前

Application.CreateForm(TForm1, Form1);
<。>在.dpr文件中