Здравствуйте.
Требуется динамическое создание полей для формы ввода. Вся форма однотипная, но сохраняемых данных много. К чему я клоню. Есть 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.
но выдает ошибку, что
Цитата:
|
Cannot assign a TGroupBox to a TGroupBox
|
Подскажите, как лучше сделать?