frmmain最小化的时候会出现在windows的左上角，而不是去了任务栏。(20)

主窗体为frmlogin 在frmlogin 的按钮btnLogin点击事件中 调用了frmmain,然后把frmlogin隐藏。 这时候，发现frmmain最小化的时候会出现在windows的左上角，而不是去了任务栏。 那位大哥有什么解决方法，

登录窗口 一般不应该设置为主窗口吧,Delphi中除主窗体外，其余窗体最小化后不会出现在任务栏上，而是象古老的Windows 3.X那样缩小为一条出现在桌面左下角。在这些窗体的OnCreate事件里面加上 SetWindowLong(Handle,GWL_EXSTYLE,GetWindowLong(Handle,GWL_EXSTYLE) or WS_EX_APPWINDOW);就可以使窗口最小化后出现在任务栏上。

同意楼上，delphi程序中一般只有主窗体最小化时会出现在任务栏中，你可以把frmMain设为主窗体。

delhpi 加那条语句我试过了不能用，我就是不想换主窗体有什么办法没有。

我测试了，完全可以。unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) Button1: TButton; procedure Button1Click(Sender: TObject); private { Private declarations } public { Public declarations } end;var Form1: TForm1;implementationuses Unit2;{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);begin form2.Show;end;end.object Form1: TForm1 Left = 192 Top = 107 Width = 544 Height = 375 Caption = 'Form1' Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False PixelsPerInch = 96 TextHeight = 13 object Button1: TButton Left = 146 Top = 142 Width = 73 Height = 23 Caption = 'Button1' TabOrder = 0 OnClick = Button1Click endendobject Form2: TForm2 Left = 244 Top = 212 Width = 350 Height = 175 Caption = 'Form2' Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13end