Правильная ссылка на эту страницу
http://az-design.ru/Support/SoftWare/Delphi/D3/SB35BeginDrag.shtml

Глава 35. TCustomImageList.BeginDrag

Метод BeginDrag

Затрагиваемые объекты TCustomImageList, TImageList
Назначение Метод BeginDrag обеспечивает способ ассоциировать один из образов, содержащихся в списке, с окном посредством свойства HWND данного окна. Образ рисуется в позиции, определяемой значениями X и Y. Образ, ассоциированный с окном, выделяется параметром Index. Если все прошло успешно, функция возвращает True.
Объявление function BeginDrag(Window: HWND; X,Y: Integer): Boolean;
Пример синтаксиса
procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton;
                               Shift: TSiftState; X,Y: Integer);
Begin
   ImageList1.BeginDrag(Form1.Handle,X,Y);

end;
Описание        Данный пример взят из проекта DragDem.dpr на CD-ROM. Этот демонстрационный проект иллюстрирует использование объекта ImageList для поддержки перетаскивания образа внутри заданного окна. Обращение к BeginDrag принимает дескриптор окна, который будет действовать в качестве кадрирующей области для перетаскиваемого образа. При использовании данного метода во время операции перетаскивания курсор можно изменять. Обращение к BeginDrag содержит внутренний вызов Draglmage, который выделяет в списке образов образ 0 для использования в операции перетаскивания и устанавливает пиксел [0,0] (верхний левый) как горячую точку для перетаскиваемого образа. Если требуется использовать дру гой образ из списка или несколько горячих точек, следует применить метод DragLock. Более подробная информация об операции перетаскивания приведена в описании методов DragMove и EndDrag.

[Метод Add] [Метод AddIcon] [Метод AddImages] [Метод AddMasked] [Свойство AllocBy] [Метод Assign] [Метод BeginDrag] [Свойство BkColor] [Свойство BlendColor] [Метод Clear] [Свойство Count] [Метод Create] [Метод CreateSize] [Метод Delete] [Метод Destroy] [Свойство DragCursor] [Свойство Dragging] [Метод DragLock] [Метод DragMove] [Метод DragUnlock] [Метод Draw] [Свойство DrawingStyle] [Метод DrawOverlay] [Метод EndDrag] [Метод FileLoad] [Метод GetBitmap] [Метод GetHotSpot] [Метод GetIcon] [Метод GetImageBitmap] [Метод GetInstRes] [Метод GetMaskBitmap] [Метод GetResource] [Свойство Handle] [Метод HandleAllocated] [Свойство Height] [Метод HideDragImage] [Свойство ImageType] [Метод Insert] [Метод InsertIcon] [Метод InsertMasked] [Свойство Masked] [Метод Move] [Событие OnChange] [Метод Overlay] [Метод RegisterChanges] [Метод Replace] [Метод ReplaceIcon] [Метод ReplaceMasked] [Метод ResInstLoad] [Метод ResourceLoad] [Метод SetDragImage] [Свойство ShareImages] [Метод ShowDragImage] [Метод UnRegisterChanges] [Свойство Width]


<<< Пред. Оглавление
Начало раздела
След. >>>




Дата последнего изменения:
Thursday, 21-Aug-2014 09:10:56 MSK


Постоянный адрес статьи:
http://az-design.ru/Support/SoftWare/Delphi/D3/SB35BeginDrag.shtml