unalex писал(а):
mirilka, а так не вертел?дополню:
Add(MainForm,13435633,308,252)
{
Width=384
Height=208
}
Add(Button,3424484,189,84)
{
Left=10
Top=10
Width=35
Height=35
Caption="1"
Data=Integer(1)
link(onClick,16063329:doWork2,[])
}
Add(Button,9284272,189,119)
{
Left=50
Top=10
Width=35
Height=35
Caption="2"
Data=Integer(2)
link(onClick,14935704:doWork2,[])
}
Add(Button,16469260,189,154)
{
Left=90
Top=10
Width=35
Height=35
Caption="3"
Data=Integer(3)
link(onClick,4990440:doWork2,[])
}
Add(Button,10477516,189,189)
{
Left=10
Top=50
Width=35
Height=35
Caption="4"
Data=Integer(4)
link(onClick,10625484:doWork2,[])
}
Add(Button,954451,189,224)
{
Left=50
Top=50
Width=35
Height=35
Caption="5"
Data=Integer(5)
link(onClick,11313035:doWork2,[])
}
Add(Button,1847497,189,259)
{
Left=90
Top=50
Width=35
Height=35
Caption="6"
Data=Integer(6)
link(onClick,937023:doWork2,[])
}
Add(Button,1476668,189,294)
{
Left=10
Top=90
Width=35
Height=35
Caption="7"
Data=Integer(7)
link(onClick,6652922:doWork2,[])
}
Add(Button,1038126,189,329)
{
Left=50
Top=90
Width=35
Height=35
Caption="8"
Data=Integer(8)
link(onClick,3850445:doWork2,[])
}
Add(Button,3879532,189,364)
{
Left=90
Top=90
Width=35
Height=35
Caption="9"
Data=Integer(9)
link(onClick,3850445:doWork3,[(249,370)])
}
Add(Button,3677494,294,189)
{
Left=10
Top=130
Width=115
Height=35
Caption="Enter"
link(onClick,14679833:doEvent1,[])
}
Add(Edit,5353485,392,84)
{
Left=160
Top=10
Width=210
Height=25
Font=[Courier New,12,1,0,204]
Text=""
DataType=1
}
Add(ListBox,2363057,392,189)
{
Left=160
Top=40
Width=210
Height=125
link(Str,5353485:Text,[])
}
Add(StrCat,8503010,322,84)
{
Point(doClear)
link(onStrCat,5353485:doText,[])
link(Str1,8503010:Result,[(328,72)(316,72)(316,128)(328,128)])
}
Add(Hub,14679833,343,189)
{
OutCount=3
link(onEvent1,2363057:doAdd,[])
link(onEvent2,5353485:doText2,[(375,202)(375,97)])
link(onEvent3,8503010:doClear,[(369,209)(369,153)(310,153)(310,97)])
}
Add(HubEx,16063329,245,84)
{
link(onEvent,8503010:doStrCat,[])
}
Add(HubEx,3850445,245,329)
{
Angle=3
link(onEvent,6652922:doWork3,[])
}
Add(HubEx,6652922,245,294)
{
Angle=3
link(onEvent,937023:doWork3,[])
}
Add(HubEx,937023,245,259)
{
Angle=3
link(onEvent,11313035:doWork3,[])
}
Add(HubEx,11313035,245,224)
{
Angle=3
link(onEvent,10625484:doWork3,[])
}
Add(HubEx,10625484,245,189)
{
Angle=3
link(onEvent,4990440:doWork3,[])
}
Add(HubEx,4990440,245,154)
{
Angle=3
link(onEvent,14935704:doWork3,[])
}
Add(HubEx,14935704,245,119)
{
Angle=3
link(onEvent,16063329:doWork3,[])
}