程序启动窗体出现的问题,导致系统主窗体最小化时不能到任务栏,只能到桌面左下角的问题,帮忙看一下代码!!--------
查了一整天,发现问题在这,但不知道怎么解决程序启动时是先启动登陆窗体,通过了再显示主窗体的
  Forms,
  frm_main in 'frm_main.pas' {frmmain},
  frm_login in 'frm_login.pas' {frmlogin};{$R *.res}begin
  Application.Initialize;
  Application.Title := '管理系统';
    Application.CreateForm(Tfrmlogin, frmlogin);
  Application.CreateForm(Tfrmmain, frmmain);
  Application.Run;
-----------------
如果通过:
frmmain.Show;
frmlogin.Hide;
frmlogin.Free;
(问题可能出在这)
------------------因为我去掉登陆窗体,直接启动程序的主窗体,就不会出现“最小化的时候,是最小化到桌面左下角,而不是任务栏”

解决方案 »

  1.   

    不要把登录窗体放到主窗体上,放到别外一个窗体上,然后呢,project/options把窗体放到右边就可以了
      

  2.   

    Application.Initialize;  frmSplash := TfrmSplash.Create(Application);
        frmSplash.Show;
        frmSplash.Update ;
        while frmSplash.Timer1.Enabled do
            Application.ProcessMessages ;  Application.Title := '财务管理系统';
      frmSplash.Hide ;
      frmSplash.Free ;
      Application.CreateForm(TfrmMain, frmMain);
      frmLogin:= TfrmLogin.Create(Application);
        frmLogin.ShowModal;  frmMain.Hide ;  Application.CreateForm(TfrmMain, frmMain);
      Application.Run;
      

  3.   

    抱歉,贴多了,这样就可以了,
    Application.CreateForm(TfrmMain, frmMain);
      frmLogin:= TfrmLogin.Create(Application);
        frmLogin.ShowModal;  frmMain.Hide ;  Application.CreateForm(TfrmMain, frmMain);
      Application.Run;
    注意Main在project/option的左边,loginform在右边(不是自动创建)
      

  4.   

    楼上的
    运行到
      frmMain.Hide ;
    就报错啊
      

  5.   

    Application.CreateForm(TfrmMain, frmMain);
      frmLogin:= TfrmLogin.Create(Application);
        frmLogin.ShowModal;  frmMain.Hide ;  Application.CreateForm(TfrmMain, frmMain);
      Application.Run;
    ------------
    你这样写了
    那我在登陆窗体的确定按钮中该怎么写?
    如果还是原来的
    frmmain.Show;
    frmlogin.Hide;
    frmlogin.Free;就会报错
      

  6.   

    行了
    知道了
    登陆窗体的确定按钮写这样就行了
     Application.Run;