Add(MainForm,2953706,448,280)
{
}
Add(ListBox,14098891,406,266)
{
 Left=120
 Top=85
 Width=45
 Height=45
 Point(onMouseWheel)
 Point(doSetFocus)
 link(onMouseWheel,2953706:doCaption,[])
}
Add(Image,16534715,364,294)
{
 Left=100
 Top=65
 Width=85
 Height=85
 Color=-16777207
 Point(onMouseWheel)
 Point(onMouseMove)
 link(onMouseMove,14098891:doSetFocus,[])
}

Add(TreeViewEx,10196733,441,105)
{
 @Color=0
 Left=271
 Top=28
 Width=625
 Height=625
 Color=-16777201
 Font=[MS Sans Serif,8,0,65535,1]
 Visible=1
 WinStyle=3
 ModeSp=3
 Lines=1
 LinesRoot=1
 Tooltips=0
 TrackSelect=0
 SingleExpand=0
 IconsState=[]
 Icons=[]
 Point(doSetFocus)
 Point(onMouseWheel)
 link(onMouseWheel,8909108:doValue,[])
}
Add(MouseEvent,11156624,798,224)
{
 Button=2
}
Add(Switch,9881047,658,217)
{
 Point(doOn)
 Point(doCheck)
 Point(onOn)
 Point(onOff)
 link(onOn,2099544:doEvent1,[])
 link(onOff,2099544:doEvent2,[])
}
Add(Counter,5896395,658,119)
{
 link(onNext,12858175:doCompare,[])
}
Add(If_else,14474870,567,224)
{
 Op1=Real(0)
 Op2=Real(120)
 link(onTrue,9881047:doReset,[])
 link(onFalse,9881047:doOn,[])
 link(Op1,8909108:Value,[])
}
Add(If_else,12858175,763,119)
{
 Op1=Real(0)
 Op2=Real(1)
 link(onTrue,14474870:doCompare,[(807,125)(807,177)(555,177)(555,230)])
 link(onFalse,5896395:doReset,[(807,132)(807,136)(646,136)(646,139)])
 link(Op1,5896395:Count,[(769,107)(717,107)(717,163)(664,163)])
}
Add(Memory,8909108,567,119)
{
 link(onData,5896395:doNext,[])
}
Add(Hub,2099544,742,224)
{
 @Color=0
 InCount=2
 link(onEvent1,11156624:doClick,[])
}
Add(Hub,11648713,378,140)
{
 @Color=0
 InCount=15
 OutCount=1
 link(onEvent1,10196733:doSetFocus,[])
}
Add(Image,16534715,287,126)
{
 Left=100
 Top=65
 Width=85
 Height=85
 Color=-16777207
 Point(onMouseWheel)
 Point(onMouseMove)
 link(onClick,13917000:doMessage,[(338,132)(338,48)])
 link(onMouseMove,11648713:doEvent1,[])
}
Add(Message,13917000,357,42)
{
 Message="ИКЛИК"
}

Add(Image,2877378,476,21)
{
 Left=480
 Top=20
 Width=25
 Height=25
 Ctl3D=0
 WinStyle=3
 ViewStyle=0
 Picture=[ZIPC601000078DA73F23DC6C800066640AC01C45C50CCC8A000169F00954706FFFFFF87637C72C8F2D6672E32989FBEC0A07BE21C83EC915318EA4120F2CA4D86D8ABB7C0B4EFC56B603D2AC7CEC0D58140F6CDBB0CD5771F3234DC7F04A641FCD0CB37C06A91CD6D7FF88461CEB3970C4B5EBE06D3203E482DC85C901B600024B7E3DD0786E39FBE8069101F642EC80D20F7C200C81C909A577FFE8269101FE406907B417623BB119779E8FE85998BEC3E42E1884D1E0080B9B10C]
}

#pas
  x := (Control.Width-Bmp.Width)div 2;
  y := (Control.Height-Bmp.Height)div 2;