[Rokuell]

Вот так:

Код:

Form1.Left:=Random(Screen.WorkAreaWidth-Form1.Width+1);
Form1.Top:=Random(Screen.WorkAreaHeight-Form1.Height+1);