我刚开始看着书学 问题太低级请别笑

我的程序段如下:
Procedure TForm1.FormCreate(Sender:Tobject);
begin
with Application do
NormalizeTopMosts;
MessageBox('This should be on top.', 'Look',MB_OK);
RestoreTopMosts;
end;
end;

提示MessageBox('This should be on top.', 'Look',MB_OK);有错误

哦 我开始的声明如下:
type
  TForm1 = class(TForm)
  Procedure FormCreate(Sender:Tobject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;