Dilma писал(а):
AZot, этот вариант больше исходного
Это просто вариант без использования копирования, вырезания строк.
Короче, чем у filyaxxxcom (4+2 элемента + 1 хаб) врятли получится.
В моем варианте можно и в 9 уложиться
Add(Edit,12418314,364,126)
{
Left=5
Top=10
Width=190
Text="99900"
}
Add(Convertor,16291122,364,175)
{
Mode=6
Digits=8
link(onResult,309134:doLoad,[])
link(Data,12418314:Text,[])
}
Add(Button,14464638,294,266)
{
Left=200
Top=15
Data=String()
Point(onMouseDown)
PColor(onClick,0)
link(onClick,16291122:doConvert,[(345,272)(345,181)])
link(onMouseDown,4886168:doWork3,[(557,279)])
}
Add(CharArray,309134,413,175)
{
link(onLoad,10604994:doEnum,[(455,181)(455,216)(398,216)(398,230)])
}
Add(ArrayEnum,10604994,413,224)
{
link(onItem,12733757:doSwitch,[])
link(Array,309134:Array,[])
}
Add(Switch,12733757,462,224)
{
Point(onOn)
Point(onOff)
link(onOn,7037157:doValue,[(505,237)(505,181)])
link(onOff,10175287:doString,[])
}
Add(Memory,7037157,518,175)
{
}
Add(Edit,12920450,574,238)
{
Left=5
Top=35
Width=190
Text=""
}
Add(FormatStr,10175287,518,238)
{
DataCount=3
Mask="%1%2%3"
Point(FString)
link(onFString,4886168:doWork2,[])
link(Str1,7037157:Value,[])
link(Str3,12920450:Text,[(538,226)(567,226)(567,279)(580,279)])
}
Add(HubEx,4886168,553,231)
{
PColor(onEvent,16744448)
link(onEvent,12920450:doText,[])
}