Получение количества и списка всех компонентов на TNoteBook |
![]() |
![]() |
Статьи |
Следующий пример демонстрирует получение списка страниц в компоненте TNoteBook и список компонентов на каждой странице TNoteBook. Список добавляется в компонент ListBox. Поместите на форму компоненты: TNoteBook (Notebook1), TButton (Button1) и TListBox (ListBox1). В компонент TNoteBook поместите какие-либо компоненты (например, кнопку, метку и текстовое поле). Запишите следующий код в обработчик события кнопки Button1Click.
При выполнении программы и нажатии на кнопку Button1 в ListBox будет выведен список всех компонентов, которые находятся внутри NoteBook. |