title: Delphi - Image move randomly inside desktop coordinates
body: <p>I want to created a small application, which should move images smoothly into the desktop coordinates.
  I was wondering how can I limit that the image remains inside the desktop? 
  I have try like that to move the image:</p>
  
  <pre><code>procedure TForm1.Timer1Timer(Sender: TObject);
  Var
    X, Y :Integer;
  begin
    X:= random(2+1);
     Y:= random(2+1);
      Image1.Left:= Image1.Left + X;
       Image1.Top:= Image1.Top + Y;
        Image1.Refresh;
  end; 
  </code></pre>
  
  <p>Any help is appreciated. </p>
  
  <p>Thanks. </p>