如何检查表单的所有组件并验证组件的类型TEdit
?
问问题
1776 次
3 回答
4
您可以使用dynamic_cast 运算符。
于 2012-12-21T09:02:24.127 回答
0
如果我错了,请原谅,但不会自动将所有表单组件对象指针添加到类定义(在头文件中)..
如:
class TFormSomeForm : public TForm
{
__published:
TEdit *SomeEditBox;
TEdit *AnotherEditBox;
...
}
这意味着您可以从标题中分辨出哪些组件属于 TEdit 类型。
或者您可以单击设计视图中的组件,对象检查器将显示类型。
于 2012-12-21T09:03:21.493 回答
0
我的函数设置 TWinControl 及其子项中所有编辑的 Text 属性。
void __fastcall SetEditsText(TWinControl* winControl, UnicodeString editsText)
{
for (int c = 0; c < winControl->ControlCount; c++)
{
TControl* ctrl = winControl->Controls[c];
TWinControl* wc = dynamic_cast<TWinControl*>(ctrl);
// Check if it's grouping component
if (wc != NULL)
{
// Set edits of children
SetEditsText(wc, editsText);
}
else
{
if (ctrl->ClassType() == __classid(TEdit))
{
TEdit* ecomp = (TEdit*) ctrl;
ecomp->Text = editsText;
}
}
}
}
使用:
void __fastcall TForm1::Button1Click(TObject *Sender)
{
SetEditsText(form1, ""); // Clear all edits
}
于 2014-11-12T12:29:06.270 回答