|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Дублирование/копирование объектов на форме
Здравствуйте.
Требуется динамическое создание полей для формы ввода. Вся форма однотипная, но сохраняемых данных много. К чему я клоню. Есть GroupBox с формой внутри: На форме это должно выглядеть так (сделал в paint): Собственно, вопрос вот в чем. Неужели каждый из компонентов в GroupBox нужно прописывать отдельно кодом, указывая выравнивание, шрифты и координаты? Или может есть какой-то метод, который "по клику" позволит скопировать группу компонентов и поставить в нужные координаты в нужного родителя? Подумал, что может Assign сработает: Код:
procedure Tfrm.btn_addUrlClick(Sender: TObject); var newGroupBox: TGroupBox; begin newGroupBox := TGroupBox.Create(frm); newGroupBox.Assign(gbox_example_item); newGroupBox.Parent := sb_main; end; end. Цитата:
Подскажите, как лучше сделать? |