调用动态创建的窗体时，其控件没显示出来

FrmFS作为动态创建的窗体，其单元Unit的名称为U_FrmFS，代码如下：
unit U_FrmFS;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, ComCtrls, ExtCtrls;type
  TFrmFS = class(TForm)
    PrgBarLoad: TProgressBar;
    LabHint: TLabel;
    TmrLoad: TTimer;
    procedure TmrLoadTimer(Sender: TObject);
    procedure FormCreate(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;
implementation{$R *.dfm}procedure TFrmFS.TmrLoadTimer(Sender: TObject);
begin  if PrgBarLoad.Position<100 then
    PrgBarLoad.Position:=PrgBarLoad.Position+20
  else
    PrgBarLoad.Position:=0;
end;procedure TFrmFS.FormCreate(Sender: TObject);
begin
  TmrLoad.Enabled:=true;
end;end.
并在Project->Options中将该窗体移入Available forms中，该窗体放有一个Timer，一个ProgressBar，ProgressBar的最大值为100，从零开始每秒计时加20，在另一窗体的creat事件中动态创建调用FrmFS时，窗体上的ProgressBar不动
procedure TSysPlatMainJM.FormCreate(Sender: TObject);
var
  FrmFS: TFrmFS;  
begin 
  FrmFS:=TFrmFS.Create(self);
  LabHint:= TLabel.Create(FrmFS) ;
  LabHint.Parent:=FrmFS;
  LabHint.Top:=0;
  LabHint.Left:=18;
  LabHint.Height:=13;
  LabHint.Width:= 168;
  LabHint.AutoSize:=true;
  LabHint.Caption:='     系统正在启动，请稍候...      '   ;
  FrmFS.Show;窗体调出来后进度条并没有动，而且  LabHint也没又显示出来，不知为什么，可我作了个demo时，是可以的呀，请指点。
  Sleep(1000);//延时1000后释放，
  FrmFS.Free;
  end;
end;
请结合注释看，望高手指点。