Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.10.06;
Скачать: CL | DM;

Вниз

Динамическое обращение к компонентам   Найти похожие ветки 

 
AAZ69   (2003-09-24 14:22) [0]

Мастера! Уточню вопрос - необходимо такое "Button"+IntToStr(Index) динамическое обращение к объекту типа TButton. Как это сделать? Благодарю!


 
Murad ©   (2003-09-24 14:28) [1]

Надо написать функцию ButtonByName(Name:String): TButton, которая будет искать в массиве Controls контрол с типом TButton и именем Name .


 
Murad ©   (2003-09-24 14:33) [2]

Да... а про FindComponent я и забыл...


 
Stas ©   (2003-09-24 14:37) [3]

if FindComponent ("Button"+IntToStr(index))<>nil then
FindComponent ("Button"+IntToStr(index)).font.color:=clBlue;


 
Skier ©   (2003-09-24 14:38) [4]

>Stas © (24.09.03 14:37)
Уверен ?


 
Stas ©   (2003-09-24 14:38) [5]

Т.е.
Так:if FindComponent ("Button"+IntToStr(index))<>nil then
Tbutton(FindComponent ("Button"+IntToStr(index))).font.color:=clBlue;


 
AAZ69   (2003-09-24 15:16) [6]

Благодарю за помошь



Страницы: 1 вся ветка

Текущий архив: 2003.10.06;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.02 c
4-18682
abc
2003-07-31 13:03
2003.10.06
как с помощью winAPI получить сетевое имя компа?


1-18292
Term
2003-09-24 10:15
2003.10.06
Всё таже проблема с СОМ-объектами....


1-18299
Mim
2003-09-24 09:35
2003.10.06
:)


1-18351
MakNik
2003-09-23 11:24
2003.10.06
Динамически заменять компоненты


1-18409
Olivka
2003-09-25 13:04
2003.10.06
Помогите с ООП