Вверх ↑
Разработчик
Ответов: 26151
Рейтинг: 2127
#1: 2008-02-20 02:43:54 ЛС | профиль | цитата
millano, ну можно вот так, без всяких конверторов



Add(MainForm,7867007,154,91)
{
Left=20
Top=105
Width=313
Height=95
}
Add(FormatStr,11049589,350,217)
{
Mask="%1:%2"
link(onFString,8511339:doText,[])
link(Str1,1853037:Result,[(356,205)(310,205)(310,261)(265,261)])
}
Add(Time,4162022,210,91)
{
Format="h:m"
Point(DateTime)
}
Add(Label,8511339,413,217)
{
Left=90
Top=10
Width=205
Height=45
}
Add(Memory,11050659,259,91)
{
Default=String(00:02)
}
Add(FastMathParse,10212874,210,217)
{
MathStr="%1 - %2"
ResultType=0
link(onResult,1853037:doOperation,[])
link(X1,6327890:Result,[])
link(X2,8362289:Result,[(223,198)(265,198)])
}
Add(Button,11814258,154,147)
{
Left=10
Top=15
link(onClick,6327890:doSplit,[])
}
Add(PointHint,163734,392,175)
{
Info=#24:результат вычеслений....|
Transparent=0
VAlign=0
Width=85
Height=95
}
Add(MultiElementEx,8362289,259,147)
{
elink(6327890)
link(Str,11050659:Value,[])
link(onResult,10212874:doCalc,[(303,153)(303,188)(198,188)(198,223)])
}
Add(MultiElementEx,6327890,210,147)
{
@IsLib=True
link(Str,4162022:FormatTime,[])
link(onResult,8362289:doSplit,[])
}
BEGIN_SDK
Add(EditMultiEx,12450022,21,21)
{
WorkCount=#7:doSplit|
EventCount=#8:onResult|
VarCount=#6:Result|
DataCount=#3:Str|
Width=104
Height=151
link(doSplit,15348720:doSplit,[(35,27)(35,55)])
link(Result,10491500:Result,[(27,154)(55,154)])
}
Add(StrPart,15348720,49,49)
{
Char=":"
Point(Left)
link(onSplit,10491500:doCalc,[(93,55)(93,87)(37,87)(37,104)])
link(Str,12450022:Str,[(55,35)(27,35)])
}
Add(FastMathParse,10491500,49,98)
{
MathStr="%1*60 + %2"
ResultType=0
link(onResult,12450022:onResult,[(103,104)(103,27)])
link(X1,15348720:Left,[])
}
END_SDK
Add(Math,1853037,259,217)
{
OpType=7
Op2=60
ResultType=0
link(onResult,14993965:doOperation,[])
}
Add(Math,14993965,308,217)
{
OpType=8
Op2=60
ResultType=0
link(onResult,11049589:doString,[])
link(Op1,10212874:Result,[(314,205)(265,205)(265,261)(216,261)])
}

карма: 22

0