Вверх ↑
Пакеты 
HiAsm4
Windows 
Компоненты 
Интерфейс 
Менеджеры - DropFileManager

DropFileManager
Краткое описание
   Предназначен для приёма, сброшенных на контрол, объектов файловой системы через механизм OLE
Параметры
  • ControlManager - Контрол для приёма сбрасываемых объектов
  • DropType - Тип операции приёма сброшенных объектов
  • Методы
  • doListen - Разрешает приём сброшенных объектов на контрол
  • doStop - Запрещает приём сброшенных объектов на контрол
  • События
  • onDrop - Происходит после сброса объектов на контрол и содержит их имена в потоке
  • onDropEnd - Происходит после завершения сброса всех объектов и содержит в потоке количество сброшенных объектов
  • onDragEnter - Происходит, когда курсор мыши входит в пределы контрола и содержит в потоке состояние нажатых клавиш
  • onDragOver - Происходит во время перетаскивания над контролом и содержит в потоке состояние нажатых клавиш
  • onDragLeave - Происходит, когда курсор мыши покидает пределы контрола или пользователь отменяет операцию перетаскивания
  • Примеры
    
    #sha
    Add(MainForm,8891244,112,56)
    {
    Width=386
    Height=322
    Name="DropControl"
    MouseCapture=0
    Position=1
    link(onCreate,3153448:doListen,[])
    }
    Add(ListBox,12125061,231,70)
    {
    Left=45
    Top=35
    Width=290
    Height=225
    MultiSelect=0
    Point(onMouseMove)
    }
    Add(Label,14652844,280,140)
    {
    Left=110
    Top=15
    Width=225
    AutoSize=1
    Alignment=2
    }
    Add(Hub,2369301,231,140)
    {
    link(onEvent1,14652844:doText,[])
    link(onEvent2,10850364:doCase,[(259,153)(259,202)])
    }
    Add(Case,10850364,273,196)
    {
    Value=Integer(5)
    DataOnTrue=Integer(2)
    link(onNextCase,12523410:doCase,[])
    link(onTrue,15836612:doWork1,[(312,209)])
    }
    Add(Case,12523410,322,196)
    {
    Value=Integer(9)
    DataOnTrue=Integer(1)
    link(onNextCase,10729268:doCase,[])
    link(onTrue,3123480:doWork1,[(361,209)])
    }
    Add(Case,10729268,371,196)
    {
    Value=Integer(33)
    DataOnTrue=Integer(3)
    link(onNextCase,4543300:doData,[])
    link(onTrue,4941063:doWork1,[(410,209)])
    }
    Add(DoData,4543300,420,196)
    {
    Data=Integer(0)
    link(onEventData,4941063:doWork2,[(470,202)(470,240)])
    }
    Add(HubEx,4941063,406,234)
    {
    Angle=2
    link(onEvent,3123480:doWork2,[])
    }
    Add(HubEx,3123480,357,234)
    {
    Angle=2
    link(onEvent,15836612:doWork2,[])
    }
    Add(HubEx,15836612,308,234)
    {
    Angle=2
    link(onEvent,3153448:doDropType,[(163,240)(163,90)])
    }
    Add(DropFileManager,3153448,175,70)
    {
    ControlManager="DropControl"
    Point(doDropType)
    Point(onDragOver)
    link(onDrop,12125061:doAdd,[])
    link(onDragOver,2369301:doEvent1,[(222,90)(222,146)])
    }
    Add(Button,12590604,112,91)
    {
    Left=50
    Top=10
    Caption="Stop"
    link(onClick,3153448:doStop,[(158,97)(158,83)])
    }
    Замечания
    Обновление элемента: [svn]DropFileManager.pas[/svn]
    BB-code статьи для вставки
    Всего комментариев: 0
    (комментарии к статье еще не добавлены)
    Комментарий
    ...