Показать сообщение отдельно
  #2  
Старый 17.05.2014, 12:35
Sphynx55 Sphynx55 вне форума
Прохожий
 
Регистрация: 15.05.2014
Сообщения: 13
Версия Delphi: Delphi 7
Репутация: 10
По умолчанию

Если двигать объект по форме, то:
1. создайте переменные - текущие координаты объекта, координаты клика;
2. при клике по форме сохраняйте координаты клика.
3. на таймер вешайте процедуру уменьшающую разность между координатами клика и координатами объекта, на 1 квант движения (например 1 пиксель);
4. перерисуйте форму.
Ответить с цитированием