------------ Дoбавленo в 05.07:
Но GLPoint3D не имеет точки do. Как рисовать точки?
------------ Дoбавленo в 05.57:
Вот так получается точки делать, это нормально?
Add(MainForm,15340401,98,105)
{
Height=400
Color=3355447
Caption="Куб и сфера рисуются в пределах прямоугольника"
Position=1
Point(Handle)
link(onCreate,5558289:doEvent1,[])
}
Add(GL_Perspective,2,322,161)
{
Fovy=35
zFar=100
}
Add(GL_Main,3,273,119)
{
Color=3355447
link(onInit,4:doInit,[])
link(onViewPort,2:doPerspective,[(313,132)(313,167)])
link(Handle,15340401:Handle,[(279,103)(136,103)(136,151)(104,151)])
}
Add(Timer,5,175,161)
{
Interval=33
Enable=1
link(onTimer,7:doEvent1,[])
}
Add(GL_GTools,6,273,161)
{
Point(doClear)
Point(doPushMatrix)
Point(doPopMatrix)
}
Add(Hub,7,217,161)
{
OutCount=6
link(onEvent1,6:doClear,[])
link(onEvent2,6:doPushMatrix,[])
link(onEvent3,4643888:doColor,[(259,181)(259,307)])
link(onEvent4,10589800:doCallList,[(266,188)(266,223)])
link(onEvent5,3:doFlip,[(252,195)(252,139)])
link(onEvent6,6:doPopMatrix,[(252,202)(252,181)])
}
Add(Hub,5558289,147,119)
{
OutCount=3
link(onEvent1,3:doInit,[])
link(onEvent2,3:doViewPort,[])
link(onEvent3,5:doTimer,[(169,139)(169,167)])
}
Add(GL_GluTools,4,322,119)
{
Texture=0
link(onInit,26:doEnabled,[])
}
Add(GL_Light,26,364,119)
{
Ambient=16777215
link(onEnabled,14322260:doEnabled,[])
}
Add(GL_Options,14322260,406,119)
{
link(onEvent,14251063:doEnabled,[])
}
Add(GL_Options,14251063,448,119)
{
Flag=1
link(onEvent,614504:doEnabled,[])
}
Add(GL_Options,614504,490,119)
{
Flag=2
}
Add(FTCG_Tools,832502,511,301)
{
link(onBegin,7123409:doEnd,[])
}
BEGIN_SDK
Add(EditMultiEx,2509702,21,21)
{
WorkCount=#6:doDraw|
EventCount=#7:onBegin|
Width=629
Height=445
link(doDraw,12554484:doBegin,[(218,27)(218,146)])
}
Add(GL_Sphere,9244665,84,273)
{
Radius=2
Slices=200
Stacks=200
}
Add(GL_Cube,5749111,140,273)
{
Size=2
}
Add(GL_Torus,9242051,238,273)
{
inRadius=1
outRadius=2
Sides=4
Rings=4
}
Add(GL_Cylinder,13862500,189,273)
{
}
Add(GL_Vertex3D,3230167,308,140)
{
link(onVertex,16474002:doVertex,[])
}
Add(GL_Vertex3D,16474002,357,140)
{
X=0.5
Y=-1
link(onVertex,14749228:doVertex,[])
}
Add(GL_Vertex3D,14749228,406,140)
{
X=-0.5
Y=-1
link(onVertex,2509702:onBegin,[(509,146)(509,27)])
}
Add(Gl_Begin,12554484,252,140)
{
link(onBegin,3230167:doVertex,[])
}
END_SDK
Add(GL_Color,4643888,420,301)
{
Color=15000808
link(onColor,14887042:doBeginList,[])
}
Add(Gl_BeginList,14887042,462,301)
{
Index=100
link(onBiginList,832502:doDraw,[])
}
Add(Gl_EndList,8857071,602,301)
{
}
Add(Gl_End,7123409,560,301)
{
link(onEnd,8857071:doEndList,[])
}
Add(GL_CallList,10589800,322,217)
{
Index=100
}