
вот так я раньше делал, так для размышлений.
#sha
Add(MainForm,2666497,84,70)
{
Width=580
Height=405
BorderStyle=7
Position=1
Point(Handle)
}
Add(ChildPanel,8592524,84,126)
{
link(Data1,2666497:Handle,[])
}
BEGIN_SDK
Add(EditMulti,15658730,52,10)
{
DataCount=1
}
Add(VisualShape,9198117,77,147)
{
Left=-2
Top=-11
Width=140
PColor=8388608
Color2=8388608
ShapeType=4
}
Add(Panel,15138226,147,147)
{
Width=574
Height=42
Align=2
BorderWidth=0
BevelInner=0
BevelWidth=0
}
Add(ChildPanel,12337333,147,63)
{
link(onEvent1,9768932:doWork2,[])
link(Data1,8310960:Var2,[])
}
BEGIN_SDK
Add(EditMulti,1341781,10,10)
{
EventCount=1
DataCount=1
Width=237
Height=207
}
Add(Panel,1468455,35,42)
{
Width=574
Height=28
Align=2
Color=8388608
BorderWidth=0
BevelInner=0
BevelWidth=0
Point(onDblClick)
link(onClick,1341781:onEvent1,[(111,48)(111,16)])
link(onDblClick,12821860:doWork1,[(81,55)])
}
Add(BitBtn,3578947,98,56)
{
Left=642
Width=25
Height=28
Align=3
Color=8388608
Font=[MS Sans Serif,8,1,65535,1]
FrameColor=8388608
Caption="X"
link(onClick,12706612:doClose,[])
}
Add(WinTools,12706612,168,35)
{
Point(doMinimize)
Point(doMaximize)
Point(doNormal)
link(Handle,1341781:Data1,[(174,23)(16,23)])
}
Add(Message,14680648,98,154)
{
Message="Типа Help :)"
Caption="About"
Icon=4
}
Add(BitBtn,16516033,35,105)
{
Left=524
Width=25
Height=28
Align=3
Color=8388608
Font=[Webdings,8,1,65535,2]
FrameColor=8388608
Caption="1"
link(onClick,12821860:doWork2,[])
}
Add(Switch,6855878,98,105)
{
DataOn=Integer(1)
DataOff=Integer(2)
Default=0
Point(onOff)
Point(onOn)
link(onSwitch,16516033:doCaption,[(142,111)(142,99)(23,99)(23,111)])
link(onOff,12706612:doMaximize,[(149,118)(149,76)])
link(onOn,12706612:doNormal,[(154,125)(154,83)])
}
Add(BitBtn,15613143,98,63)
{
Left=499
Width=25
Height=28
Align=3
Color=8388608
Font=[MS Sans Serif,8,1,65535,1]
FrameColor=8388608
Caption="_"
link(onClick,12706612:doMinimize,[])
}
Add(BitBtn,7740114,35,154)
{
Left=499
Width=25
Height=28
Align=3
Color=8388608
Font=[MS Sans Serif,8,1,65535,1]
FrameColor=8388608
Caption="?"
link(onClick,14680648:doMessage,[])
}
Add(HubEx,12821860,77,98)
{
link(onEvent,6855878:doSwitch,[])
}
END_SDK
Add(Label,536474,147,105)
{
Left=25
Top=5
Width=82
Height=27
Color=8388608
Font=[Comic Sans MS,12,0,65535,204]
Caption="Main Form"
link(onClick,9768932:doWork3,[(193,111)])
}
Add(MoveWindow,16061773,210,63)
{
link(Handle,8310960:Var3,[(216,37)])
}
Add(GetDataEx,8310960,140,28)
{
Angle=3
link(Data,15658730:Data1,[(58,37)])
}
Add(HubEx,9768932,189,56)
{
link(onEvent,16061773:doMove,[])
}
END_SDK
Add(StatusBar,16094077,147,126)
{
}