Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 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.019 c
3-100568
62mkv
2003-07-08 13:12
2003.07.31
BDE 5.2


6-100866
dzmitry_
2003-04-20 12:57
2003.07.31
GetHideShare


7-101004
Zero Ice
2003-05-21 16:43
2003.07.31
I/o ports


1-100727
Navi
2003-07-19 08:06
2003.07.31
Новый шрифт в компоненте


1-100781
Vick
2003-07-15 13:25
2003.07.31
Память занимаемая приложением