Коллекция контролов на форме (или странице, например)

Вопросы программирования и использования среды Lazarus.

Модератор: Модераторы

Коллекция контролов на форме (или странице, например)

Сообщение yanis » 14.07.2012 16:56:51

Здравствуйте.

Возможно ли в Лазарусе перебрать все контролы внутри текущего, примерно как ниже написано?
Код: Выделить всё
Dim ctl As Control
For Each ctl In Me.Controls
  Debug.Print ctl.Name
Next ctl


Заранее спасибо.
yanis
незнакомец
 
Сообщения: 6
Зарегистрирован: 14.07.2012 16:47:37

Re: Коллекция контролов на форме (или странице, например)

Сообщение B4rr4cuda » 14.07.2012 18:36:18

Код: Выделить всё
for i:=0 to control.componentsCount-1 do
         showmessage(control.components[i].name);
Аватара пользователя
B4rr4cuda
энтузиаст
 
Сообщения: 693
Зарегистрирован: 28.12.2007 07:48:35

Re: Коллекция контролов на форме (или странице, например)

Сообщение yanis » 14.07.2012 20:21:14

Спасибо за направление, все глаза проглядел, а нужного свойства не видел.
Работающий код
Код: Выделить всё
for i:=0 to ControlCount-1 do
         showmessage(Controls[i].Name);
yanis
незнакомец
 
Сообщения: 6
Зарегистрирован: 14.07.2012 16:47:37


Вернуться в Lazarus

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 241

Рейтинг@Mail.ru