[stalker_174]

Всем привет. Столкнулся с проблемкой при написании игрушки. В общем, на форме есть рисунок Image1 и таймер, в таймере такой код:

procedure TForm1.Timer1Timer(Sender: TObject);
begin
Image1.top:=Random(Form1.height) + 1;
Image1.left:=Random(Form1.width) + 1;
end;

таймер постоянно в случайном порядке двигает картинку на форме. Проблема в том, что клик на картинку мышкой (попадание в цель) должен зачисляться как очко в какую-нибудь переменную и выводиться в Label1 на форме, а если "очков" станет 10, то showmessage('Вы выиграли!'); Помогите плз
И что бы картинка не выходила за грани формы