//不使用bpl 调用窗体 with TForm2.Create(Application) do begin ShowModal; Free; End; //========== 视图-》工程对象》包 工程属性》随运行时间来定