如何使第一个打开的窗体不是主窗体？谢谢

Question

rt

Answer 1

在project---->options中设置启动窗体啊.

Answer 2

在菜单栏中找到project----->options ------>main form中选择想先出现的窗体

Answer 3

在工程文件中。将第一个application.createfrom()改成
form1:= TForm1.create(application);
form1.show;

Answer 4

哦，也就是在你的工程文件设置一个最先创建的FORM
如下，Form1作为主form
  Application.Initialize;
  Application.CreateForm(TF_DataModule, F_DataModule);
  Application.CreateForm(TForm1, Form1);
  Application.Run;

Answer 5

哦，也就是在你的工程文件设置一个最先创建的FORM
如下，Form1作为主form
  Application.Initialize;
  Application.CreateForm(TF_DataModule, F_DataModule);
  Application.CreateForm(TForm1, Form1);
  Application.Run;

Answer 6

启动窗体就是个很好的例子：http://218.56.11.178:8020/web/lie_fallow.aspx-》下载基地-》例程-基础应用-》启动窗体的制作

Answer 7

program AnProject;uses
  Forms,
  Main in 'Main.pas' {MainForm},
  Login in 'Login.pas' {LoginForm},
  Dm in 'Dm.pas' {dmDemo: TDataModule},
  Men in 'Men.pas' {MenForm},
  H_Area in 'H_Area.pas' {H_AreaForm},
  SellTarget in 'SellTarget.pas' {SellTargetForm};{$R *.res}begin
  Application.Initialize;
  Application.CreateForm(TMainForm, MainForm);
  Application.CreateForm(TLoginForm, LoginForm);
  Application.CreateForm(TdmDemo, dmDemo);
  {登陆窗体显示}
  application.ShowMainForm :=False;
  LoginForm.ShowModal;  if LoginForm.beExit then
  begin
    application.ShowMainForm :=True;
    Application.Run;
  end
  else
    Application.Terminate;  
end.

Answer 8

Application.CreateForm(TMainForm, MainForm);
  Application.CreateForm(TLoginForm, LoginForm);
  Application.CreateForm(TdmDemo, dmDemo);
  application.ShowMainForm :=False;
  LoginForm.ShowModal;  if LoginForm.beExit then
  begin
    application.ShowMainForm :=True;
    Application.Run;
  end
  else
    Application.Terminate;