请帮小弟我看看这段代码错在哪儿

请帮我看看这段代码错在哪儿？
函数：
TForm*   TMainForm::FormExist(AnsiString   szCaption)
{
  for(int   i=0;i <this-> MDIChildCount;i++)
  {
  TForm   *pForm=this-> MDIChildren[i];
  if(pForm-> Caption==szCaption)
    return   pForm;
  }
  return   NULL;
}
调用：
void   __fastcall   TMainForm::mnuRoomTypeClick(TObject   *Sender)
{
    TForm   *pForm=FormExist( "类型设置 ");
    if(pForm)
pForm-> SetFocus();
    else
pForm=new   TfmRoomType(Application);
pForm-> Show();
}

执行时提示：
type   name   expected
cannot   convert   "int "   to   "TForm "
statement   missing;

------解决方案--------------------
是否没有添加头文件

------解决方案--------------------
pForm=new TfmRoomType(Application);
这句的错误
TfmRoomType是什么
改成
pForm=new TMainForm(Application);
试试