Вверх ↑
Ответов: 9906
Рейтинг: 351
#1: 2016-12-07 16:46:12 ЛС | профиль | цитата
А так -- знал
Add(StrList,10725993,84,49)
{
Strings=#14:15;34;1 грн.;1|14:15;61;2 грн.;2|14:15;88;5 грн.;5|17:15;115;10 грн.;10|17:15;142;20 грн.;20|17:15;169;50 грн.;50|19:15;196;100 грн.;100|19:15;223;200 грн.;200|19:15;250;500 грн.;500|17:237;34;1 коп.;.01|17:237;61;2 коп.;.02|17:237;88;5 коп.;.05|18:237;115;10 коп.;.1|18:237;142;20 коп.;.2|18:237;169;50 коп.;.5|18:237;196;100 коп.;1|
}
Add(MainForm,2155641,42,91)
{
Width=462
Height=348
Caption="Купюрний калькулятор v. 1.2"
BorderStyle=1
Position=1
link(onCreate,6225837:doEnum,[])
}
Add(Label,1185450,504,273)
{
Left=245
Top=281
Width=55
Height=20
Font=[MS Sans Serif,10,1,16711680,1]
Caption="Всього"
AddHint(42,0,51,13,Caption)
}
Add(Label,6240223,504,224)
{
Left=240
Top=257
Width=105
Height=17
Font=[MS Sans Serif,8,1,16711680,1]
Caption="Банкнот на суму"
AutoSize=1
Alignment=1
AddHint(42,0,99,13,Caption)
}
Add(Label,5419731,210,168)
{
Left=313
Top=17
Width=109
Height=17
Font=[MS Sans Serif,8,0,16711680,1]
Caption="Кiлькiсть Сума"
}
Add(Label,10562300,504,168)
{
Left=240
Top=229
Width=105
Height=17
Font=[MS Sans Serif,8,1,16711680,1]
Caption="Копiйок на суму"
AutoSize=1
Alignment=1
AddHint(42,0,96,13,Caption)
}
Add(Button,1549137,42,224)
{
Left=89
Top=278
Width=130
Height=22
Font=[MS Sans Serif,8,1,0,1]
TabOrder=-1
Caption="Х"
Data=Integer(0)
link(onClick,14638256:doValue,[])
}
Add(Label,10454734,98,168)
{
Left=90
Top=17
Width=109
Height=17
Font=[MS Sans Serif,8,0,16711680,1]
Caption="Кiлькiсть Сума"
}
Add(Edit,11726592,455,168)
{
Left=355
Top=228
Width=85
Color=-16777201
Font=[MS Sans Serif,10,1,128,1]
Ctl3D=1
Text="0.00"
Alignment=1
ReadOnly=0
}
Add(Edit,8916136,455,224)
{
Left=355
Top=254
Width=85
Color=-16777201
Font=[MS Sans Serif,10,1,128,1]
Ctl3D=1
Text="0.00"
Alignment=1
ReadOnly=0
}
Add(Edit,5357503,455,273)
{
Left=312
Top=279
Width=128
Font=[MS Sans Serif,10,1,128,1]
Text="0.00"
Alignment=1
ReadOnly=0
}
Add(GlobalVarEx,14638256,98,224)
{
Name="Reset"
Point(onValue)
}
Add(ArrayEnum,6225837,98,105)
{
link(onItem,9227178:##add,[])
link(Array,10725993:Array,[])
}
Add(ChildPanelEx,9227178,154,105)
{
Mode=1
link(onExe,12660521:doCompare,[(193,111)(193,104)])
link(onChange,4970226:doEvent1,[])
}
BEGIN_SDK
Add(EditMultiEx,514214,28,21)
{
WorkCount=#5:##add|
EventCount=#5:onExe|8:onChange|
VarCount=#12:##eventIndex|
Width=293
Height=172
VOffset=126
Point(##add)
Point(##eventIndex)
link(##add,15045843:doSplit,[(39,153)(39,41)])
}
Add(Panel,8997566,259,28)
{
Left=15
Top=34
Width=203
Height=20
BorderWidth=0
BevelInner=0
BevelWidth=0
Point(doLeft)
Point(doTop)
}
Add(Math,4839761,161,98)
{
OpType=2
link(onResult,15933829:doConvert,[])
link(Op1,15045843:RemaindStr,[])
}
Add(Edit,10918503,112,98)
{
Left=75
Font=[MS Sans Serif,10,1,0,1]
Text="0"
Alignment=1
DataType=1
Point(onSetFocus)
Point(doSelectAll)
link(onChange,4839761:doOperation,[])
link(onSetFocus,4778484:doTimer,[(151,118)(151,139)(53,139)(53,118)])
}
Add(Edit,2391122,259,98)
{
Left=135
Width=68
Color=-16777201
Font=[MS Sans Serif,10,1,128,1]
Ctl3D=1
Text="0.00"
Alignment=1
ReadOnly=0
link(onChange,514214:onChange,[(298,104)(298,160)])
}
Add(Timer,4778484,63,112)
{
Interval=0
Enable=1
AutoStop=1
link(onTimer,10918503:doSelectAll,[])
}
Add(GlobalVarEx,13794200,49,84)
{
Name="Reset"
Point(onValue)
link(onValue,10918503:doText,[(102,90)(102,104)])
}
Add(Label,2595383,210,49)
{
Top=3
Width=55
Height=17
Font=[MS Sans Serif,8,0,16711680,1]
Caption="50 грн."
AutoSize=1
Alignment=1
}
Add(GlobalVarEx,4921011,105,147)
{
Name="Exe"
Point(onValue)
link(onValue,12143035:doData,[])
}
Add(DoData,12143035,161,147)
{
link(onEventData,514214:onExe,[])
link(Data,4839761:Result,[])
}
Add(MultiStrData,15045843,161,35)
{
Count=3
link(onPart1,8997566:doLeft,[])
link(onPart2,8997566:doTop,[])
link(onPart3,2595383:doText,[])
}
Add(ConvertorEx,15933829,210,98)
{
Mode=15
Digits=0
Width=3
link(onResult,2391122:doText,[])
}
END_SDK
Add(Label,15808239,154,168)
{
Left=243
Top=17
Width=46
Height=17
Font=[MS Sans Serif,8,0,16711680,1]
Caption="Номiнал"
AutoSize=1
Alignment=1
}
Add(Label,8200870,42,168)
{
Left=15
Top=10
Width=55
Height=24
Font=[MS Sans Serif,8,0,16711680,1]
Caption="Номінал \r\nбанкноти"
AutoSize=1
Alignment=1
}
Add(Hub,4970226,259,112)
{
OutCount=6
link(onEvent1,10568750:doClear,[])
link(onEvent2,13272189:doClear,[(396,125)(396,111)])
link(onEvent3,16239112:doValue,[])
link(onEvent4,13326286:doConvert,[(298,139)(298,174)])
link(onEvent5,12233147:doConvert,[(291,146)(291,230)])
link(onEvent6,15021394:doOperation,[(284,153)(284,279)])
}
Add(GlobalVarEx,16239112,308,126)
{
Name="Exe"
Point(onValue)
}
Add(If_else,12660521,210,98)
{
Type=4
Op2=Integer(9)
link(onTrue,13272189:doOperation,[])
link(onFalse,10568750:doOperation,[])
link(Op1,9227178:##eventIndex,[(216,89)(202,89)(202,145)(160,145)])
}
Add(Math,15021394,357,273)
{
link(onResult,8723845:doConvert,[])
link(Op1,2932909:Var2,[])
link(Op2,302716:Var1,[(370,152)])
}
Add(GetDataEx,302716,406,147)
{
link(Data,4411354:Var2,[])
}
Add(Math,13272189,406,98)
{
Point(doClear)
link(Op2,4411354:Var3,[(419,89)(426,89)(426,138)])
}
Add(GetDataEx,4411354,406,133)
{
link(Data,13272189:Result,[])
}
Add(Math,10568750,357,105)
{
Point(doClear)
link(Op2,12745616:Var3,[(370,96)(377,96)(377,145)])
}
Add(GetDataEx,12745616,357,140)
{
link(Data,10568750:Result,[])
}
Add(GetDataEx,2932909,357,203)
{
link(Data,12745616:Var2,[])
}
Add(StyleXP,14057409,42,273)
{
}
Add(ConvertorEx,8723845,406,273)
{
Mode=15
Digits=0
Width=3
link(onResult,5357503:doText,[])
}
Add(ConvertorEx,12233147,406,224)
{
Mode=15
Digits=0
Width=3
link(onResult,8916136:doText,[])
link(Data,2932909:Var3,[(412,208)])
}
Add(ConvertorEx,13326286,406,168)
{
Mode=15
Digits=0
Width=3
link(onResult,11726592:doText,[])
link(Data,302716:Var2,[])
}
карма: 9

1
Голосовали:Tad
Редактировалось 4 раз(а), последний 2016-12-31 13:18:14