BCB遍历所有窗体的组件

最新推荐文章于 2018-01-25 20:57:56 发布

weixin_30251829

最新推荐文章于 2018-01-25 20:57:56 发布

阅读量333

点赞数

原文链接：http://www.cnblogs.com/cpprun/p/4760691.html

版权

for(iFormIdx=0; iFormIdx<Screen->FormCount; iFormIdx++)
{
  TForm *pForm = Screen->Forms[iFormIdx];
  for(int iCtrlIdx=0; iCtrlIdx<pForm->ControlCount; iCtrlIdx++)
   {
      TEdit *pEdit = dynamic_cast<TEdit*>(pForm->Controls[iCtrlIdx]);
      if(pEdit)
       {
            pEdit->Text = "";
       }
   }
}

转载于:https://www.cnblogs.com/cpprun/p/4760691.html