Перемещение картинки по экрану...

[Erlotaza]

Я только начинаю изучать Делфи... Вот захотелось программу, чтобы при нажатии на кнопку картинка двигалась с правого края в левый...
Я добавил таймер и кликнув по нему 2 раза написал: Image2.Left:=825; Тоесть начальное положение картинки - на расстоянии 825 пикселей от левого края. Теперь хочу чтобы расстояние сокращалось (картинка двигалась) влево, но поскольку с начальными знаниями туго, не знаю как это организовать...
Я пытался так:
Image2.Left:=825;
i:=40;
while Image2.Left>50 do
Image2.Left:=Image2.Left-i;
i:=i+i;
НО: при щелчке на кнопку(они связаны с таймером) картинка висит на месте 1сек, а потом сразу прыгает в последнее положение (к левому краю), процесса передвижения нет. В таймере стоит 1000 (тоесть 1 сек).
Что сделать, чтобы было видно как картинка двигается?

[VIK_aka_TOR]

уберте цикл...
и в таймере просто напишите

Image2.Left:= Image2.Left - 20; // 20 - число на сколькосместится... 
if (Image2.Left < 50) then // когда подбираемся к краю, то отрубаем таймер... 
Timer1.Enabled := false;

в вашем варианте вы уменьшьшаете растояние от левого края до минимума (50 примерно) и затем изменяете положеие...
чем меньше циферка (20) и чем меньше интервал - тем плавнее будет ваше выполнение

[Erlotaza]

БОЛЬШОЕ СПАСИБО! Проще, чем я думал!
Кстати, это мой самый 1-ый вопрос на форуме, тут просто на весы кликаю и всё? Не надо закрывать вопрос или еще что...?

[VIK_aka_TOR]

закрыть не получится)... на весы кликнуть будет весьма кстати и оставить положительный комент... ну и на будущее оформляять код соответствующий образом используя решетку # ... удачи)