------------ Дoбавленo в 20.43:
Вот так
Add(Edit,4902751,238,189)
{
Left=90
Top=40
Width=185
Text="8 ("
Point(onKillFocus)
Point(doPosition)
link(onChange,13826405:doLength,[])
}
Add(StrCat,8335133,448,189)
{
Str2=") "
link(onStrCat,11465704:doWork1,[(493,195)])
link(Str1,2430236:Var1,[(454,177)(433,177)])
}
Add(Length,13826405,294,189)
{
link(onLength,5685982:doEvent1,[])
}
Add(If_else,9010320,385,189)
{
Op2=Integer(6)
link(onTrue,8335133:doStrCat,[])
}
Add(StrCat,12380988,448,238)
{
Str2="-"
link(onStrCat,11465704:doWork2,[])
link(Str1,2430236:Var3,[(454,230)])
}
Add(If_else,7454393,385,238)
{
Op2=Integer(11)
link(onTrue,12380988:doStrCat,[])
}
Add(Hub,5685982,336,189)
{
OutCount=3
link(onEvent1,9010320:doCompare,[])
link(onEvent2,7454393:doCompare,[(368,202)(368,244)])
link(onEvent3,6549444:doCompare,[(363,209)(363,286)])
}
Add(GetDataEx,2430236,427,225)
{
Angle=3
link(Data,4902751:Text,[(244,230)])
}
Add(HubEx,11465704,489,238)
{
Angle=1
link(onEvent,3816351:doWork1,[])
}
Add(If_else,6549444,385,280)
{
Op2=Integer(14)
link(onTrue,9999496:doStrCat,[])
}
Add(StrCat,9999496,448,280)
{
Str2="-"
link(onStrCat,3816351:doWork2,[])
link(Str1,2430236:Var2,[(454,257)(433,257)])
}
Add(HubEx,3816351,489,280)
{
Angle=1
link(onEvent,2468463:doEvent1,[(493,334)(108,334)(108,202)])
}
Add(Length,15055715,161,203)
{
link(onLength,4902751:doPosition,[])
}
Add(Hub,2468463,126,196)
{
link(onEvent1,4902751:doText2,[])
link(onEvent2,15055715:doLength,[])
}
Так лучше.
Add(MainForm,2953706,21,105)
{
}
Add(Edit,4902751,196,189)
{
Left=90
Top=40
Width=185
Text="8 ("
Point(onKillFocus)
Point(doPosition)
link(onChange,12957080:doEvent1,[])
}
Add(StrCat,8335133,462,189)
{
Str2=") "
link(onStrCat,11465704:doWork1,[(507,195)])
link(Str1,2430236:Var1,[(468,177)(447,177)])
}
Add(Length,13826405,301,189)
{
link(onLength,5685982:doEvent1,[])
}
Add(If_else,9010320,399,189)
{
Op2=Integer(6)
link(onTrue,8335133:doStrCat,[])
}
Add(StrCat,12380988,462,238)
{
Str2="-"
link(onStrCat,11465704:doWork2,[])
link(Str1,2430236:Var3,[(468,230)])
}
Add(If_else,7454393,399,238)
{
Op2=Integer(11)
link(onTrue,12380988:doStrCat,[])
}
Add(Hub,5685982,350,189)
{
OutCount=3
link(onEvent1,9010320:doCompare,[])
link(onEvent2,7454393:doCompare,[(382,202)(382,244)])
link(onEvent3,6549444:doCompare,[(377,209)(377,286)])
}
Add(GetDataEx,2430236,441,225)
{
Angle=3
link(Data,9149645:Var3,[])
}
Add(HubEx,11465704,503,238)
{
Angle=1
link(onEvent,3816351:doWork1,[])
}
Add(If_else,6549444,399,280)
{
Op2=Integer(14)
link(onTrue,9999496:doStrCat,[])
}
Add(StrCat,9999496,462,280)
{
Str2="-"
link(onStrCat,3816351:doWork2,[])
link(Str1,2430236:Var2,[(468,275)(447,275)])
}
Add(HubEx,3816351,503,280)
{
Angle=1
link(onEvent,1542054:doWork1,[])
}
Add(Length,15055715,133,203)
{
link(onLength,4902751:doPosition,[])
}
Add(Hub,2468463,91,196)
{
link(onEvent1,4902751:doText2,[])
link(onEvent2,15055715:doLength,[])
}
Add(Delete,13693509,196,308)
{
Position=18
Count=1
link(onDelete,1542054:doWork2,[])
link(Str,9149645:Var2,[])
}
Add(GetDataEx,9149645,196,225)
{
link(Data,4902751:Text,[])
}
Add(Hub,12957080,245,189)
{
link(onEvent1,13826405:doLength,[])
link(onEvent2,13693509:doDelete,[(276,202)(276,262)(177,262)(177,314)])
}
Add(HubEx,1542054,503,308)
{
Angle=1
link(onEvent,2468463:doEvent1,[(507,346)(53,346)(53,202)])
}