请帮我看看这段代码错在哪儿?
狗戈 2007-03-20 02:52:58 函数:
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;