Add(MathParse,5553372,196,231)
{
 MathStr="round(%1 * 3.14 * %2, 0.001)"
}

Add(MainForm,2953706,63,91)
{
 Height=193
 Caption="Замена , на ."
 link(onCreate,2381354:doWork1,[(179,111)])
}
Add(Replace,8713522,189,119)
{
 SubStr=","
 DestStr="."
 link(onReplace,302459:doText,[])
 link(Str,14973923:Text,[(195,107)(171,107)(171,163)(146,163)])
}
Add(Edit,14973923,140,119)
{
 Left=110
 Top=20
 Width=150
 Font=[Courier,12,1,0,204]
 Text="12,45"
 link(onChange,2381354:doWork2,[])
}
Add(Edit,302459,238,119)
{
 Left=110
 Top=75
 Width=150
 Font=[Courier,12,1,0,204]
 Text=""
}
Add(HubEx,2381354,175,119)
{
 link(onEvent,8713522:doReplace,[])
}