АШ
Алексей Шульгин
procedure TForm1.Button1Click(Sender: TObject);
begin
Randomize;
with TLabel.Create(Form1) do
begin
Caption := 'Label';
Top := Random(Form1.ClientHeight);
Left := Random(Form1.ClientWidth);
Parent := Form1;
end;
end;
сделай его изначально невидимым, а потом Properties меняешь в теле проги, и она у тебя появится)