[Gad99]

нет, тот Label1 что указан в коде это статический, но я пробовал с динамическим и по другому For x2:= 2 to 5 do но один фиг ошибка вылазиет.
Сделал вот так

Код:

For x2 := 2 to 5 do
  Begin
    LabelArr[x2] := TLabel.Create(Self);
    LabelArr[x2].Left := 20;
    LabelArr[x2].Top := x2 * (LabelArr[x2].Height + 20);
    LabelArr[x2].Caption := 'динамический';
    LabelArr[x2].Name := 'MyLabel'+inttostr(x2);
    Parent := Text.Panel1;
  End;
  Text.Visible := true;
  Text.Label1.Caption := Predmet;
  Text.Label1.Left := (Text.Panel1.Width - Text.Label1.Width)Div 2;
  End;
end;

Один фиг вылазиет ошибка