Вверх ↑
Разработчик
Ответов: 26151
Рейтинг: 2127
#1: 2008-02-19 23:27:01 ЛС | профиль | цитата
Разницу до суток можно считать вот так



Add(MainForm,7867007,287,273)
{
Left=20
Top=105
Width=237
Height=155
}
Add(Time,4162022,399,273)
{
Format="h:m"
Point(DateTime)
}
Add(Button,16118727,287,392)
{
Left=15
Top=10
Width=100
Caption="Сидоров Пришел"
link(onClick,16736913:doEvent1,[])
}
Add(Hub,16736913,336,392)
{
link(onEvent1,14860867:doValue,[])
link(onEvent2,5746570:doConvert,[(450,405)(450,440)])
}
Add(GetData,13471820,406,329)
{
Count=4
link(Data,4162022:DateTime,[])
}
Add(Button,789470,287,567)
{
Left=15
Top=40
Width=100
Enabled=1
Caption="Сидоров ушел"
Point(doEnabled)
link(onClick,12502218:doEvent1,[])
}
Add(DateConvertor,9893822,406,511)
{
Mode=9
Format="HH:mm"
Point(Data)
link(onResult,11453284:doText,[])
link(Data,13471820:Data1,[])
}
Add(DateConvertor,5746570,532,434)
{
Mode=9
Format="HH:mm"
Point(Data)
link(onResult,14329939:doText,[])
link(Data,13471820:Data2,[(538,418)(419,418)])
}
Add(Hub,12502218,350,567)
{
link(onEvent1,14402895:doCalc,[])
link(onEvent2,9893822:doConvert,[(394,580)(394,517)])
}
Add(ChanelToIndex,10106804,679,385)
{
link(onIndex,789470:doEnabled,[(737,391)(737,482)(275,482)(275,573)])
}
Add(MathParse,14402895,623,567)
{
MathStr="trunc(%2) + %1 - %2"
link(onResult,7991591:doConvert,[])
link(X1,13471820:Data3,[(629,464)(426,464)])
link(X2,14860867:Value,[])
}
Add(Label,7101239,735,567)
{
Left=120
Top=65
Width=100
Height=20
AutoSize=1
}
Add(Label,14329939,581,434)
{
Left=120
Top=10
Width=100
Height=20
AutoSize=1
}
Add(Label,11453284,455,511)
{
Left=120
Top=40
Width=100
Height=20
AutoSize=1
}
Add(Memory,14860867,630,392)
{
Point(Data)
link(onData,10106804:doWork2,[])
link(Data,13471820:Data4,[(636,376)(433,376)])
}
Add(DateConvertor,7991591,679,567)
{
Mode=9
Format="HH:mm"
Point(Data)
link(onResult,7101239:doText,[])
}

карма: 22

0