登陆时选择下拉式列表框的不同选项,出现的窗体不同,怎么实现

Question

同上,选择不同的登陆选项,主窗体不同,这个我试过,但是不行
  Form_login := TForm_Login.Create(nil);
  try
    Form_Login.ShowModal;
    if Form_Login.ModalResult = 2 then
    begin
      Application.Terminate;
      exit;
    end;
  finally
    Form_login.Destroy;
  end;
  if Trim(_DatabaseName)<>'HE' then
  begin
    Application.CreateForm(TForm_main, Form_main)  ;
    Application.CreateForm(TForm_main_HE, Form_main_HE);
  end else
  begin
    Application.CreateForm(TForm_main_HE, Form_main_HE);
    Application.CreateForm(TForm_main, Form_main)  ;
  end;
这样不行,怎么实现呢?

Answer 1

错在哪里???????????????????????????
错误提示？？？？？？？？？？？？？？Application.CreateForm(TForm_main, Form_main)  ;
Application.CreateForm(TForm_main_HE, Form_main_HE);改为：
 Form_Main:=TForm_Main.Create(Application);
 Form_Main_He:=TForm_Main.Create(Application);

Answer 2

是这样的Form_main和Form_main_HE每次只能有一个出来,向我上边这样写的话,都出来了!

Answer 3

if Trim(_DatabaseName)<>'HE' then
  begin
    Application.CreateForm(TForm_main, Form_main)  ;
  end else
  begin
    Application.CreateForm(TForm_main_HE, Form_main_HE);
  end;这样不行吗？