[lmikle]

Путем вызова конструктора нужного класса. Например, создаем 100 лаблов:

Код:

var
  I : Integer;
begin
  For I := 1 To 100 Do
    With TLabel.Create(Self) Do
      Begin
         Parent := Self;
         Top := I * 10;
         Left := 100
         Caption := 'label' + IntToStr(I);
      End;
end;