怎么样使我的登陆窗口最小化时候显示在状态栏？

Question

如题，我的代码，是这样的：
Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.CreateForm(TForm0, Form0);
  form0.Showmodal;
  application.Run;最小化时总在左下角？

Answer 1

我不是要最小化成托盘一样的图标，而是最小化时总显示在左下角，象MDI子窗体一样，我要让它显示在正下放，该怎么办？

Answer 2

我用的是Form1(主窗体)
写入以下代码, 你看看是不是你想要的效果?
unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;type
  TForm1 = class(TForm)
  private
    { Private declarations }
    procedure WMSYSCOMMAND (var message : TMessage); message WM_SYSCOMMAND;
  public
    { Public declarations }
  end;var
  Form1: TForm1;implementation{$R *.DFM}
procedure TForm1.WMSYSCOMMAND(var message: TMessage);
begin  
  if TWMSYSCOMMAND(message).CmdType = SC_MINIMIZE then
    showmessage('min');
  With message do
    DefWindowProc(handle,msg,wparam,lparam);
end;end.