Add(MainForm,2953706,357,203)
{
}
Add(Edit,11170922,140,133)
{
 Left=140
 Top=25
 Text=""
 DataType=2
 link(onEnter,7428768:doEvent1,[])
}
Add(Hub,7428768,189,140)
{
 link(onEvent1,4674850:doClear,[(287,146)(287,160)])
 link(onEvent2,6316441:doFor,[])
}
Add(For,6316441,224,147)
{
 Start=1
 InData=0
 link(onEvent,4674850:doStrCatDlm,[])
 link(onStop,8946852:doTrim,[(270,160)(270,209)])
}
Add(StrCatDelim,4674850,301,147)
{
 Delimiter="."
 Point(doClear)
 link(Str1,11831966:Var3,[(307,135)(339,135)(339,191)])
}
Add(GetDataEx,11831966,301,186)
{
 link(Data,4674850:Result,[])
}
Add(Trim,8946852,301,203)
{
 Char="."
 link(onTrim,2953706:doCaption,[])
 link(Text,11831966:Var2,[])
}