| Лoгикa | - CounterEx |
CounterEx
Краткое описание
Компонент предназначен для создания в программе счетчиков различного назначения
Параметры
Методы
События
Свойства
Пример
Пример создания бесконечного реверсивного счетчика
Add(MainForm,2953706,140,91)
{
Width=371
Height=206
Caption="CounterEx"
}
Add(CounterEx,3012743,329,147)
{
Min=1
Max=10
Default=1
Point(doValue)
Point(onThroughMax)
Point(onThroughMin)
Point(doDirect)
Point(Direct)
Point(Max)
Point(Min)
link(onNext,11002303:doText,[])
link(onThroughMax,1648576:doData,[(387,160)(387,211)(331,211)(331,237)])
link(onThroughMin,7000761:doData,[(380,167)(380,205)(324,205)(324,279)])
}
Add(Label,11002303,406,147)
{
Left=125
Top=40
Width=100
Height=45
Font=[MS Sans Serif,24,1,0,1]
Caption="1"
AutoSize=1
Alignment=2
}
Add(Button,5658069,140,147)
{
Left=150
Top=105
TabOrder=-1
Caption="Start"
link(onClick,1230632:doTimer,[])
}
Add(Timer,1230632,189,147)
{
Interval=500
Enable=1
link(onTimer,14297138:doWork2,[])
}
Add(DoData,1648576,343,231)
{
link(onEventData,12276218:doEvent1,[])
link(Data,3012743:Max,[])
}
Add(DoData,7000761,350,273)
{
link(onEventData,12276218:doEvent2,[(394,279)(394,244)])
link(Data,3012743:Min,[])
}
Add(Hub,12276218,406,231)
{
InCount=2
OutCount=3
link(onEvent1,3012743:doValue,[(450,237)(450,320)(235,320)(235,160)])
link(onEvent2,3401999:doOperation,[(441,244)(441,314)(242,314)(242,237)])
link(onEvent3,14297138:doWork3,[(432,251)(432,308)(298,308)])
}
Add(HubEx,14297138,294,147)
{
link(onEvent,3012743:doNext,[])
}
Add(Math,3401999,252,231)
{
OpType=6
Op2=1
ResultType=0
link(onResult,3012743:doDirect,[(310,237)(310,167)])
link(Op1,3012743:Direct,[(258,194)(342,194)])
}
Замечания
Обновление элемента: [svn]CounterEx.pas[/svn]
BB-code статьи для вставки
Всего комментариев: 0
(комментарии к статье еще не добавлены)