Копирование свойств объекта

← →
Frozzen (2004-11-28 14:56) [0]

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

TCoordPoint = class(TObject)
x, y :integer;
lat, long :real;
r :real;
constructor Create(xx, yy, rr : real);
destructor Destroy;
end;

В процедуре работы с листом

p := TCoordPoint.Create(0,0,0);
p := Assign(Items[0]); //???????????????
Insert(0, p);

← →
Суслик © (2004-11-28 14:57) [1]

ничего само делаться не будет.

Ты должен сам написать Assign, где будешь копировать нужные свойства.

← →
Frozzen (2004-11-28 15:04) [2]

Подскажите как правельно

← →
Frozzen (2004-11-28 15:05) [3]

просто в ассигн переприсваевание полей написать

← →
Frozzen (2004-11-28 15:05) [4]

просто в ассигн переприсваевание полей написать

> просто в ассигн переприсваевание полей написать

да
все делаешь ручками сам.

Копирование свойств объекта Найти похожие ветки