Delphi问题!如果有几张图片的visible的属性一样,该怎么表示啊?
发布网友
发布时间：2024-10-23 06:48
共1个回答
热心网友
时间：2024-10-30 22:17
这要利用下容器的组件列表
1. 利用组件类型或名称、把同类型组件改相同属性值
像这样,
for ii := 0 to gpPower.ControlCount - 1 do
if gpPower.Controls[ii] is TCheckBox then
(gpPower.Controls[ii] as TCheckBox).Enabled := True;
2. 比较灵活的配置,利用Tag 属性分组,Tag属性可以在设计期指定好一个整数
for ii := 0 to gpPower.ControlCount - 1 do
if gpPower.Controls[ii] is TCheckBox then
if gpPower.Controls[ii].Tag = 1 then
(gpPower.Controls[ii] as TCheckBox).Enabled := True;
3. 同上,识别组件Controls[ii].Name 属性,实现分组或精确匹配
你这种情况比较适用于第2种方案, 方便又不失灵活
