Показать сообщение отдельно
  #2  
Старый 06.05.2009, 13:05
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,087
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Смотря какие объекты.
Собственно, для именно копирования предназначен метод Assign. Если это товй объект, то ты олжен соответсвенно реализовать этот метод. По сути - это просто присваивание всех полей одного инстанса другому...

Код:
var
  NewLabel : TLabel;
begin
  NewLabel := TLabel.Create(Self);
  NewLabel.Assign(Label1); // Label1 - создана во время дизайна, например.
end;
Ответить с цитированием