-
Привет Подскажите как штатно сделать плавное переползание при drag&drop То есть - упрощая ситуацию - есть TImage, которую надо drag-drop на TPanel - и при этом надо показывать перемещения по TForm, на которых TPanel и TImage. Делаем обычно. Но при наезжании части TImage на TPanel, TImage перестает ползти-показываться в DragOver на TForm, то есть хвост рисунка уже не показывает, а на TPanel показывается пока еще только голова. НЕ ДЕЛО, НЕКРАСИВО КАК НЕДОРАБОТКА. Как продолжить отображение рисунка TImage на TForm, пока рисунок целиком ещё не переполз?
-
> [0] Organizer © (14.06.11 19:07)
один раз прочитал - не понял сразу что имеется ввиду, второй раз читать не стал, чтобы не травмировать мозг. но могу сказать одно - глянь в сторону TImageList, если не изменяет память, там есть спец. функционал для отображения DnD.
-
Пока тащу, но не drag-drop-но, параллельно ещё один TImage с тем же рисунком.
PS Да в Delphi 7 TImage не позволяет динамически изменять рисунок (ЭТО ДРУГОЙ ВОПРОС, НО ТОЖЕ СТОЯЛ :: начал писать на Delphi 7, так как весь проект на Delphi 7), но в Delphi XE в этом ОК и легко.
Мутить через указатели через TImageList тоже возможно.
-
TImageList.SetDragImage, TImageList.BeginDrag и т.д. дальше сам.
|