Возможно ли в Лазарусе перебрать все контролы внутри текущего, примерно как ниже написано?
Код: Выделить всё
Dim ctl As Control
For Each ctl In Me.Controls
Debug.Print ctl.Name
Next ctlЗаранее спасибо.
Модератор: Модераторы
Код: Выделить всё
Dim ctl As Control
For Each ctl In Me.Controls
Debug.Print ctl.Name
Next ctlКод: Выделить всё
for i:=0 to control.componentsCount-1 do
showmessage(control.components[i].name);
Код: Выделить всё
for i:=0 to ControlCount-1 do
showmessage(Controls[i].Name);