Корректно ли так заполнять массив? Опции

[VEDA]

constructor ТContFigur.Create();
var i: integer;
begin
  inherited Create();
  SetLength(MassF, 0);
  for i := 0 to Length(MassF)-1 do
	begin
	  SetLength(MassF,Length(MassF)+1);
	  MassF [Length(MassF)-1]:= MassF[i];
   end;
end;

Уже не соображаю ничего , вроде правильно, хочу перестраховаться

[VEDA]

объект figure у меня создается на Unit1 (рабочая программа), несчастный MassF заполняется там. Unit2 это как-бы демо с иерархией классов по ООП. Можно ли в таком случае оставить последний вариант конструктора?