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

[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;

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

[Client]

var
  massF:array of integer;
  i,j:integer;
begin
  SetLength(MassF, 0);
  j:= Length(MassF)-1;
  for i := 0 to Length(MassF)-1 do begin
    SetLength(MassF,Length(MassF)+1);
    MassF [Length(MassF)-1]:= MassF[i];
  end;
end;

Если массив целочисленный, то там только 1 элемент - ноль. А что там вообще должно быть?