[mkw-best]

А можно элементарный пример. Я сделал перемещение объекта с помощью таймера. Но этот метод закрашивает всэ область в определенный цвет. И мышью устанавливаю в указанную область рисунок. Но этот метод мне не подойдет, потому что я не могу нарисовать еще один объект, т.к. стирается старый. А как ваш метод использовать, вернее как прописать маленько не понимаю. Не поможете?

В событии OnDragOver (формы или панели) необходимо указать какие компоненты принимать для перемещения (Accept:=Source is TImage) Свойство объекта DragMode=Automatic. Как то так, должно работать и в VB, просто давно не пишу в VB. »