谁告诉我我的mdi子窗口是怎么回事啊？？

我创建了一个mdichild，名字是form2然后调用procedure TForm2.FormClose(Sender: TObject; var Action: TCloseAction);
begin  Action := caFree;
end;要是语法错也就算了~~delphi竟然告诉我：Undeclared identifier: 'FormClose'没有这个函数？？？？？？？？？？？？？？？？？？？？？？？？？？？？？？？怎么回事？