| Менеджеры | - DropFileManager |
DropFileManager
Краткое описание
Предназначен для приёма, сброшенных на контрол, объектов файловой системы через механизм OLE
Параметры
Методы
События
Примеры
#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
(комментарии к статье еще не добавлены)