forms - Delphi xe3 主窗体隐藏

Question

我一直在尝试使用隐藏主窗体启动我的应用程序，但没有成功。它编译和一切，但是当我运行它时，我收到运行时错误。当我使用计时器并将其设置为 1 毫秒，然后调用 Application.MainForm.Hide 时，它会隐藏但会闪烁，我不希望这种情况发生

program Project1;
uses
  FMX.Forms,
  Unit1 in 'Unit1.pas' {Form1};

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.MainForm.Visible := false;
  Form1.Visible:=false;
  Application.Run;
end.

Answer 1

在 FireMonkey 应用程序中，自动创建的表单(已创建)和 MainForm 属性在 Application.Run 方法中分配。因此，访问冲突是因为 MainForm 属性和 form1 变量为零而引起的。

为了访问此类属性，您必须执行 RealCreateForms方法第一

begin
  Application.Initialize;
  Application.CreateForm(TForm2, Form1);
  Application.RealCreateForms;
  //Application.MainForm.Left:=-Application.MainForm.Width;
  Application.MainForm.Visible:=False;
  Application.Run;
end.