частично поправил. добавляет, высота почему-то не влияет.
------------ Дoбавленo в 15.09:
Add(MainForm,11507326,511,350)
{
Left=20
Top=105
Width=790
Height=503
Point(MouseX)
Point(MouseY)
Point(onResize)
Point(Handle)
link(onCreate,16299401:doEvent1,[])
}
Add(GL_Main,12986311,602,364)
{
Color=12639424
TwoSide=0
link(onInit,4593655:doInit,[(650,370)(650,342)])
link(onViewPort,2663059:doPerspective,[])
link(Handle,5517251:Handle,[])
}
Add(Timer,9506849,511,441)
{
Interval=10
Enable=1
link(onTimer,1049454:doEvent1,[])
}
Add(GL_GTools,771925,609,441)
{
Point(doClear)
Point(doPushMatrix)
Point(doPopMatrix)
}
Add(Hub,1049454,553,441)
{
OutCount=5
link(onEvent1,771925:doClear,[])
link(onEvent2,771925:doPushMatrix,[])
link(onEvent3,11649832:doPushMatrix,[])
link(onEvent4,771925:doPopMatrix,[(580,468)(580,461)])
link(onEvent5,12986311:doFlip,[(595,475)(595,384)])
}
Add(Hub,16299401,560,364)
{
OutCount=4
link(onEvent1,12986311:doInit,[])
link(onEvent2,12986311:doViewPort,[])
link(onEvent3,8428433:In,[(592,384)(592,412)])
link(onEvent4,9506849:doTimer,[(586,391)(586,419)(499,419)(499,447)])
}
Add(GL_GluTools,4593655,665,336)
{
Texture=0
}
Add(PaintBox,5517251,595,308)
{
Left=95
Top=10
Width=675
Height=380
Color=16777215
Ctl3D=0
Point(Handle)
Point(onMouseMove)
Point(MouseX)
Point(MouseY)
}
Add(GL_GTools,12486325,1176,462)
{
Point(doPopMatrix)
link(onEvent,14205523:doPushAttrib,[])
}
Add(Math,2154256,952,525)
{
OpType=2
Op2=-3
link(Op1,3352501:Count,[(958,515)(860,515)])
}
Add(GL_GTools,15299083,931,462)
{
Point(doPushMatrix)
link(onEvent,8079493:doRotate,[])
}
Add(GL_GTools,11649832,721,455)
{
Point(doPushMatrix)
link(onEvent,2564517:doEnum,[])
}
Add(GL_Rotate,8079493,973,462)
{
Angle=30
Y=200
link(onRotate,858408:doTranslate,[])
link(Angle,3291853:Position,[])
}
Add(TrackBar,3291853,973,399)
{
Left=85
Top=395
Width=685
Height=15
Max=30
Min=10
Position=30
ThumbLength=10
link(onPosition,3291853:doPosition2,[(1016,405)(1016,388)(961,388)(961,412)])
}
Add(Gl_Translate,858408,1029,462)
{
Y=-1.2
link(onTranslate,683218:doScale,[])
link(X,2154256:Result,[(1035,450)(1021,450)(1021,573)(958,573)])
}
Add(Gl_Scale,683218,1078,462)
{
X=0.001
Y=0.001
Z=0.001
link(onScale,15959241:doDraw,[])
}
Add(GL_Cube2,15959241,1120,462)
{
link(onDraw,12486325:doPopMatrix,[])
link(Point1,10506615:Point3D,[(1126,436)(1098,436)])
link(Point2,5206949:Point3D,[(1133,436)(1154,436)])
}
Add(GL_Point3D,10506615,1092,378)
{
link(X,3853395:Left,[(1098,366)(1028,366)])
link(Y,16046090:Left,[(1105,361)(1070,361)])
link(Z,13214874:Left,[])
}
Add(GL_Point3D,5206949,1148,378)
{
link(X,1244542:Left,[])
link(Y,3850866:Left,[(1161,366)(1196,366)])
link(Z,10550480:Left,[(1168,369)(1238,369)])
}
Add(StrList,2315546,756,371)
{
Strings=#19:16/2500/600/0/100/0|20:1400/116/600/0/100/0|24:1416/2500/600/1400/100/0|22:1400/2516/600/0/2500/0|20:1400/100/580/0/0/596|0:|
Point(IdxToSelect)
Point(doAppend)
}
Add(StrPart,16046090,1064,322)
{
Char="/"
Point(Left)
link(onSplit,13214874:doSplit,[])
}
Add(StrPart,13214874,1106,322)
{
Char="/"
Point(Left)
link(onSplit,1244542:doSplit,[])
}
Add(StrPart,1244542,1148,322)
{
Char="/"
Point(Left)
link(onSplit,3850866:doSplit,[])
}
Add(StrPart,3853395,1022,322)
{
Char="/"
Point(Left)
link(onSplit,16046090:doSplit,[])
}
Add(StrPart,3850866,1190,322)
{
Char="/"
Point(Left)
link(onSplit,10550480:doSplit,[])
}
Add(StrPart,10550480,1232,322)
{
Char="/"
Point(Left)
}
Add(GL_Perspective,2663059,665,371)
{
Aspect=2
Fovy=30
}
Add(GL_Options,8534874,1407,462)
{
Flag=1
link(onEvent,3648421:doEnabled,[])
}
Add(GL_Light,3648421,1477,462)
{
Ambient=8421504
Diffuse=12632256
Specular=15793151
link(onEnabled,3648421:doMove,[(1519,468)(1519,452)(1467,452)(1467,475)])
link(Point,557343:Point3D,[])
}
Add(GL_Point3D,557343,1477,406)
{
Y=1
Z=-1
}
Add(GL_Options,2814103,1337,462)
{
Flag=2
link(onEvent,8534874:doEnabled,[])
}
Add(GL_GTools,14205523,1239,462)
{
Point(doPushAttrib)
link(onEvent,2728179:doEnabled,[])
}
Add(GL_Options,2728179,1288,462)
{
link(onEvent,2814103:doEnabled,[])
}
Add(Hub,14458048,819,455)
{
link(onEvent1,3853395:doSplit,[(844,461)(844,328)])
link(onEvent2,3352501:doNext,[])
}
Add(ArrayEnum,2564517,770,455)
{
link(onItem,14458048:doEvent1,[])
link(Array,2315546:Array,[])
}
Add(Counter,3352501,854,462)
{
link(onNext,11170192:doEvent1,[])
}
Add(Hub,11170192,896,462)
{
OutCount=3
link(onEvent1,15299083:doPushMatrix,[])
link(onEvent2,2154256:doOperation,[(928,475)(928,531)])
link(onEvent3,3352501:doReset,[(917,482)(917,503)(842,503)(842,482)])
}
Add(Edit,3303364,616,497)
{
Left=10
Top=185
Width=70
Height=30
Font=[MS Sans Serif,10,0,0,1]
Cursor=2
TabOrder=1
WinStyle=2
Hint="Длина"
Text=""
DataType=2
Point(doSetFocus)
Point(doSelectAll)
link(onEnter,8598128:doEvent1,[])
}
Add(Edit,13038117,609,546)
{
Left=10
Top=240
Width=70
Height=30
Font=[MS Sans Serif,10,0,0,1]
Cursor=2
TabOrder=2
WinStyle=2
Hint="Высота"
Text=""
DataType=2
Point(doSetFocus)
Point(doSelectAll)
link(onEnter,9520200:doEvent1,[])
}
Add(Edit,509836,602,602)
{
Left=10
Top=295
Width=70
Height=30
Font=[MS Sans Serif,10,0,0,1]
Cursor=2
TabOrder=3
WinStyle=2
Hint="Глубина"
Text=""
DataType=2
Point(doSetFocus)
Point(doSelectAll)
link(onEnter,1837202:doEvent1,[])
}
Add(FormatStr,6609669,602,714)
{
DataCount=7
Mask="%3/60/%1/0/0/%6,
%3/76/%1/0/60/0,
%3/%2/%1/0/%5/0,
16/%5/%1/0/76/0,
%3/%5/%1/%4/76/0
"
link(onFString,2315546:doText,[(705,720)(705,398)])
link(Str1,643236:Var2,[])
link(Str2,4323492:Var2,[])
link(Str3,8095455:Var2,[])
link(Str4,9635531:Result,[(629,672)(755,672)])
link(Str5,15464659:Result,[(636,681)(769,681)])
link(Str6,15905324:Result,[(643,706)(783,706)])
}
Add(Button,6835065,504,707)
{
Left=10
Top=340
Width=70
Height=25
TabOrder=4
Hint="Внести"
Caption="ОК"
Point(doSetFocus)
Point(onKeyDown)
link(onClick,8360535:doEvent1,[])
}
Add(Hub,8360535,553,707)
{
OutCount=3
link(onEvent1,2315546:doClear,[(703,713)(703,384)])
link(onEvent2,6609669:doString,[])
link(onEvent3,1069519:doEvent2,[(580,727)(580,655)(548,655)(548,524)])
}
Add(PointHint,1166248,490,490)
{
Info=#6:Ширина|
Transparent=0
Width=50
Height=18
}
Add(PointHint,11440788,490,546)
{
Info=#6:Высота|
Transparent=0
Width=50
Height=18
}
Add(Hub,8598128,658,504)
{
link(onEvent1,3303364:doText2,[(684,510)(684,481)(604,481)(604,510)])
link(onEvent2,16630525:doEvent1,[(684,517)(684,534)(562,534)(562,566)])
}
Add(Hub,16630525,574,560)
{
link(onEvent1,13038117:doSetFocus,[])
link(onEvent2,13038117:doSelectAll,[])
}
Add(Hub,9520200,658,553)
{
link(onEvent1,13038117:doText2,[(685,559)(685,540)(597,540)(597,559)])
link(onEvent2,10576681:doEvent1,[(682,566)(682,585)(555,585)(555,622)])
}
Add(Hub,1837202,658,609)
{
link(onEvent1,509836:doText2,[(681,615)(681,595)(590,595)(590,615)])
link(onEvent2,9635531:doOperation,[(710,622)(710,573)])
}
Add(Hub,10576681,567,616)
{
link(onEvent1,509836:doSetFocus,[])
link(onEvent2,509836:doSelectAll,[])
}
Add(Hub,1069519,574,511)
{
InCount=2
link(onEvent1,3303364:doSetFocus,[])
link(onEvent2,3303364:doSelectAll,[])
}
Add(LineBreak,9318275,511,511)
{
link(Out,1069519:doEvent1,[])
Primary=[8428433,91,-105]
}
Add(Label,13195878,490,245)
{
Left=15
Top=160
Width=66
Height=24
Font=[MS Sans Serif,12,2,0,1]
Caption="Ширина "
}
Add(Label,16750562,502,247)
{
Left=15
Top=215
Width=61
Height=24
Font=[MS Sans Serif,12,2,0,1]
Caption="Высота"
}
Add(Label,11121490,514,247)
{
Left=10
Top=270
Width=70
Height=24
Font=[MS Sans Serif,12,2,0,1]
Caption="Глубина "
}
Add(Math,9635531,749,567)
{
OpType=1
Op2=16
ResultType=0
link(onResult,15464659:doOperation,[(793,573)(793,597)(751,597)(751,622)])
link(Op1,8095455:Var3,[(755,537)])
}
Add(Math,15464659,763,616)
{
OpType=1
Op2=16
ResultType=0
link(onResult,15905324:doOperation,[(807,622)(807,646)(765,646)(765,671)])
link(Op1,4323492:Var3,[(769,593)])
}
Add(GetDataEx,8095455,616,532)
{
link(Data,3303364:Text,[])
}
Add(GetDataEx,13172875,609,581)
{
link(Data,13038117:Text,[])
}
Add(Math,15905324,777,665)
{
OpType=1
Op2=100
link(onResult,6835065:doSetFocus,[(821,671)(821,689)(492,689)(492,713)])
link(Op1,643236:Var3,[(783,656)])
}
Add(GetDataEx,643236,602,651)
{
link(Data,509836:Text,[])
}
Add(GetDataEx,4323492,609,588)
{
link(Data,13172875:Var2,[])
}
------------ Дoбавленo в 15.11:
а вообще - то там и добавляется 4 бокса, только у одного координаты неправильные.



Поиск
Друзья
Администрация