Пример
Make(delphi)
ver(4.05 build 186)
Add(MainForm,2953706,21,105)
{
}
Add(Edit,5544078,301,161)
{
Left=15
Top=30
link(onChange,16509330:doConvert,[])
}
Add(Label,16478674,497,420)
{
Left=175
Top=80
Width=42
Height=17
Caption=""
link(Text,1030299:Value,[(503,345)(671,345)])
}
Add(Button,3087966,224,245)
{
Left=30
Top=75
link(onClick,4528960:doEvent1,[(314,251)(314,335)])
}
Add(If_else,8103008,364,329)
{
Type=2
Op2=Real(0.00001)
link(onTrue,8372826:doValue,[(482,335)(482,244)])
link(onFalse,2032094:doValue,[(478,342)(478,363)])
link(Op1,16509330:Var,[(370,278)(363,278)])
AddHint(35,-48,54,13,Op2)
}
Add(Label,12489922,434,161)
{
Left=85
Top=30
Width=46
Height=17
Caption="-0,00001"
}
Add(Memory,8372826,567,238)
{
Point(Data)
link(onData,14195938:doWork2,[])
link(Data,4568548:Value,[])
}
Add(Memory,4568548,567,189)
{
Default=String(больше)
}
Add(Memory,1030299,665,238)
{
}
Add(Hub,4528960,329,329)
{
link(onEvent1,8103008:doCompare,[])
link(onEvent2,16478674:doText,[(357,342)(357,426)])
}
Add(Memory,2032094,560,357)
{
Point(Data)
link(onData,14195938:doWork3,[(641,363)])
link(Data,2290153:Value,[])
}
Add(Memory,2290153,560,308)
{
Default=String(меньше)
}
Add(HubEx,14195938,637,238)
{
link(onEvent,1030299:doValue,[])
}
Add(ConvertorEx,16509330,357,161)
{
Mode=10
}
http://i.mcgl.ru/RzQyY6g5UE
Редактировалось 1 раз(а), последний 2020-09-15 09:48:41