
Всегда удивлялся, зачем люди создают себе столько проблем на пустом месте....
#sha
Add(Button,11664271,161,189)
{
Left=145
Top=5
Caption="perebor"
link(onClick,5217617:doEnum,[])
}
Add(ArrayEnum,5217617,245,189)
{
link(onItem,6597978:doLength,[])
link(Array,992182:Array,[])
}
Add(Copy,16359249,420,189)
{
Count=12
link(onCopy,4420581:doInsert,[])
link(Str,5217617:Item,[(426,177)(405,177)(405,244)(251,244)])
}
Add(Insert,1237671,518,189)
{
SubStr=";"
Position=4
link(onInsert,10218772:doAdd,[])
}
Add(Length,6597978,315,189)
{
link(onLength,9738484:doFor,[])
}
Add(PointHint,1248430,210,98)
{
Info=#20:обязательная часть..|
Transparent=0
VAlign=0
Width=92
Height=137
}
Add(For,9738484,364,189)
{
Start=1
Step=12
InData=0
link(onEvent,16359249:doCopy,[])
}
Add(StringTable,10218772,567,189)
{
Left=5
Top=40
Width=375
Height=215
Columns=#1:1|1:2|1:3|
StaticColumn=0
Point(Matrix)
}
Add(StrList,992182,231,133)
{
Strings=#156:001001800000005001500018010001800033100004100051101001800092200002900110210002300139215001100162700000900173801003500182801003900217909003100256899007100287|
}
Add(Insert,4420581,469,189)
{
SubStr=";"
Position=8
link(onInsert,1237671:doInsert,[])
}