[Gad99]

создаем, тут все нормально. Компонент появляется

Код:

procedure TForm1.CreateLabel(X : Integer);
var
  l : TLabel;
begin
  while X > 0 do begin
    l := TLabel.Create(Self);
    l.Name := 'test';
    l.Left := 50;
    l.Top  := X * 50;
    l.Parent := Text.Panel1;
    Dec(X);
  end;
end;

Возвращает NIL

Код:

CreateLabel(1);
  Text.Visible := true;
  l := TLabel(Text.FindComponent('test'));
  if l <> nil then begin
                   l.Caption := predmet;
                   l.Left := (Text.Panel1.Width - l.Width)Div 2;
                   end;