button an eine andere position 'springen'

[alanblack]

Hi,

ja ich hab das schon versucht:

Delphi-Quellcode:

 
Button1.Visible:=false;
Button1.Left:=random(Form1.Width-121);
Button1.Top:=random(Form1.Height-40);
Button1.Visible:=true;

nur leider fährt der button eher mit der maus mit. Was kann ich tun das der richtig weg springt und dann auch solange bleibt bis man wieder versucht drauf zu klicken?