...
inherited Create; //вызываем родительский конструктор
...
dx:=Round(IntPower(-1,Random(9))); //dx = округлить_до_целого((-1) в степени (случайное число от 0 до 9))
dy:=Round(IntPower(-1,Random(9))); //аналогично
...
xx:=10+Random(Form_Main.ClientWidth-20);  //xx = случайная координата в пределах клиентской области окна, исключая 10 писк. по краям
yy:=10+Random(Form_Main.ClientHeight-20); //то же самое, только по вертикали
....