Всем доброго времени суток. Прошу подсказать решение следующей задачи. Рисую на канве компонента Draw3D (Delphi 2007). Поверх этого компонента выводятся различные формы. Их, естественно, можно перемещать мышкой.  Для перерисовки канвы при перемещении форм использую события самих этих форм - OnEndDrag  и т.п. в обработчике которых перерисовываю канву.  Но если выводится форма сообщения через функцию Showmessage или форма проводника через функцию ShellExecute, то их перемещение стирает канву и я никак не могу подобрать события компонента Draw3D для перерисовки канвы при перемещении этих форм. События OnDragOver, OnEndDrag, OnPaint и т.п. почему-то не работают. Что в этом случае нужно сделать?
Спасибо.

Почему бы не использовать событие OnPaint самого компонента Draw3D?

Оно почему-то не генерируется. Может, нужно что-то в свойствах изменить. Сам пока не нашел. По крайней мере по этому событию перерисовки канвы не происходит. Для описанного случая удалось только-что сделать перерисовку через событие  OnPaint самой формы, но при этом чуть только мышь уходит в область кнопок сразу начинается мерцание - перерисовка идет одна за одной. 

Установите свойство BufferedDisplay := False и напишите обработчик события OnPaint. Проверил — всё работает. 

Добавлено через 5 минут и 43 секунды

Да, действительно. У меня это свойство стояло в true. Большое спасибо Amphiluke , удачи, здоровья.