
Может лучше так:
Add(MainForm,2953706,140,175)
{
Color=8421376
link(onCreate,4979796:doEnum,[])
}
Add(ChildPanelEx,4979796,308,189)
{
link(Array,7770792:Var,[])
}
BEGIN_SDK
Add(EditMultiEx,16107449,21,21)
{
WorkCount=#6:doEnum|6:doNext|
DataCount=#5:Array|
Width=321
Height=319
link(doEnum,2093148:doEnum,[(63,27)(63,146)])
link(doNext,807611:doNext,[(70,34)(70,202)])
}
Add(Panel,6735178,252,140)
{
Left=35
Top=105
Width=64
Height=64
BevelInner=0
}
Add(PaintBox,7459256,252,182)
{
Top=-512
Width=64
Height=576
Point(doTop)
}
Add(ArrayEnum,2093148,105,140)
{
link(onItem,11713081:doRead,[])
link(onEndEnum,7459256:doRefresh,[(149,153)(149,188)])
link(Array,7930131:Array,[])
}
Add(StrList,7930131,91,63)
{
Strings=#1:1|1:2|1:3|1:4|1:5|1:6|1:7|1:8|1:1|
}
Add(ArrayRW,11713081,168,140)
{
link(onRead,4301786:doDraw,[(226,146)(226,286)])
link(Array,16107449:Array,[(174,44)(27,44)])
}
Add(Img_Bmp,4301786,252,280)
{
Point(Y)
link(onDraw,7683956:doNext,[(307,286)(307,222)(260,222)(260,237)])
link(Bitmap,7459256:Bitmap,[])
link(Y,7683956:Count,[])
}
Add(Counter,7683956,266,231)
{
Max=576
Step=64
}
Add(Counter,807611,112,196)
{
Min=-512
Max=0
Step=2
link(onNext,7459256:doTop,[])
}
END_SDK
Add(Timer,189195,259,196)
{
Interval=10
Enable=1
Point(onStop)
link(onTimer,4979796:doNext,[])
}
Add(Button,13627762,210,196)
{
Left=110
Top=235
link(onClick,189195:doTimer,[])
}
Add(LineBreak,15658730,308,140)
{
Caption="BitmapArray"
Type=1
Primary=[7770792,0,21]
}