遍历窗体控件的方法

遍历窗体控件的代码，如下：

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="";
}
}