Всем Салам Алейкум, давно не захаживал.

Итак, коротко о главном: взял, значит, я один PaintBox, растянул на всю форму и решил организовать на этом PaintBox-е систему Drag&Drop. Для этого заполнил соответствующим кодом обработчики событий MouseUp, -Move, -Down. Работает всё отлично (объекты перетаскиваются), только при перемещение мыши (во время перетаскивания объекта) начинается такое мерцание, что кушать не хочиться (вследствие частого вызова функции Repaint()).

Многоуважаемые коллеги, поделитесь, пожалуйста, мыслишками по этому поводу. Как бы этот побочный эффект сгладить.

Заранее благодарен, ваш ЮхаМурад!

1. Можно задизейблить его на время.
2. Зачем Repaint()?

1. Это как (и на какое время)?

2. Как зачем - чтоб обновить канву PaintBox-а (посылка сообщения WM_PAINT).

Попробуй вместа Repaint вызывать
InvalidateRect(PaintBox->Parent->Handle,&rc,true); где
rc=OffsetRect(&RC,PaintBox->Left,PaintBox->Top);
где RC - прямоугольник (TRect или RECT), описывающий объект, который надо перерисовать (в координатах относительно PaintBox). Можно попробовать и false третьим параметром передавать.

Adil', ты гений. Спасибо тебе большое. Ты сэкономил кучу моих часов.

Однако, (в виду моей ненасытности) сам объект по-прежнему мерцает. Боюсь пользователь мне этого не простит.

(К сведенью для его прорисовки выводятся две строки текста и два прямоугольника).

Цитата(Guest @ 21.6.2005, 16:52)

(К сведенью для его прорисовки выводятся две строки текста и два прямоугольника).

Покажи код прорисовки и расскажи о месте где, этот код.

Надо его прорисовку не в PaintBox-е вести. Он долго расчитывает всякую ерунду. В самой форме рисуй.