Unit mseglu

Description

Uses

Classes, Interfaces, Objects and Records

Functions and Procedures

Types

Constants

Variables

Description

Overview

Classes, Interfaces, Objects and Records

Name	Description
Record `GLUnurbs`
Record `GLUquadric`
Record `GLUtesselator`

Functions and Procedures

procedure initializeglu(const sonames: array of filenamety);

procedure releaseglu;

Types

TViewPortArray = array [0..3] of GLint;

T16dArray = array [0..15] of GLdouble;

TCallBack = procedure;

T3dArray = array [0..2] of GLdouble;

p3darray = ˆt3darray;

T4pArray = array [0..3] of Pointer;

T4fArray = array [0..3] of GLfloat;

PPointer = ˆPointer;

PGLUnurbs = ˆGLUnurbs;

PGLUquadric = ˆGLUquadric;

PGLUtesselator = ˆGLUtesselator;

GLUnurbsObj = GLUnurbs;

PGLUnurbsObj = PGLUnurbs;

GLUquadricObj = GLUquadric;

PGLUquadricObj = PGLUquadric;

GLUtesselatorObj = GLUtesselator;

PGLUtesselatorObj = PGLUtesselator;

GLUtriangulatorObj = GLUtesselator;

PGLUtriangulatorObj = PGLUtesselator;

TGLUnurbs = GLUnurbs;

TGLUquadric = GLUquadric;

TGLUtesselator = GLUtesselator;

TGLUnurbsObj = GLUnurbsObj;

TGLUquadricObj = GLUquadricObj;

TGLUtesselatorObj = GLUtesselatorObj;

TGLUtriangulatorObj = GLUtriangulatorObj;

GLUquadricErrorProc = procedure(p: GLenum); cdecl;

GLUtessBeginProc = procedure(p: GLenum); cdecl;

GLUtessEdgeFlagProc = procedure(p: GLboolean); cdecl;

GLUtessVertexProc = procedure(p: Pointer); cdecl;

GLUtessEndProc = procedure; cdecl;

GLUtessErrorProc = procedure(p: GLenum); cdecl;

GLUtessCombineProc = procedure(var p1: T3dArray; p2: T4pArray; p3: T4fArray; p4: PPointer); cdecl;

GLUtessBeginDataProc = procedure(p1: GLenum; p2: Pointer); cdecl;

GLUtessEdgeFlagDataProc = procedure(p1: GLboolean; p2: Pointer); cdecl;

GLUtessVertexDataProc = procedure(p1, p2: Pointer); cdecl;

GLUtessEndDataProc = procedure(p: Pointer); cdecl;

GLUtessErrorDataProc = procedure(p1: GLenum; p2: Pointer); cdecl;

GLUtessCombineDataProc = procedure(var p1: T3dArray; var p2: T4pArray; var p3: T4fArray; p4: PPointer; p5: Pointer); cdecl;

GLUnurbsErrorProc = procedure(p: GLenum); cdecl;

Constants

glulib: array[0..1] of filenamety = ('libGLU.so.1','libGLU.so.');

GLU_VERSION_1_1 = 1;

GLU_VERSION_1_2 = 1;

GLU_INVALID_ENUM = 100900;

GLU_INVALID_VALUE = 100901;

GLU_OUT_OF_MEMORY = 100902;

GLU_INCOMPATIBLE_GL_VERSION = 100903;

GLU_VERSION = 100800;

GLU_EXTENSIONS = 100801;

GLU_TRUE = GL_TRUE;

GLU_FALSE = GL_FALSE;

GLU_SMOOTH = 100000;

GLU_FLAT = 100001;

GLU_NONE = 100002;

GLU_POINT = 100010;

GLU_LINE = 100011;

GLU_FILL = 100012;

GLU_SILHOUETTE = 100013;

GLU_OUTSIDE = 100020;

GLU_INSIDE = 100021;

GLU_TESS_MAX_COORD = 1.0e150;

GLU_TESS_WINDING_RULE = 100140;

GLU_TESS_BOUNDARY_ONLY = 100141;

GLU_TESS_TOLERANCE = 100142;

GLU_TESS_WINDING_ODD = 100130;

GLU_TESS_WINDING_NONZERO = 100131;

GLU_TESS_WINDING_POSITIVE = 100132;

GLU_TESS_WINDING_NEGATIVE = 100133;

GLU_TESS_WINDING_ABS_GEQ_TWO = 100134;

GLU_TESS_BEGIN = 100100;

GLU_TESS_VERTEX = 100101;

GLU_TESS_END = 100102;

GLU_TESS_ERROR = 100103;

GLU_TESS_EDGE_FLAG = 100104;

GLU_TESS_COMBINE = 100105;

GLU_TESS_BEGIN_DATA = 100106;

GLU_TESS_VERTEX_DATA = 100107;

GLU_TESS_END_DATA = 100108;

GLU_TESS_ERROR_DATA = 100109;

GLU_TESS_EDGE_FLAG_DATA = 100110;

GLU_TESS_COMBINE_DATA = 100111;

GLU_TESS_ERROR1 = 100151;

GLU_TESS_ERROR2 = 100152;

GLU_TESS_ERROR3 = 100153;

GLU_TESS_ERROR4 = 100154;

GLU_TESS_ERROR5 = 100155;

GLU_TESS_ERROR6 = 100156;

GLU_TESS_ERROR7 = 100157;

GLU_TESS_ERROR8 = 100158;

GLU_TESS_MISSING_BEGIN_POLYGON = GLU_TESS_ERROR1;

GLU_TESS_MISSING_BEGIN_CONTOUR = GLU_TESS_ERROR2;

GLU_TESS_MISSING_END_POLYGON = GLU_TESS_ERROR3;

GLU_TESS_MISSING_END_CONTOUR = GLU_TESS_ERROR4;

GLU_TESS_COORD_TOO_LARGE = GLU_TESS_ERROR5;

GLU_TESS_NEED_COMBINE_CALLBACK = GLU_TESS_ERROR6;

GLU_AUTO_LOAD_MATRIX = 100200;

GLU_CULLING = 100201;

GLU_SAMPLING_TOLERANCE = 100203;

GLU_DISPLAY_MODE = 100204;

GLU_PARAMETRIC_TOLERANCE = 100202;

GLU_SAMPLING_METHOD = 100205;

GLU_U_STEP = 100206;

GLU_V_STEP = 100207;

GLU_PATH_LENGTH = 100215;

GLU_PARAMETRIC_ERROR = 100216;

GLU_DOMAIN_DISTANCE = 100217;

GLU_MAP1_TRIM_2 = 100210;

GLU_MAP1_TRIM_3 = 100211;

GLU_OUTLINE_POLYGON = 100240;

GLU_OUTLINE_PATCH = 100241;

GLU_NURBS_ERROR1 = 100251;

GLU_NURBS_ERROR2 = 100252;

GLU_NURBS_ERROR3 = 100253;

GLU_NURBS_ERROR4 = 100254;

GLU_NURBS_ERROR5 = 100255;

GLU_NURBS_ERROR6 = 100256;

GLU_NURBS_ERROR7 = 100257;

GLU_NURBS_ERROR8 = 100258;

GLU_NURBS_ERROR9 = 100259;

GLU_NURBS_ERROR10 = 100260;

GLU_NURBS_ERROR11 = 100261;

GLU_NURBS_ERROR12 = 100262;

GLU_NURBS_ERROR13 = 100263;

GLU_NURBS_ERROR14 = 100264;

GLU_NURBS_ERROR15 = 100265;

GLU_NURBS_ERROR16 = 100266;

GLU_NURBS_ERROR17 = 100267;

GLU_NURBS_ERROR18 = 100268;

GLU_NURBS_ERROR19 = 100269;

GLU_NURBS_ERROR20 = 100270;

GLU_NURBS_ERROR21 = 100271;

GLU_NURBS_ERROR22 = 100272;

GLU_NURBS_ERROR23 = 100273;

GLU_NURBS_ERROR24 = 100274;

GLU_NURBS_ERROR25 = 100275;

GLU_NURBS_ERROR26 = 100276;

GLU_NURBS_ERROR27 = 100277;

GLU_NURBS_ERROR28 = 100278;

GLU_NURBS_ERROR29 = 100279;

GLU_NURBS_ERROR30 = 100280;

GLU_NURBS_ERROR31 = 100281;

GLU_NURBS_ERROR32 = 100282;

GLU_NURBS_ERROR33 = 100283;

GLU_NURBS_ERROR34 = 100284;

GLU_NURBS_ERROR35 = 100285;

GLU_NURBS_ERROR36 = 100286;

GLU_NURBS_ERROR37 = 100287;

GLU_CW = 100120;

GLU_CCW = 100121;

GLU_INTERIOR = 100122;

GLU_EXTERIOR = 100123;

GLU_UNKNOWN = 100124;

GLU_BEGIN = GLU_TESS_BEGIN;

GLU_VERTEX = GLU_TESS_VERTEX;

GLU_END = GLU_TESS_END;

GLU_ERROR = GLU_TESS_ERROR;

GLU_EDGE_FLAG = GLU_TESS_EDGE_FLAG;

Variables

gluErrorString: function(errCode: GLenum): PChar; cdecl;

gluErrorUnicodeStringEXT: function(errCode: GLenum): PWideChar; cdecl;

gluGetString: function(name: GLenum): PChar; cdecl;

gluOrtho2D: procedure(left,right, bottom, top: GLdouble); cdecl;

gluPerspective: procedure(fovy, aspect, zNear, zFar: GLdouble); cdecl;

gluPickMatrix: procedure(x, y, width, height: GLdouble; var viewport: TViewPortArray); cdecl;

gluLookAt: procedure(eyex, eyey, eyez, centerx, centery, centerz, upx, upy, upz: GLdouble); cdecl;

gluProject: function(objx, objy, objz: GLdouble; var modelMatrix, projMatrix: T16dArray; var viewport: TViewPortArray; winx, winy, winz: PGLdouble): Integer; cdecl;

gluUnProject: function(winx, winy, winz: GLdouble; var modelMatrix, projMatrix: T16dArray; var viewport: TViewPortArray; objx, objy, objz: PGLdouble): Integer; cdecl;

gluScaleImage: function(format: GLenum; widthin, heightin: GLint; typein: GLenum; const datain: Pointer; widthout, heightout: GLint; typeout: GLenum; dataout: Pointer): Integer; cdecl;

gluBuild1DMipmaps: function(target: GLenum; components, width: GLint; format, atype: GLenum; const data: Pointer): Integer; cdecl;

gluBuild2DMipmaps: function(target: GLenum; components, width, height: GLint; format, atype: GLenum; const data: Pointer): Integer; cdecl;

gluNewQuadric: function: PGLUquadric; cdecl;

gluDeleteQuadric: procedure(state: PGLUquadric); cdecl;

gluQuadricNormals: procedure(quadObject: PGLUquadric; normals: GLenum); cdecl;

gluQuadricTexture: procedure(quadObject: PGLUquadric; textureCoords: GLboolean); cdecl;

gluQuadricOrientation: procedure(quadObject: PGLUquadric; orientation: GLenum); cdecl;

gluQuadricDrawStyle: procedure(quadObject: PGLUquadric; drawStyle: GLenum); cdecl;

gluCylinder: procedure(qobj: PGLUquadric; baseRadius, topRadius, height: GLdouble; slices, stacks: GLint); cdecl;

gluDisk: procedure(qobj: PGLUquadric; innerRadius, outerRadius: GLdouble; slices, loops: GLint); cdecl;

gluPartialDisk: procedure(qobj: PGLUquadric; innerRadius, outerRadius: GLdouble; slices, loops: GLint; startAngle, sweepAngle: GLdouble); cdecl;

gluSphere: procedure(qobj: PGLuquadric; radius: GLdouble; slices, stacks: GLint); cdecl;

gluQuadricCallback: procedure(qobj: PGLUquadric; which: GLenum; fn: TCallBack); cdecl;

gluNewTess: function: PGLUtesselator; cdecl;

gluDeleteTess: procedure(tess: PGLUtesselator); cdecl;

gluTessBeginPolygon: procedure(tess: PGLUtesselator; polygon_data: Pointer); cdecl;

gluTessBeginContour: procedure(tess: PGLUtesselator); cdecl;

gluTessVertex: procedure(tess: PGLUtesselator; var coords: T3dArray; data: Pointer); cdecl;

gluTessEndContour: procedure(tess: PGLUtesselator); cdecl;

gluTessEndPolygon: procedure(tess: PGLUtesselator); cdecl;

gluTessProperty: procedure(tess: PGLUtesselator; which: GLenum; value: GLdouble); cdecl;

gluTessNormal: procedure(tess: PGLUtesselator; x, y, z: GLdouble); cdecl;

gluTessCallback: procedure(tess: PGLUtesselator; which: GLenum;fn: TCallBack); cdecl;

gluGetTessProperty: procedure(tess: PGLUtesselator; which: GLenum; value: PGLdouble); cdecl;

gluNewNurbsRenderer: function: PGLUnurbs; cdecl;

gluDeleteNurbsRenderer: procedure(nobj: PGLUnurbs); cdecl;

gluBeginSurface: procedure(nobj: PGLUnurbs); cdecl;

gluBeginCurve: procedure(nobj: PGLUnurbs); cdecl;

gluEndCurve: procedure(nobj: PGLUnurbs); cdecl;

gluEndSurface: procedure(nobj: PGLUnurbs); cdecl;

gluBeginTrim: procedure(nobj: PGLUnurbs); cdecl;

gluEndTrim: procedure(nobj: PGLUnurbs); cdecl;

gluPwlCurve: procedure(nobj: PGLUnurbs; count: GLint; aarray: PGLfloat; stride: GLint; atype: GLenum); cdecl;

gluNurbsCurve: procedure(nobj: PGLUnurbs; nknots: GLint; knot: PGLfloat; stride: GLint; ctlarray: PGLfloat; order: GLint; atype: GLenum); cdecl;

gluNurbsSurface: procedure(nobj: PGLUnurbs; sknot_count: GLint; sknot: PGLfloat; tknot_count: GLint; tknot: PGLfloat; s_stride, t_stride: GLint; ctlarray: PGLfloat; sorder, torder: GLint; atype: GLenum); cdecl;

gluLoadSamplingMatrices: procedure(nobj: PGLUnurbs; var modelMatrix, projMatrix: T16dArray; var viewport: TViewPortArray); cdecl;

gluNurbsProperty: procedure(nobj: PGLUnurbs; aproperty: GLenum; value: GLfloat); cdecl;

gluGetNurbsProperty: procedure(nobj: PGLUnurbs; aproperty: GLenum; value: PGLfloat); cdecl;

gluNurbsCallback: procedure(nobj: PGLUnurbs; which: GLenum; fn: TCallBack); cdecl;

gluBeginPolygon: procedure(tess: PGLUtesselator); cdecl;

gluNextContour: procedure(tess: PGLUtesselator; atype: GLenum); cdecl;

gluEndPolygon: procedure(tess: PGLUtesselator); cdecl;

Description

Functions and Procedures

procedure initializeglu(const sonames: array of filenamety);

procedure releaseglu;

Types

TViewPortArray = array [0..3] of GLint;

T16dArray = array [0..15] of GLdouble;

TCallBack = procedure;

T3dArray = array [0..2] of GLdouble;

p3darray = ˆt3darray;

T4pArray = array [0..3] of Pointer;

T4fArray = array [0..3] of GLfloat;

PPointer = ˆPointer;

PGLUnurbs = ˆGLUnurbs;

PGLUquadric = ˆGLUquadric;

PGLUtesselator = ˆGLUtesselator;

GLUnurbsObj = GLUnurbs;

PGLUnurbsObj = PGLUnurbs;

GLUquadricObj = GLUquadric;

PGLUquadricObj = PGLUquadric;

GLUtesselatorObj = GLUtesselator;

PGLUtesselatorObj = PGLUtesselator;

GLUtriangulatorObj = GLUtesselator;

PGLUtriangulatorObj = PGLUtesselator;

TGLUnurbs = GLUnurbs;

TGLUquadric = GLUquadric;

TGLUtesselator = GLUtesselator;

TGLUnurbsObj = GLUnurbsObj;

TGLUquadricObj = GLUquadricObj;

TGLUtesselatorObj = GLUtesselatorObj;

TGLUtriangulatorObj = GLUtriangulatorObj;

GLUquadricErrorProc = procedure(p: GLenum); cdecl;

GLUtessBeginProc = procedure(p: GLenum); cdecl;

GLUtessEdgeFlagProc = procedure(p: GLboolean); cdecl;

GLUtessVertexProc = procedure(p: Pointer); cdecl;

GLUtessEndProc = procedure; cdecl;

GLUtessErrorProc = procedure(p: GLenum); cdecl;

GLUtessCombineProc = procedure(var p1: T3dArray; p2: T4pArray; p3: T4fArray; p4: PPointer); cdecl;

GLUtessBeginDataProc = procedure(p1: GLenum; p2: Pointer); cdecl;

GLUtessEdgeFlagDataProc = procedure(p1: GLboolean; p2: Pointer); cdecl;

GLUtessVertexDataProc = procedure(p1, p2: Pointer); cdecl;

GLUtessEndDataProc = procedure(p: Pointer); cdecl;

GLUtessErrorDataProc = procedure(p1: GLenum; p2: Pointer); cdecl;

GLUtessCombineDataProc = procedure(var p1: T3dArray; var p2: T4pArray; var p3: T4fArray; p4: PPointer; p5: Pointer); cdecl;

GLUnurbsErrorProc = procedure(p: GLenum); cdecl;

Constants

glulib: array[0..1] of filenamety = ('libGLU.so.1','libGLU.so.');

GLU_VERSION_1_1 = 1;

GLU_VERSION_1_2 = 1;

GLU_INVALID_ENUM = 100900;

GLU_INVALID_VALUE = 100901;

GLU_OUT_OF_MEMORY = 100902;

GLU_INCOMPATIBLE_GL_VERSION = 100903;

GLU_VERSION = 100800;

GLU_EXTENSIONS = 100801;

GLU_TRUE = GL_TRUE;

GLU_FALSE = GL_FALSE;

GLU_SMOOTH = 100000;

GLU_FLAT = 100001;

GLU_NONE = 100002;

GLU_POINT = 100010;

GLU_LINE = 100011;

GLU_FILL = 100012;

GLU_SILHOUETTE = 100013;

GLU_OUTSIDE = 100020;

GLU_INSIDE = 100021;

GLU_TESS_MAX_COORD = 1.0e150;

GLU_TESS_WINDING_RULE = 100140;

GLU_TESS_BOUNDARY_ONLY = 100141;

GLU_TESS_TOLERANCE = 100142;

GLU_TESS_WINDING_ODD = 100130;

GLU_TESS_WINDING_NONZERO = 100131;

GLU_TESS_WINDING_POSITIVE = 100132;

GLU_TESS_WINDING_NEGATIVE = 100133;

GLU_TESS_WINDING_ABS_GEQ_TWO = 100134;

GLU_TESS_BEGIN = 100100;

GLU_TESS_VERTEX = 100101;

GLU_TESS_END = 100102;

GLU_TESS_ERROR = 100103;

GLU_TESS_EDGE_FLAG = 100104;

GLU_TESS_COMBINE = 100105;

GLU_TESS_BEGIN_DATA = 100106;

GLU_TESS_VERTEX_DATA = 100107;

GLU_TESS_END_DATA = 100108;

GLU_TESS_ERROR_DATA = 100109;

GLU_TESS_EDGE_FLAG_DATA = 100110;

GLU_TESS_COMBINE_DATA = 100111;

GLU_TESS_ERROR1 = 100151;

GLU_TESS_ERROR2 = 100152;

GLU_TESS_ERROR3 = 100153;

GLU_TESS_ERROR4 = 100154;

GLU_TESS_ERROR5 = 100155;

GLU_TESS_ERROR6 = 100156;

GLU_TESS_ERROR7 = 100157;

GLU_TESS_ERROR8 = 100158;

GLU_TESS_MISSING_BEGIN_POLYGON = GLU_TESS_ERROR1;

GLU_TESS_MISSING_BEGIN_CONTOUR = GLU_TESS_ERROR2;

GLU_TESS_MISSING_END_POLYGON = GLU_TESS_ERROR3;

GLU_TESS_MISSING_END_CONTOUR = GLU_TESS_ERROR4;

GLU_TESS_COORD_TOO_LARGE = GLU_TESS_ERROR5;

GLU_TESS_NEED_COMBINE_CALLBACK = GLU_TESS_ERROR6;

GLU_AUTO_LOAD_MATRIX = 100200;

GLU_CULLING = 100201;

GLU_SAMPLING_TOLERANCE = 100203;

GLU_DISPLAY_MODE = 100204;

GLU_PARAMETRIC_TOLERANCE = 100202;

GLU_SAMPLING_METHOD = 100205;

GLU_U_STEP = 100206;

GLU_V_STEP = 100207;

GLU_PATH_LENGTH = 100215;

GLU_PARAMETRIC_ERROR = 100216;

GLU_DOMAIN_DISTANCE = 100217;

GLU_MAP1_TRIM_2 = 100210;

GLU_MAP1_TRIM_3 = 100211;

GLU_OUTLINE_POLYGON = 100240;

GLU_OUTLINE_PATCH = 100241;

GLU_NURBS_ERROR1 = 100251;

GLU_NURBS_ERROR2 = 100252;

GLU_NURBS_ERROR3 = 100253;

GLU_NURBS_ERROR4 = 100254;

GLU_NURBS_ERROR5 = 100255;

GLU_NURBS_ERROR6 = 100256;

GLU_NURBS_ERROR7 = 100257;

GLU_NURBS_ERROR8 = 100258;

GLU_NURBS_ERROR9 = 100259;

GLU_NURBS_ERROR10 = 100260;

GLU_NURBS_ERROR11 = 100261;

GLU_NURBS_ERROR12 = 100262;

GLU_NURBS_ERROR13 = 100263;

GLU_NURBS_ERROR14 = 100264;

GLU_NURBS_ERROR15 = 100265;

GLU_NURBS_ERROR16 = 100266;

GLU_NURBS_ERROR17 = 100267;

GLU_NURBS_ERROR18 = 100268;

GLU_NURBS_ERROR19 = 100269;

GLU_NURBS_ERROR20 = 100270;

GLU_NURBS_ERROR21 = 100271;

GLU_NURBS_ERROR22 = 100272;

GLU_NURBS_ERROR23 = 100273;

GLU_NURBS_ERROR24 = 100274;

GLU_NURBS_ERROR25 = 100275;

GLU_NURBS_ERROR26 = 100276;

GLU_NURBS_ERROR27 = 100277;

GLU_NURBS_ERROR28 = 100278;

GLU_NURBS_ERROR29 = 100279;

GLU_NURBS_ERROR30 = 100280;

GLU_NURBS_ERROR31 = 100281;

GLU_NURBS_ERROR32 = 100282;

GLU_NURBS_ERROR33 = 100283;

GLU_NURBS_ERROR34 = 100284;

GLU_NURBS_ERROR35 = 100285;

GLU_NURBS_ERROR36 = 100286;

GLU_NURBS_ERROR37 = 100287;

GLU_CW = 100120;

GLU_CCW = 100121;

GLU_INTERIOR = 100122;

GLU_EXTERIOR = 100123;

GLU_UNKNOWN = 100124;

GLU_BEGIN = GLU_TESS_BEGIN;

GLU_VERTEX = GLU_TESS_VERTEX;

GLU_END = GLU_TESS_END;

GLU_ERROR = GLU_TESS_ERROR;

GLU_EDGE_FLAG = GLU_TESS_EDGE_FLAG;

Variables

gluErrorString: function(errCode: GLenum): PChar; cdecl;

gluErrorUnicodeStringEXT: function(errCode: GLenum): PWideChar; cdecl;

gluGetString: function(name: GLenum): PChar; cdecl;

gluOrtho2D: procedure(left,right, bottom, top: GLdouble); cdecl;

gluPerspective: procedure(fovy, aspect, zNear, zFar: GLdouble); cdecl;

gluPickMatrix: procedure(x, y, width, height: GLdouble; var viewport: TViewPortArray); cdecl;

gluLookAt: procedure(eyex, eyey, eyez, centerx, centery, centerz, upx, upy, upz: GLdouble); cdecl;

gluProject: function(objx, objy, objz: GLdouble; var modelMatrix, projMatrix: T16dArray; var viewport: TViewPortArray; winx, winy, winz: PGLdouble): Integer; cdecl;

gluUnProject: function(winx, winy, winz: GLdouble; var modelMatrix, projMatrix: T16dArray; var viewport: TViewPortArray; objx, objy, objz: PGLdouble): Integer; cdecl;

gluScaleImage: function(format: GLenum; widthin, heightin: GLint; typein: GLenum; const datain: Pointer; widthout, heightout: GLint; typeout: GLenum; dataout: Pointer): Integer; cdecl;

gluBuild1DMipmaps: function(target: GLenum; components, width: GLint; format, atype: GLenum; const data: Pointer): Integer; cdecl;

gluBuild2DMipmaps: function(target: GLenum; components, width, height: GLint; format, atype: GLenum; const data: Pointer): Integer; cdecl;

gluNewQuadric: function: PGLUquadric; cdecl;

gluDeleteQuadric: procedure(state: PGLUquadric); cdecl;

gluQuadricNormals: procedure(quadObject: PGLUquadric; normals: GLenum); cdecl;

gluQuadricTexture: procedure(quadObject: PGLUquadric; textureCoords: GLboolean); cdecl;

gluQuadricOrientation: procedure(quadObject: PGLUquadric; orientation: GLenum); cdecl;

gluQuadricDrawStyle: procedure(quadObject: PGLUquadric; drawStyle: GLenum); cdecl;

gluCylinder: procedure(qobj: PGLUquadric; baseRadius, topRadius, height: GLdouble; slices, stacks: GLint); cdecl;

gluDisk: procedure(qobj: PGLUquadric; innerRadius, outerRadius: GLdouble; slices, loops: GLint); cdecl;

gluPartialDisk: procedure(qobj: PGLUquadric; innerRadius, outerRadius: GLdouble; slices, loops: GLint; startAngle, sweepAngle: GLdouble); cdecl;