Текущий архив: 2003.07.31;
Скачать: CL | DM;
Вниз
Поменять свойства у однаковых компонентов Найти похожие ветки
← →
vil © (2003-07-17 13:11) [0]На форме есть несколько одинаковых
Lable1
Lable2
Lable3
Lable4... (отличаются только цифрой в конце Name)
Как покомпактней (в смысле код не раздувать)у всех этих компонентов поменять свойство
Lable1.Visible:=true
← →
Skier © (2003-07-17 13:16) [1]LabelsOwner.FindComponent(...) + кастинг.
← →
Mike_Goblin © (2003-07-17 13:17) [2]Приблизительно так:
for Cnt:=0 to Form1.ComponentCount-1 do
if Form1.Components[Cnt] is TLabel then
TLabel(Form1.Components[Cnt]).Visible:=true;
← →
Leshiy © (2003-07-17 14:13) [3]Если только лейблы и количество известно то:
for i:=1 to n do
TLabel(FindComponent("Label"+IntToStr(i))).Visible:=true;
Страницы: 1 вся ветка
Текущий архив: 2003.07.31;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.013 c
