procedure Form1.button1_Click (sender: Object; e: EventArgs); begin PictureBox2.Top:=200; var rnd: Random:=new Random(); PictureBox2.Left:=rnd. Next(300); PictureBox2.Visible:= True; end.