遍歷窗體控件的方法

遍歷窗體控件的代碼，如下：

AnsiString namestring="TEdit";
for(int i=0;i<Form1->ControlCount;i++)
{
if (Form1->Controls[i]->ClassNameIs(namestring))
{
TEdit *p=dynamic_cast<TEdit*> (Form1->Controls[i]);  //問題所在
p->Text="";
}
}