我有一个里面有几个组件的TGroupBox,我试图以这种方式设置GroupBox内所有组件的Enabled
属性
for i := 0 to GroupBox1.ComponentCount -1 do
if (GroupBox1.Components[i]) is TWinControl then
TWinControl(GroupBox1.Components[i]).Enabled:=False;
但是ComponentCount总是返回0,我缺少什么?
答案 0 :(得分:16)
ComponentCount属性用于检索组件拥有的组件数,以迭代所有子控件,您必须使用{{3 }和ControlCount属性。
答案 1 :(得分:0)
for i := 0 to GroupBox1.ControlCount - 1 do
if (GroupBox1.Controls[i]) is TWinControl then
TWinControl(GroupBox1.Controls[i]).Enabled:=False;