Unit msegl

Description

Uses

Classes, Interfaces, Objects and Records

Functions and Procedures

Types

Constants

Variables

Description

Overview

Functions and Procedures

procedure initializeopengl(const sonames: array of filenamety);

procedure releaseopengl;

procedure regglinit(const initproc: dynlibprocty);

procedure reggldeinit(const deinitproc: dynlibprocty);

Types

GLenum = Cardinal;

PGLenum = ˆGLenum;

GLboolean = Byte;

PGLboolean = ˆGLboolean;

GLbitfield = Cardinal;

PGLbitfield = ˆGLbitfield;

GLbyte = ShortInt;

PGLbyte = ˆGLbyte;

GLshort = SmallInt;

PGLshort = ˆGLshort;

GLint = Integer;

PGLint = ˆGLint;

GLsizei = Integer;

PGLsizei = ˆGLsizei;

GLubyte = Byte;

PGLubyte = ˆGLubyte;

GLushort = Word;

PGLushort = ˆGLushort;

GLuint = Cardinal;

PGLuint = ˆGLuint;

GLfloat = Single;

PGLfloat = ˆGLfloat;

GLclampf = Single;

PGLclampf = ˆGLclampf;

GLdouble = Double;

PGLdouble = ˆGLdouble;

GLclampd = Double;

PGLclampd = ˆGLclampd;

PGLvoid = Pointer;

PPGLvoid = ˆPGLvoid;

TGLenum = GLenum;

TGLboolean = GLboolean;

TGLbitfield = GLbitfield;

TGLbyte = GLbyte;

TGLshort = GLshort;

TGLint = GLint;

TGLsizei = GLsizei;

TGLubyte = GLubyte;

TGLushort = GLushort;

TGLuint = GLuint;

TGLfloat = GLfloat;

TGLclampf = GLclampf;

TGLdouble = GLdouble;

TGLclampd = GLclampd;

PFNGLARRAYELEMENTEXTPROC = procedure(i: GLint); cdecl;

PFNGLDRAWARRAYSEXTPROC = procedure(mode: GLenum; first: GLint; count: GLsizei); cdecl;

PFNGLVERTEXPOINTEREXTPROC = procedure(size: GLint; atype: GLenum; stride, count: GLsizei; const pointer: Pointer); cdecl;

PFNGLNORMALPOINTEREXTPROC = procedure(atype: GLenum; stride, count: GLsizei; const pointer: Pointer); cdecl;

PFNGLCOLORPOINTEREXTPROC = procedure(size: GLint; atype: GLenum; stride, count: GLsizei; const pointer: Pointer); cdecl;

PFNGLINDEXPOINTEREXTPROC = procedure(atype: GLenum; stride, count: GLsizei; const pointer: Pointer); cdecl;

PFNGLTEXCOORDPOINTEREXTPROC = procedure(size: GLint; atype: GLenum; stride, count: GLsizei; const pointer: Pointer); cdecl;

PFNGLEDGEFLAGPOINTEREXTPROC = procedure(stride, count: GLsizei; const pointer: PGLboolean); cdecl;

PFNGLGETPOINTERVEXTPROC = procedure(pname: GLenum; params: Pointer); cdecl;

PFNGLARRAYELEMENTARRAYEXTPROC = procedure(mode: GLenum; count: GLsizei; const pi: Pointer); cdecl;

PFNGLADDSWAPHINTRECTWINPROC = procedure(x, y: GLint; width, height: GLsizei); cdecl;

PFNGLCOLORTABLEEXTPROC = procedure(target, internalFormat: GLenum; width: GLsizei; format, atype: GLenum; const data: Pointer); cdecl;

PFNGLCOLORSUBTABLEEXTPROC = procedure(target: GLenum; start, count: GLsizei; format, atype: GLenum; const data: Pointer); cdecl;

PFNGLGETCOLORTABLEEXTPROC = procedure(target, format, atype: GLenum; data: Pointer); cdecl;

PFNGLGETCOLORTABLEPARAMETERIVEXTPROC = procedure(target, pname: GLenum; params: PGLint); cdecl;

PFNGLGETCOLORTABLEPARAMETERFVEXTPROC = procedure(target, pname: GLenum; params: PGLfloat); cdecl;

Constants

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

GL_VERSION_1_1 = 1;

GL_ACCUM = $0100;

GL_LOAD = $0101;

GL_RETURN = $0102;

GL_MULT = $0103;

GL_ADD = $0104;

GL_NEVER = $0200;

GL_LESS = $0201;

GL_EQUAL = $0202;

GL_LEQUAL = $0203;

GL_GREATER = $0204;

GL_NOTEQUAL = $0205;

GL_GEQUAL = $0206;

GL_ALWAYS = $0207;

GL_CURRENT_BIT = $00000001;

GL_POINT_BIT = $00000002;

GL_LINE_BIT = $00000004;

GL_POLYGON_BIT = $00000008;

GL_POLYGON_STIPPLE_BIT = $00000010;

GL_PIXEL_MODE_BIT = $00000020;

GL_LIGHTING_BIT = $00000040;

GL_FOG_BIT = $00000080;

GL_DEPTH_BUFFER_BIT = $00000100;

GL_ACCUM_BUFFER_BIT = $00000200;

GL_STENCIL_BUFFER_BIT = $00000400;

GL_VIEWPORT_BIT = $00000800;

GL_TRANSFORM_BIT = $00001000;

GL_ENABLE_BIT = $00002000;

GL_COLOR_BUFFER_BIT = $00004000;

GL_HINT_BIT = $00008000;

GL_EVAL_BIT = $00010000;

GL_LIST_BIT = $00020000;

GL_TEXTURE_BIT = $00040000;

GL_SCISSOR_BIT = $00080000;

GL_ALL_ATTRIB_BITS = $000FFFFF;

GL_POINTS = $0000;

GL_LINES = $0001;

GL_LINE_LOOP = $0002;

GL_LINE_STRIP = $0003;

GL_TRIANGLES = $0004;

GL_TRIANGLE_STRIP = $0005;

GL_TRIANGLE_FAN = $0006;

GL_QUADS = $0007;

GL_QUAD_STRIP = $0008;

GL_POLYGON = $0009;

GL_ZERO = 0;

GL_ONE = 1;

GL_SRC_COLOR = $0300;

GL_ONE_MINUS_SRC_COLOR = $0301;

GL_SRC_ALPHA = $0302;

GL_ONE_MINUS_SRC_ALPHA = $0303;

GL_DST_ALPHA = $0304;

GL_ONE_MINUS_DST_ALPHA = $0305;

GL_DST_COLOR = $0306;

GL_ONE_MINUS_DST_COLOR = $0307;

GL_SRC_ALPHA_SATURATE = $0308;

GL_TRUE = 1;

GL_FALSE = 0;

GL_CLIP_PLANE0 = $3000;

GL_CLIP_PLANE1 = $3001;

GL_CLIP_PLANE2 = $3002;

GL_CLIP_PLANE3 = $3003;

GL_CLIP_PLANE4 = $3004;

GL_CLIP_PLANE5 = $3005;

GL_BYTE = $1400;

GL_UNSIGNED_BYTE = $1401;

GL_SHORT = $1402;

GL_UNSIGNED_SHORT = $1403;

GL_INT = $1404;

GL_UNSIGNED_INT = $1405;

GL_FLOAT = $1406;

GL_2_BYTES = $1407;

GL_3_BYTES = $1408;

GL_4_BYTES = $1409;

GL_DOUBLE = $140A;

GL_NONE = 0;

GL_FRONT_LEFT = $0400;

GL_FRONT_RIGHT = $0401;

GL_BACK_LEFT = $0402;

GL_BACK_RIGHT = $0403;

GL_FRONT = $0404;

GL_BACK = $0405;

GL_LEFT = $0406;

GL_RIGHT = $0407;

GL_FRONT_AND_BACK = $0408;

GL_AUX0 = $0409;

GL_AUX1 = $040A;

GL_AUX2 = $040B;

GL_AUX3 = $040C;

GL_NO_ERROR = 0;

GL_INVALID_ENUM = $0500;

GL_INVALID_VALUE = $0501;

GL_INVALID_OPERATION = $0502;

GL_STACK_OVERFLOW = $0503;

GL_STACK_UNDERFLOW = $0504;

GL_OUT_OF_MEMORY = $0505;

GL_2D = $0600;

GL_3D = $0601;

GL_3D_COLOR = $0602;

GL_3D_COLOR_TEXTURE = $0603;

GL_4D_COLOR_TEXTURE = $0604;

GL_PASS_THROUGH_TOKEN = $0700;

GL_POINT_TOKEN = $0701;

GL_LINE_TOKEN = $0702;

GL_POLYGON_TOKEN = $0703;

GL_BITMAP_TOKEN = $0704;

GL_DRAW_PIXEL_TOKEN = $0705;

GL_COPY_PIXEL_TOKEN = $0706;

GL_LINE_RESET_TOKEN = $0707;

GL_EXP = $0800;

GL_EXP2 = $0801;

GL_CW = $0900;

GL_CCW = $0901;

GL_COEFF = $0A00;

GL_ORDER = $0A01;

GL_DOMAIN = $0A02;

GL_CURRENT_COLOR = $0B00;

GL_CURRENT_INDEX = $0B01;

GL_CURRENT_NORMAL = $0B02;

GL_CURRENT_TEXTURE_COORDS = $0B03;

GL_CURRENT_RASTER_COLOR = $0B04;

GL_CURRENT_RASTER_INDEX = $0B05;

GL_CURRENT_RASTER_TEXTURE_COORDS = $0B06;

GL_CURRENT_RASTER_POSITION = $0B07;

GL_CURRENT_RASTER_POSITION_VALID = $0B08;

GL_CURRENT_RASTER_DISTANCE = $0B09;

GL_POINT_SMOOTH = $0B10;

GL_POINT_SIZE = $0B11;

GL_POINT_SIZE_RANGE = $0B12;

GL_POINT_SIZE_GRANULARITY = $0B13;

GL_LINE_SMOOTH = $0B20;

GL_LINE_WIDTH = $0B21;

GL_LINE_WIDTH_RANGE = $0B22;

GL_LINE_WIDTH_GRANULARITY = $0B23;

GL_LINE_STIPPLE = $0B24;

GL_LINE_STIPPLE_PATTERN = $0B25;

GL_LINE_STIPPLE_REPEAT = $0B26;

GL_LIST_MODE = $0B30;

GL_MAX_LIST_NESTING = $0B31;

GL_LIST_BASE = $0B32;

GL_LIST_INDEX = $0B33;

GL_POLYGON_MODE = $0B40;

GL_POLYGON_SMOOTH = $0B41;

GL_POLYGON_STIPPLE = $0B42;

GL_EDGE_FLAG = $0B43;

GL_CULL_FACE = $0B44;

GL_CULL_FACE_MODE = $0B45;

GL_FRONT_FACE = $0B46;

GL_LIGHTING = $0B50;

GL_LIGHT_MODEL_LOCAL_VIEWER = $0B51;

GL_LIGHT_MODEL_TWO_SIDE = $0B52;

GL_LIGHT_MODEL_AMBIENT = $0B53;

GL_SHADE_MODEL = $0B54;

GL_COLOR_MATERIAL_FACE = $0B55;

GL_COLOR_MATERIAL_PARAMETER = $0B56;

GL_COLOR_MATERIAL = $0B57;

GL_FOG = $0B60;

GL_FOG_INDEX = $0B61;

GL_FOG_DENSITY = $0B62;

GL_FOG_START = $0B63;

GL_FOG_END = $0B64;

GL_FOG_MODE = $0B65;

GL_FOG_COLOR = $0B66;

GL_DEPTH_RANGE = $0B70;

GL_DEPTH_TEST = $0B71;

GL_DEPTH_WRITEMASK = $0B72;

GL_DEPTH_CLEAR_VALUE = $0B73;

GL_DEPTH_FUNC = $0B74;

GL_ACCUM_CLEAR_VALUE = $0B80;

GL_STENCIL_TEST = $0B90;

GL_STENCIL_CLEAR_VALUE = $0B91;

GL_STENCIL_FUNC = $0B92;

GL_STENCIL_VALUE_MASK = $0B93;

GL_STENCIL_FAIL = $0B94;

GL_STENCIL_PASS_DEPTH_FAIL = $0B95;

GL_STENCIL_PASS_DEPTH_PASS = $0B96;

GL_STENCIL_REF = $0B97;

GL_STENCIL_WRITEMASK = $0B98;

GL_MATRIX_MODE = $0BA0;

GL_NORMALIZE = $0BA1;

GL_VIEWPORT = $0BA2;

GL_MODELVIEW_STACK_DEPTH = $0BA3;

GL_PROJECTION_STACK_DEPTH = $0BA4;

GL_TEXTURE_STACK_DEPTH = $0BA5;

GL_MODELVIEW_MATRIX = $0BA6;

GL_PROJECTION_MATRIX = $0BA7;

GL_TEXTURE_MATRIX = $0BA8;

GL_ATTRIB_STACK_DEPTH = $0BB0;

GL_CLIENT_ATTRIB_STACK_DEPTH = $0BB1;

GL_ALPHA_TEST = $0BC0;

GL_ALPHA_TEST_FUNC = $0BC1;

GL_ALPHA_TEST_REF = $0BC2;

GL_DITHER = $0BD0;

GL_BLEND_DST = $0BE0;

GL_BLEND_SRC = $0BE1;

GL_BLEND = $0BE2;

GL_LOGIC_OP_MODE = $0BF0;

GL_INDEX_LOGIC_OP = $0BF1;

GL_COLOR_LOGIC_OP = $0BF2;

GL_AUX_BUFFERS = $0C00;

GL_DRAW_BUFFER = $0C01;

GL_READ_BUFFER = $0C02;

GL_SCISSOR_BOX = $0C10;

GL_SCISSOR_TEST = $0C11;

GL_INDEX_CLEAR_VALUE = $0C20;

GL_INDEX_WRITEMASK = $0C21;

GL_COLOR_CLEAR_VALUE = $0C22;

GL_COLOR_WRITEMASK = $0C23;

GL_INDEX_MODE = $0C30;

GL_RGBA_MODE = $0C31;

GL_DOUBLEBUFFER = $0C32;

GL_STEREO = $0C33;

GL_RENDER_MODE = $0C40;

GL_PERSPECTIVE_CORRECTION_HINT = $0C50;

GL_POINT_SMOOTH_HINT = $0C51;

GL_LINE_SMOOTH_HINT = $0C52;

GL_POLYGON_SMOOTH_HINT = $0C53;

GL_FOG_HINT = $0C54;

GL_TEXTURE_GEN_S = $0C60;

GL_TEXTURE_GEN_T = $0C61;

GL_TEXTURE_GEN_R = $0C62;

GL_TEXTURE_GEN_Q = $0C63;

GL_PIXEL_MAP_I_TO_I = $0C70;

GL_PIXEL_MAP_S_TO_S = $0C71;

GL_PIXEL_MAP_I_TO_R = $0C72;

GL_PIXEL_MAP_I_TO_G = $0C73;

GL_PIXEL_MAP_I_TO_B = $0C74;

GL_PIXEL_MAP_I_TO_A = $0C75;

GL_PIXEL_MAP_R_TO_R = $0C76;

GL_PIXEL_MAP_G_TO_G = $0C77;

GL_PIXEL_MAP_B_TO_B = $0C78;

GL_PIXEL_MAP_A_TO_A = $0C79;

GL_PIXEL_MAP_I_TO_I_SIZE = $0CB0;

GL_PIXEL_MAP_S_TO_S_SIZE = $0CB1;

GL_PIXEL_MAP_I_TO_R_SIZE = $0CB2;

GL_PIXEL_MAP_I_TO_G_SIZE = $0CB3;

GL_PIXEL_MAP_I_TO_B_SIZE = $0CB4;

GL_PIXEL_MAP_I_TO_A_SIZE = $0CB5;

GL_PIXEL_MAP_R_TO_R_SIZE = $0CB6;

GL_PIXEL_MAP_G_TO_G_SIZE = $0CB7;

GL_PIXEL_MAP_B_TO_B_SIZE = $0CB8;

GL_PIXEL_MAP_A_TO_A_SIZE = $0CB9;

GL_UNPACK_SWAP_BYTES = $0CF0;

GL_UNPACK_LSB_FIRST = $0CF1;

GL_UNPACK_ROW_LENGTH = $0CF2;

GL_UNPACK_SKIP_ROWS = $0CF3;

GL_UNPACK_SKIP_PIXELS = $0CF4;

GL_UNPACK_ALIGNMENT = $0CF5;

GL_PACK_SWAP_BYTES = $0D00;

GL_PACK_LSB_FIRST = $0D01;

GL_PACK_ROW_LENGTH = $0D02;

GL_PACK_SKIP_ROWS = $0D03;

GL_PACK_SKIP_PIXELS = $0D04;

GL_PACK_ALIGNMENT = $0D05;

GL_MAP_COLOR = $0D10;

GL_MAP_STENCIL = $0D11;

GL_INDEX_SHIFT = $0D12;

GL_INDEX_OFFSET = $0D13;

GL_RED_SCALE = $0D14;

GL_RED_BIAS = $0D15;

GL_ZOOM_X = $0D16;

GL_ZOOM_Y = $0D17;

GL_GREEN_SCALE = $0D18;

GL_GREEN_BIAS = $0D19;

GL_BLUE_SCALE = $0D1A;

GL_BLUE_BIAS = $0D1B;

GL_ALPHA_SCALE = $0D1C;

GL_ALPHA_BIAS = $0D1D;

GL_DEPTH_SCALE = $0D1E;

GL_DEPTH_BIAS = $0D1F;

GL_MAX_EVAL_ORDER = $0D30;

GL_MAX_LIGHTS = $0D31;

GL_MAX_CLIP_PLANES = $0D32;

GL_MAX_TEXTURE_SIZE = $0D33;

GL_MAX_PIXEL_MAP_TABLE = $0D34;

GL_MAX_ATTRIB_STACK_DEPTH = $0D35;

GL_MAX_MODELVIEW_STACK_DEPTH = $0D36;

GL_MAX_NAME_STACK_DEPTH = $0D37;

GL_MAX_PROJECTION_STACK_DEPTH = $0D38;

GL_MAX_TEXTURE_STACK_DEPTH = $0D39;

GL_MAX_VIEWPORT_DIMS = $0D3A;

GL_MAX_CLIENT_ATTRIB_STACK_DEPTH = $0D3B;

GL_SUBPIXEL_BITS = $0D50;

GL_INDEX_BITS = $0D51;

GL_RED_BITS = $0D52;

GL_GREEN_BITS = $0D53;

GL_BLUE_BITS = $0D54;

GL_ALPHA_BITS = $0D55;

GL_DEPTH_BITS = $0D56;

GL_STENCIL_BITS = $0D57;

GL_ACCUM_RED_BITS = $0D58;

GL_ACCUM_GREEN_BITS = $0D59;

GL_ACCUM_BLUE_BITS = $0D5A;

GL_ACCUM_ALPHA_BITS = $0D5B;

GL_NAME_STACK_DEPTH = $0D70;

GL_AUTO_NORMAL = $0D80;

GL_MAP1_COLOR_4 = $0D90;

GL_MAP1_INDEX = $0D91;

GL_MAP1_NORMAL = $0D92;

GL_MAP1_TEXTURE_COORD_1 = $0D93;

GL_MAP1_TEXTURE_COORD_2 = $0D94;

GL_MAP1_TEXTURE_COORD_3 = $0D95;

GL_MAP1_TEXTURE_COORD_4 = $0D96;

GL_MAP1_VERTEX_3 = $0D97;

GL_MAP1_VERTEX_4 = $0D98;

GL_MAP2_COLOR_4 = $0DB0;

GL_MAP2_INDEX = $0DB1;

GL_MAP2_NORMAL = $0DB2;

GL_MAP2_TEXTURE_COORD_1 = $0DB3;

GL_MAP2_TEXTURE_COORD_2 = $0DB4;

GL_MAP2_TEXTURE_COORD_3 = $0DB5;

GL_MAP2_TEXTURE_COORD_4 = $0DB6;

GL_MAP2_VERTEX_3 = $0DB7;

GL_MAP2_VERTEX_4 = $0DB8;

GL_MAP1_GRID_DOMAIN = $0DD0;

GL_MAP1_GRID_SEGMENTS = $0DD1;

GL_MAP2_GRID_DOMAIN = $0DD2;

GL_MAP2_GRID_SEGMENTS = $0DD3;

GL_TEXTURE_1D = $0DE0;

GL_TEXTURE_2D = $0DE1;

GL_FEEDBACK_BUFFER_POINTER = $0DF0;

GL_FEEDBACK_BUFFER_SIZE = $0DF1;

GL_FEEDBACK_BUFFER_TYPE = $0DF2;

GL_SELECTION_BUFFER_POINTER = $0DF3;

GL_SELECTION_BUFFER_SIZE = $0DF4;

GL_TEXTURE_WIDTH = $1000;

GL_TEXTURE_HEIGHT = $1001;

GL_TEXTURE_INTERNAL_FORMAT = $1003;

GL_TEXTURE_BORDER_COLOR = $1004;

GL_TEXTURE_BORDER = $1005;

GL_DONT_CARE = $1100;

GL_FASTEST = $1101;

GL_NICEST = $1102;

GL_LIGHT0 = $4000;

GL_LIGHT1 = $4001;

GL_LIGHT2 = $4002;

GL_LIGHT3 = $4003;

GL_LIGHT4 = $4004;

GL_LIGHT5 = $4005;

GL_LIGHT6 = $4006;

GL_LIGHT7 = $4007;

GL_AMBIENT = $1200;

GL_DIFFUSE = $1201;

GL_SPECULAR = $1202;

GL_POSITION = $1203;

GL_SPOT_DIRECTION = $1204;

GL_SPOT_EXPONENT = $1205;

GL_SPOT_CUTOFF = $1206;

GL_CONSTANT_ATTENUATION = $1207;

GL_LINEAR_ATTENUATION = $1208;

GL_QUADRATIC_ATTENUATION = $1209;

GL_COMPILE = $1300;

GL_COMPILE_AND_EXECUTE = $1301;

GL_CLEAR = $1500;

GL_AND = $1501;

GL_AND_REVERSE = $1502;

GL_COPY = $1503;

GL_AND_INVERTED = $1504;

GL_NOOP = $1505;

GL_XOR = $1506;

GL_OR = $1507;

GL_NOR = $1508;

GL_EQUIV = $1509;

GL_INVERT = $150A;

GL_OR_REVERSE = $150B;

GL_COPY_INVERTED = $150C;

GL_OR_INVERTED = $150D;

GL_NAND = $150E;

GL_SET = $150F;

GL_EMISSION = $1600;

GL_SHININESS = $1601;

GL_AMBIENT_AND_DIFFUSE = $1602;

GL_COLOR_INDEXES = $1603;

GL_MODELVIEW = $1700;

GL_PROJECTION = $1701;

GL_TEXTURE = $1702;

GL_COLOR = $1800;

GL_DEPTH = $1801;

GL_STENCIL = $1802;

GL_COLOR_INDEX = $1900;

GL_STENCIL_INDEX = $1901;

GL_DEPTH_COMPONENT = $1902;

GL_RED = $1903;

GL_GREEN = $1904;

GL_BLUE = $1905;

GL_ALPHA = $1906;

GL_RGB = $1907;

GL_RGBA = $1908;

GL_LUMINANCE = $1909;

GL_LUMINANCE_ALPHA = $190A;

GL_BITMAP = $1A00;

GL_POINT = $1B00;

GL_LINE = $1B01;

GL_FILL = $1B02;

GL_RENDER = $1C00;

GL_FEEDBACK = $1C01;

GL_SELECT = $1C02;

GL_FLAT = $1D00;

GL_SMOOTH = $1D01;

GL_KEEP = $1E00;

GL_REPLACE = $1E01;

GL_INCR = $1E02;

GL_DECR = $1E03;

GL_VENDOR = $1F00;

GL_RENDERER = $1F01;

GL_VERSION = $1F02;

GL_EXTENSIONS = $1F03;

GL_S = $2000;

GL_T = $2001;

GL_R = $2002;

GL_Q = $2003;

GL_MODULATE = $2100;

GL_DECAL = $2101;

GL_TEXTURE_ENV_MODE = $2200;

GL_TEXTURE_ENV_COLOR = $2201;

GL_TEXTURE_ENV = $2300;

GL_EYE_LINEAR = $2400;

GL_OBJECT_LINEAR = $2401;

GL_SPHERE_MAP = $2402;

GL_TEXTURE_GEN_MODE = $2500;

GL_OBJECT_PLANE = $2501;

GL_EYE_PLANE = $2502;

GL_NEAREST = $2600;

GL_LINEAR = $2601;

GL_NEAREST_MIPMAP_NEAREST = $2700;

GL_LINEAR_MIPMAP_NEAREST = $2701;

GL_NEAREST_MIPMAP_LINEAR = $2702;

GL_LINEAR_MIPMAP_LINEAR = $2703;

GL_TEXTURE_MAG_FILTER = $2800;

GL_TEXTURE_MIN_FILTER = $2801;

GL_TEXTURE_WRAP_S = $2802;

GL_TEXTURE_WRAP_T = $2803;

GL_CLAMP = $2900;

GL_REPEAT = $2901;

GL_CLIENT_PIXEL_STORE_BIT = $00000001;

GL_CLIENT_VERTEX_ARRAY_BIT = $00000002;

GL_CLIENT_ALL_ATTRIB_BITS = $FFFFFFFF;

GL_POLYGON_OFFSET_FACTOR = $8038;

GL_POLYGON_OFFSET_UNITS = $2A00;

GL_POLYGON_OFFSET_POINT = $2A01;

GL_POLYGON_OFFSET_LINE = $2A02;

GL_POLYGON_OFFSET_FILL = $8037;

GL_ALPHA4 = $803B;

GL_ALPHA8 = $803C;

GL_ALPHA12 = $803D;

GL_ALPHA16 = $803E;

GL_LUMINANCE4 = $803F;

GL_LUMINANCE8 = $8040;

GL_LUMINANCE12 = $8041;

GL_LUMINANCE16 = $8042;

GL_LUMINANCE4_ALPHA4 = $8043;

GL_LUMINANCE6_ALPHA2 = $8044;

GL_LUMINANCE8_ALPHA8 = $8045;

GL_LUMINANCE12_ALPHA4 = $8046;

GL_LUMINANCE12_ALPHA12 = $8047;

GL_LUMINANCE16_ALPHA16 = $8048;

GL_INTENSITY = $8049;

GL_INTENSITY4 = $804A;

GL_INTENSITY8 = $804B;

GL_INTENSITY12 = $804C;

GL_INTENSITY16 = $804D;

GL_R3_G3_B2 = $2A10;

GL_RGB4 = $804F;

GL_RGB5 = $8050;

GL_RGB8 = $8051;

GL_RGB10 = $8052;

GL_RGB12 = $8053;

GL_RGB16 = $8054;

GL_RGBA2 = $8055;

GL_RGBA4 = $8056;

GL_RGB5_A1 = $8057;

GL_RGBA8 = $8058;

GL_RGB10_A2 = $8059;

GL_RGBA12 = $805A;

GL_RGBA16 = $805B;

GL_TEXTURE_RED_SIZE = $805C;

GL_TEXTURE_GREEN_SIZE = $805D;

GL_TEXTURE_BLUE_SIZE = $805E;

GL_TEXTURE_ALPHA_SIZE = $805F;

GL_TEXTURE_LUMINANCE_SIZE = $8060;

GL_TEXTURE_INTENSITY_SIZE = $8061;

GL_PROXY_TEXTURE_1D = $8063;

GL_PROXY_TEXTURE_2D = $8064;

GL_TEXTURE_PRIORITY = $8066;

GL_TEXTURE_RESIDENT = $8067;

GL_TEXTURE_BINDING_1D = $8068;

GL_TEXTURE_BINDING_2D = $8069;

GL_VERTEX_ARRAY = $8074;

GL_NORMAL_ARRAY = $8075;

GL_COLOR_ARRAY = $8076;

GL_INDEX_ARRAY = $8077;

GL_TEXTURE_COORD_ARRAY = $8078;

GL_EDGE_FLAG_ARRAY = $8079;

GL_VERTEX_ARRAY_SIZE = $807A;

GL_VERTEX_ARRAY_TYPE = $807B;

GL_VERTEX_ARRAY_STRIDE = $807C;

GL_NORMAL_ARRAY_TYPE = $807E;

GL_NORMAL_ARRAY_STRIDE = $807F;

GL_COLOR_ARRAY_SIZE = $8081;

GL_COLOR_ARRAY_TYPE = $8082;

GL_COLOR_ARRAY_STRIDE = $8083;

GL_INDEX_ARRAY_TYPE = $8085;

GL_INDEX_ARRAY_STRIDE = $8086;

GL_TEXTURE_COORD_ARRAY_SIZE = $8088;

GL_TEXTURE_COORD_ARRAY_TYPE = $8089;

GL_TEXTURE_COORD_ARRAY_STRIDE = $808A;

GL_EDGE_FLAG_ARRAY_STRIDE = $808C;

GL_VERTEX_ARRAY_POINTER = $808E;

GL_NORMAL_ARRAY_POINTER = $808F;

GL_COLOR_ARRAY_POINTER = $8090;

GL_INDEX_ARRAY_POINTER = $8091;

GL_TEXTURE_COORD_ARRAY_POINTER = $8092;

GL_EDGE_FLAG_ARRAY_POINTER = $8093;

GL_V2F = $2A20;

GL_V3F = $2A21;

GL_C4UB_V2F = $2A22;

GL_C4UB_V3F = $2A23;

GL_C3F_V3F = $2A24;

GL_N3F_V3F = $2A25;

GL_C4F_N3F_V3F = $2A26;

GL_T2F_V3F = $2A27;

GL_T4F_V4F = $2A28;

GL_T2F_C4UB_V3F = $2A29;

GL_T2F_C3F_V3F = $2A2A;

GL_T2F_N3F_V3F = $2A2B;

GL_T2F_C4F_N3F_V3F = $2A2C;

GL_T4F_C4F_N3F_V4F = $2A2D;

GL_EXT_vertex_array = 1;

GL_WIN_swap_hint = 1;

GL_EXT_bgra = 1;

GL_EXT_paletted_texture = 1;

GL_VERTEX_ARRAY_EXT = $8074;

GL_NORMAL_ARRAY_EXT = $8075;

GL_COLOR_ARRAY_EXT = $8076;

GL_INDEX_ARRAY_EXT = $8077;

GL_TEXTURE_COORD_ARRAY_EXT = $8078;

GL_EDGE_FLAG_ARRAY_EXT = $8079;

GL_VERTEX_ARRAY_SIZE_EXT = $807A;

GL_VERTEX_ARRAY_TYPE_EXT = $807B;

GL_VERTEX_ARRAY_STRIDE_EXT = $807C;

GL_VERTEX_ARRAY_COUNT_EXT = $807D;

GL_NORMAL_ARRAY_TYPE_EXT = $807E;

GL_NORMAL_ARRAY_STRIDE_EXT = $807F;

GL_NORMAL_ARRAY_COUNT_EXT = $8080;

GL_COLOR_ARRAY_SIZE_EXT = $8081;

GL_COLOR_ARRAY_TYPE_EXT = $8082;

GL_COLOR_ARRAY_STRIDE_EXT = $8083;

GL_COLOR_ARRAY_COUNT_EXT = $8084;

GL_INDEX_ARRAY_TYPE_EXT = $8085;

GL_INDEX_ARRAY_STRIDE_EXT = $8086;

GL_INDEX_ARRAY_COUNT_EXT = $8087;

GL_TEXTURE_COORD_ARRAY_SIZE_EXT = $8088;

GL_TEXTURE_COORD_ARRAY_TYPE_EXT = $8089;

GL_TEXTURE_COORD_ARRAY_STRIDE_EXT = $808A;

GL_TEXTURE_COORD_ARRAY_COUNT_EXT = $808B;

GL_EDGE_FLAG_ARRAY_STRIDE_EXT = $808C;

GL_EDGE_FLAG_ARRAY_COUNT_EXT = $808D;

GL_VERTEX_ARRAY_POINTER_EXT = $808E;

GL_NORMAL_ARRAY_POINTER_EXT = $808F;

GL_COLOR_ARRAY_POINTER_EXT = $8090;

GL_INDEX_ARRAY_POINTER_EXT = $8091;

GL_TEXTURE_COORD_ARRAY_POINTER_EXT = $8092;

GL_EDGE_FLAG_ARRAY_POINTER_EXT = $8093;

GL_DOUBLE_EXT = GL_DOUBLE;

GL_BGR_EXT = $80E0;

GL_BGRA_EXT = $80E1;

GL_COLOR_TABLE_FORMAT_EXT = $80D8;

GL_COLOR_TABLE_WIDTH_EXT = $80D9;

GL_COLOR_TABLE_RED_SIZE_EXT = $80DA;

GL_COLOR_TABLE_GREEN_SIZE_EXT = $80DB;

GL_COLOR_TABLE_BLUE_SIZE_EXT = $80DC;

GL_COLOR_TABLE_ALPHA_SIZE_EXT = $80DD;

GL_COLOR_TABLE_LUMINANCE_SIZE_EXT = $80DE;

GL_COLOR_TABLE_INTENSITY_SIZE_EXT = $80DF;

GL_COLOR_INDEX1_EXT = $80E2;

GL_COLOR_INDEX2_EXT = $80E3;

GL_COLOR_INDEX4_EXT = $80E4;

GL_COLOR_INDEX8_EXT = $80E5;

GL_COLOR_INDEX12_EXT = $80E6;

GL_COLOR_INDEX16_EXT = $80E7;

GL_LOGIC_OP = GL_INDEX_LOGIC_OP;

GL_TEXTURE_COMPONENTS = GL_TEXTURE_INTERNAL_FORMAT;

Variables

glAccum: procedure(op: GLenum; value: GLfloat); cdecl;

glAlphaFunc: procedure(func: GLenum; ref: GLclampf); cdecl;

glAreTexturesResident: function(n: GLsizei; const textures: PGLuint; residences: PGLboolean): GLboolean; cdecl;

glArrayElement: procedure(i: GLint); cdecl;

glBegin: procedure(mode: GLenum); cdecl;

glBindTexture: procedure(target: GLenum; texture: GLuint); cdecl;

glBitmap: procedure(width, height: GLsizei; xorig, yorig: GLfloat; xmove, ymove: GLfloat; const bitmap: PGLubyte); cdecl;

glBlendFunc: procedure(sfactor, dfactor: GLenum); cdecl;

glCallList: procedure(list: GLuint); cdecl;

glCallLists: procedure(n: GLsizei; atype: GLenum; const lists: Pointer); cdecl;

glClear: procedure(mask: GLbitfield); cdecl;

glClearAccum: procedure(red, green, blue, alpha: GLfloat); cdecl;

glClearColor: procedure(red, green, blue, alpha: GLclampf); cdecl;

glClearDepth: procedure(depth: GLclampd); cdecl;

glClearIndex: procedure(c: GLfloat); cdecl;

glClearStencil: procedure(s: GLint); cdecl;

glClipPlane: procedure(plane: GLenum; const equation: PGLdouble); cdecl;

glColor3b: procedure(red, green, blue: GLbyte); cdecl;

glColor3bv: procedure(const v: PGLbyte); cdecl;

glColor3d: procedure(red, green, blue: GLdouble); cdecl;

glColor3dv: procedure(const v: PGLdouble); cdecl;

glColor3f: procedure(red, green, blue: GLfloat); cdecl;

glColor3fv: procedure(const v: PGLfloat); cdecl;

glColor3i: procedure(red, green, blue: GLint); cdecl;

glColor3iv: procedure(const v: PGLint); cdecl;

glColor3s: procedure(red, green, blue: GLshort); cdecl;

glColor3sv: procedure(const v: PGLshort); cdecl;

glColor3ub: procedure(red, green, blue: GLubyte); cdecl;

glColor3ubv: procedure(const v: PGLubyte); cdecl;

glColor3ui: procedure(red, green, blue: GLuint); cdecl;

glColor3uiv: procedure(const v: PGLuint); cdecl;

glColor3us: procedure(red, green, blue: GLushort); cdecl;

glColor3usv: procedure(const v: PGLushort); cdecl;

glColor4b: procedure(red, green, blue, alpha: GLbyte); cdecl;

glColor4bv: procedure(const v: PGLbyte); cdecl;

glColor4d: procedure(red, green, blue, alpha: GLdouble); cdecl;

glColor4dv: procedure(const v: PGLdouble); cdecl;

glColor4f: procedure(red, green, blue, alpha: GLfloat); cdecl;

glColor4fv: procedure(const v: PGLfloat); cdecl;

glColor4i: procedure(red, green, blue, alpha: GLint); cdecl;

glColor4iv: procedure(const v: PGLint); cdecl;

glColor4s: procedure(red, green, blue, alpha: GLshort); cdecl;

glColor4sv: procedure(const v: PGLshort); cdecl;

glColor4ub: procedure(red, green, blue, alpha: GLubyte); cdecl;

glColor4ubv: procedure(const v: PGLubyte); cdecl;

glColor4ui: procedure(red, green, blue, alpha: GLuint); cdecl;

glColor4uiv: procedure(const v: PGLuint); cdecl;

glColor4us: procedure(red, green, blue, alpha: GLushort); cdecl;

glColor4usv: procedure(const v: PGLushort); cdecl;

glColorMask: procedure(red, green, blue, alpha: GLboolean); cdecl;

glColorMaterial: procedure(face, mode: GLenum); cdecl;

glColorPointer: procedure(size: GLint; atype: GLenum; stride: GLsizei; const pointer: Pointer); cdecl;

glCopyPixels: procedure(x, y: GLint; width, height: GLsizei; atype: GLenum); cdecl;

glCopyTexImage1D: procedure(target: GLenum; level: GLint; internalFormat: GLenum; x, y: GLint; width: GLsizei; border: GLint); cdecl;

glCopyTexImage2D: procedure(target: GLenum; level: GLint; internalFormat: GLenum; x, y: GLint; width, height: GLsizei; border: GLint); cdecl;

glCopyTexSubImage1D: procedure(target: GLenum; level, xoffset, x, y: GLint; width: GLsizei); cdecl;

glCopyTexSubImage2D: procedure(target: GLenum; level, xoffset, yoffset, x, y: GLint; width, height: GLsizei); cdecl;

glCullFace: procedure(mode: GLenum); cdecl;

glDeleteLists: procedure(list: GLuint; range: GLsizei); cdecl;

glDeleteTextures: procedure(n: GLsizei; const textures: PGLuint); cdecl;

glDepthFunc: procedure(func: GLenum); cdecl;

glDepthMask: procedure(flag: GLboolean); cdecl;

glDepthRange: procedure(zNear, zFar: GLclampd); cdecl;

glDisable: procedure(cap: GLenum); cdecl;

glDisableClientState: procedure(aarray: GLenum); cdecl;

glDrawArrays: procedure(mode: GLenum; first: GLint; count: GLsizei); cdecl;

glDrawBuffer: procedure(mode: GLenum); cdecl;

glDrawElements: procedure(mode: GLenum; count: GLsizei; atype: GLenum; const indices: Pointer); cdecl;

glDrawPixels: procedure(width, height: GLsizei; format, atype: GLenum; const pixels: Pointer); cdecl;

glEdgeFlag: procedure(flag: GLboolean); cdecl;

glEdgeFlagPointer: procedure(stride: GLsizei; const pointer: Pointer); cdecl;

glEdgeFlagv: procedure(const flag: PGLboolean); cdecl;

glEnable: procedure(cap: GLenum); cdecl;

glEnableClientState: procedure(aarray: GLenum); cdecl;

glEnd: procedure; cdecl;

glEndList: procedure; cdecl;

glEvalCoord1d: procedure(u: GLdouble); cdecl;

glEvalCoord1dv: procedure(const u: PGLdouble); cdecl;

glEvalCoord1f: procedure(u: GLfloat); cdecl;

glEvalCoord1fv: procedure(const u: PGLfloat); cdecl;

glEvalCoord2d: procedure(u, v: GLdouble); cdecl;

glEvalCoord2dv: procedure(const u: PGLdouble); cdecl;

glEvalCoord2f: procedure(u, v: GLfloat); cdecl;

glEvalCoord2fv: procedure(const u: PGLfloat); cdecl;

glEvalMesh1: procedure(mode: GLenum; i1, i2: GLint); cdecl;

glEvalMesh2: procedure(mode: GLenum; i1, i2, j1, j2: GLint); cdecl;

glEvalPoint1: procedure(i: GLint); cdecl;

glEvalPoint2: procedure(i, j: GLint); cdecl;

glFeedbackBuffer: procedure(size: GLsizei; atype: GLenum; buffer: PGLfloat); cdecl;

glFinish: procedure; cdecl;

glFlush: procedure; cdecl;

glFogf: procedure(pname: GLenum; param: GLfloat); cdecl;

glFogfv: procedure(pname: GLenum; const params: PGLfloat); cdecl;

glFogi: procedure(pname: GLenum; param: GLint); cdecl;

glFogiv: procedure(pname: GLenum; const params: PGLint); cdecl;

glFrontFace: procedure(mode: GLenum); cdecl;

glFrustum: procedure(left, right, bottom, top, zNear, zFar: GLdouble); cdecl;

glGenLists: function(range: GLsizei): GLuint; cdecl;

glGenTextures: procedure(n: GLsizei; textures: PGLuint); cdecl;

glGetBooleanv: procedure(pname: GLenum; params: PGLboolean); cdecl;

glGetClipPlane: procedure(plane: GLenum; equation: PGLdouble); cdecl;

glGetDoublev: procedure(pname: GLenum; params: PGLdouble); cdecl;

glGetError: function: GLenum; cdecl;

glGetFloatv: procedure(pname: GLenum; params: PGLfloat); cdecl;

glGetIntegerv: procedure(pname: GLenum; params: PGLint); cdecl;

glGetLightfv: procedure(light, pname: GLenum; params: PGLfloat); cdecl;

glGetLightiv: procedure(light, pname: GLenum; params: PGLint); cdecl;

glGetMapdv: procedure(target, query: GLenum; v: PGLdouble); cdecl;

glGetMapfv: procedure(target, query: GLenum; v: PGLfloat); cdecl;

glGetMapiv: procedure(target, query: GLenum; v: PGLint); cdecl;

glGetMaterialfv: procedure(face, pname: GLenum; params: PGLfloat); cdecl;

glGetMaterialiv: procedure(face, pname: GLenum; params: PGLint); cdecl;

glGetPixelMapfv: procedure(map: GLenum; values: PGLfloat); cdecl;

glGetPixelMapuiv: procedure(map: GLenum; values: PGLuint); cdecl;

glGetPixelMapusv: procedure(map: GLenum; values: PGLushort); cdecl;

glGetPointerv: procedure(pname: GLenum; params: Pointer); cdecl;

glGetPolygonStipple: procedure(mask: PGLubyte); cdecl;

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

glGetTexEnvfv: procedure(target, pname: GLenum; params: PGLfloat); cdecl;

glGetTexEnviv: procedure(target, pname: GLenum; params: PGLint); cdecl;

glGetTexGendv: procedure(coord, pname: GLenum; params: PGLdouble); cdecl;

glGetTexGenfv: procedure(coord, pname: GLenum; params: PGLfloat); cdecl;

glGetTexGeniv: procedure(coord, pname: GLenum; params: PGLint); cdecl;

glGetTexImage: procedure(target: GLenum; level: GLint; format: GLenum; atype: GLenum; pixels: Pointer); cdecl;

glGetTexLevelParameterfv: procedure(target: GLenum; level: GLint; pname: GLenum; params: Pointer); cdecl;

glGetTexLevelParameteriv: procedure(target: GLenum; level: GLint; pname: GLenum; params: PGLint); cdecl;

glGetTexParameterfv: procedure(target, pname: GLenum; params: PGLfloat); cdecl;

glGetTexParameteriv: procedure(target, pname: GLenum; params: PGLint); cdecl;

glHint: procedure(target, mode: GLenum); cdecl;

glIndexMask: procedure(mask: GLuint); cdecl;

glIndexPointer: procedure(atype: GLenum; stride: GLsizei; const pointer: Pointer); cdecl;

glIndexd: procedure(c: GLdouble); cdecl;

glIndexdv: procedure(const c: PGLdouble); cdecl;

glIndexf: procedure(c: GLfloat); cdecl;

glIndexfv: procedure(const c: PGLfloat); cdecl;

glIndexi: procedure(c: GLint); cdecl;

glIndexiv: procedure(const c: PGLint); cdecl;

glIndexs: procedure(c: GLshort); cdecl;

glIndexsv: procedure(const c: PGLshort); cdecl;

glIndexub: procedure(c: GLubyte); cdecl;

glIndexubv: procedure(const c: PGLubyte); cdecl;

glInitNames: procedure; cdecl;

glInterleavedArrays: procedure(format: GLenum; stride: GLsizei; const pointer: Pointer); cdecl;

glIsEnabled: function(cap: GLenum): GLboolean; cdecl;

glIsList: function(list: GLuint): GLboolean; cdecl;

glIsTexture: function(texture: GLuint): GLboolean; cdecl;

glLightModelf: procedure(pname: GLenum; param: GLfloat); cdecl;

glLightModelfv: procedure(pname: GLenum; const params: PGLfloat); cdecl;

glLightModeli: procedure(pname: GLenum; param: GLint); cdecl;

glLightModeliv: procedure(pname: GLenum; const params: PGLint); cdecl;

glLightf: procedure(light, pname: GLenum; param: GLfloat); cdecl;

glLightfv: procedure(light, pname: GLenum; const params: PGLfloat); cdecl;

glLighti: procedure(light, pname: GLenum; param: GLint); cdecl;

glLightiv: procedure(light, pname: GLenum; const params: PGLint); cdecl;

glLineStipple: procedure(factor: GLint; pattern: GLushort); cdecl;

glLineWidth: procedure(width: GLfloat); cdecl;

glListBase: procedure(base: GLuint); cdecl;

glLoadIdentity: procedure; cdecl;

glLoadMatrixd: procedure(const m: PGLdouble); cdecl;

glLoadMatrixf: procedure(const m: PGLfloat); cdecl;

glLoadName: procedure(name: GLuint); cdecl;

glLogicOp: procedure(opcode: GLenum); cdecl;

glMap1d: procedure(target: GLenum; u1, u2: GLdouble; stride, order: GLint; const points: PGLdouble); cdecl;

glMap1f: procedure(target: GLenum; u1, u2: GLfloat; stride, order: GLint; const points: PGLfloat); cdecl;

glMap2d: procedure(target: GLenum; u1, u2: GLdouble; ustride, uorder: GLint; v1, v2: GLdouble; vstride, vorder: GLint; const points: PGLdouble); cdecl;

glMap2f: procedure(target: GLenum; u1, u2: GLfloat; ustride, uorder: GLint; v1, v2: GLfloat; vstride, vorder: GLint; const points: PGLfloat); cdecl;

glMapGrid1d: procedure(un: GLint; u1, u2: GLdouble); cdecl;

glMapGrid1f: procedure(un: GLint; u1, u2: GLfloat); cdecl;

glMapGrid2d: procedure(un: GLint; u1, u2: GLdouble; vn: GLint; v1, v2: GLdouble); cdecl;

glMapGrid2f: procedure(un: GLint; u1, u2: GLfloat; vn: GLint; v1, v2: GLfloat); cdecl;

glMaterialf: procedure(face, pname: GLenum; param: GLfloat); cdecl;

glMaterialfv: procedure(face, pname: GLenum; const params: PGLfloat); cdecl;

glMateriali: procedure(face, pname: GLenum; param: GLint); cdecl;

glMaterialiv: procedure(face, pname: GLenum; const params: PGLint); cdecl;

glMatrixMode: procedure(mode: GLenum); cdecl;

glMultMatrixd: procedure(const m: PGLdouble); cdecl;

glMultMatrixf: procedure(const m: PGLfloat); cdecl;

glNewList: procedure(list: GLuint; mode: GLenum); cdecl;

glNormal3b: procedure(nx, ny, nz: GLbyte); cdecl;

glNormal3bv: procedure(const v: PGLbyte); cdecl;

glNormal3d: procedure(nx, ny, nz: GLdouble); cdecl;

glNormal3dv: procedure(const v: PGLdouble); cdecl;

glNormal3f: procedure(nx, ny, nz: GLfloat); cdecl;

glNormal3fv: procedure(const v: PGLfloat); cdecl;

glNormal3i: procedure(nx, ny, nz: GLint); cdecl;

glNormal3iv: procedure(const v: PGLint); cdecl;

glNormal3s: procedure(nx, ny, nz: GLshort); cdecl;

glNormal3sv: procedure(const v: PGLshort); cdecl;

glNormalPointer: procedure(atype: GLenum; stride: GLsizei; const pointer: Pointer); cdecl;

glOrtho: procedure(left, right, bottom, top, zNear, zFar: GLdouble); cdecl;

glPassThrough: procedure(token: GLfloat); cdecl;

glPixelMapfv: procedure(map: GLenum; mapsize: GLsizei; const values: PGLfloat); cdecl;

glPixelMapuiv: procedure(map: GLenum; mapsize: GLsizei; const values: PGLuint); cdecl;

glPixelMapusv: procedure(map: GLenum; mapsize: GLsizei; const values: PGLushort); cdecl;

glPixelStoref: procedure(pname: GLenum; param: GLfloat); cdecl;

glPixelStorei: procedure(pname: GLenum; param: GLint); cdecl;

glPixelTransferf: procedure(pname: GLenum; param: GLfloat); cdecl;

glPixelTransferi: procedure(pname: GLenum; param: GLint); cdecl;

glPixelZoom: procedure(xfactor, yfactor: GLfloat); cdecl;

glPointSize: procedure(size: GLfloat); cdecl;

glPolygonMode: procedure(face, mode: GLenum); cdecl;

glPolygonOffset: procedure(factor, units: GLfloat); cdecl;

glPolygonStipple: procedure(const mask: PGLubyte); cdecl;

glPopAttrib: procedure; cdecl;

glPopClientAttrib: procedure; cdecl;

glPopMatrix: procedure; cdecl;

glPopName: procedure; cdecl;

glPrioritizeTextures: procedure(n: GLsizei; const textures: PGLuint; const priorities: PGLclampf); cdecl;

glPushAttrib: procedure(mask: GLbitfield); cdecl;

glPushClientAttrib: procedure(mask: GLbitfield); cdecl;

glPushMatrix: procedure; cdecl;

glPushName: procedure(name: GLuint); cdecl;

glRasterPos2d: procedure(x, y: GLdouble); cdecl;

glRasterPos2dv: procedure(const v: PGLdouble); cdecl;

glRasterPos2f: procedure(x, y: GLfloat); cdecl;

glRasterPos2fv: procedure(const v: PGLfloat); cdecl;

glRasterPos2i: procedure(x, y: GLint); cdecl;

glRasterPos2iv: procedure(const v: PGLint); cdecl;

glRasterPos2s: procedure(x, y: GLshort); cdecl;

glRasterPos2sv: procedure(const v: PGLshort); cdecl;

glRasterPos3d: procedure(x, y, z: GLdouble); cdecl;

glRasterPos3dv: procedure(const v: PGLdouble); cdecl;

glRasterPos3f: procedure(x, y, z: GLfloat); cdecl;

glRasterPos3fv: procedure(const v: PGLfloat); cdecl;

glRasterPos3i: procedure(x, y, z: GLint); cdecl;

glRasterPos3iv: procedure(const v: PGLint); cdecl;

glRasterPos3s: procedure(x, y, z: GLshort); cdecl;

glRasterPos3sv: procedure(const v: PGLshort); cdecl;

glRasterPos4d: procedure(x, y, z, w: GLdouble); cdecl;

glRasterPos4dv: procedure(const v: PGLdouble); cdecl;

glRasterPos4f: procedure(x, y, z, w: GLfloat); cdecl;

glRasterPos4fv: procedure(const v: PGLfloat); cdecl;

glRasterPos4i: procedure(x, y, z, w: GLint); cdecl;

glRasterPos4iv: procedure(const v: PGLint); cdecl;

glRasterPos4s: procedure(x, y, z, w: GLshort); cdecl;

glRasterPos4sv: procedure(const v: PGLshort); cdecl;

glReadBuffer: procedure(mode: GLenum); cdecl;

glReadPixels: procedure(x, y: GLint; width, height: GLsizei; format, atype: GLenum; pixels: Pointer); cdecl;

glRectd: procedure(x1, y1, x2, y2: GLdouble); cdecl;

glRectdv: procedure(const v1: PGLdouble; const v2: PGLdouble); cdecl;

glRectf: procedure(x1, y1, x2, y2: GLfloat); cdecl;

glRectfv: procedure(const v1: PGLfloat; const v2: PGLfloat); cdecl;

glRecti: procedure(x1, y1, x2, y2: GLint); cdecl;

glRectiv: procedure(const v1: PGLint; const v2: PGLint); cdecl;

glRects: procedure(x1, y1, x2, y2: GLshort); cdecl;

glRectsv: procedure(const v1: PGLshort; const v2: PGLshort); cdecl;

glRenderMode: function(mode: GLint): GLint; cdecl;

glRotated: procedure(angle, x, y, z: GLdouble); cdecl;

glRotatef: procedure(angle, x, y, z: GLfloat); cdecl;

glScaled: procedure(x, y, z: GLdouble); cdecl;

glScalef: procedure(x, y, z: GLfloat); cdecl;

glScissor: procedure(x, y: GLint; width, height: GLsizei); cdecl;

glSelectBuffer: procedure(size: GLsizei; buffer: PGLuint); cdecl;

glShadeModel: procedure(mode: GLenum); cdecl;

glStencilFunc: procedure(func: GLenum; ref: GLint; mask: GLuint); cdecl;

glStencilMask: procedure(mask: GLuint); cdecl;

glStencilOp: procedure(fail, zfail, zpass: GLenum); cdecl;

glTexCoord1d: procedure(s: GLdouble); cdecl;

glTexCoord1dv: procedure(const v: PGLdouble); cdecl;

glTexCoord1f: procedure(s: GLfloat); cdecl;

glTexCoord1fv: procedure(const v: PGLfloat); cdecl;

glTexCoord1i: procedure(s: GLint); cdecl;

glTexCoord1iv: procedure(const v: PGLint); cdecl;

glTexCoord1s: procedure(s: GLshort); cdecl;

glTexCoord1sv: procedure(const v: PGLshort); cdecl;

glTexCoord2d: procedure(s, t: GLdouble); cdecl;

glTexCoord2dv: procedure(const v: PGLdouble); cdecl;

glTexCoord2f: procedure(s, t: GLfloat); cdecl;

glTexCoord2fv: procedure(const v: PGLfloat); cdecl;

glTexCoord2i: procedure(s, t: GLint); cdecl;

glTexCoord2iv: procedure(const v: PGLint); cdecl;

glTexCoord2s: procedure(s, t: GLshort); cdecl;

glTexCoord2sv: procedure(const v: PGLshort); cdecl;

glTexCoord3d: procedure(s, t, r: GLdouble); cdecl;

glTexCoord3dv: procedure(const v: PGLdouble); cdecl;

glTexCoord3f: procedure(s, t, r: GLfloat); cdecl;

glTexCoord3fv: procedure(const v: PGLfloat); cdecl;

glTexCoord3i: procedure(s, t, r: GLint); cdecl;

glTexCoord3iv: procedure(const v: PGLint); cdecl;

glTexCoord3s: procedure(s, t, r: GLshort); cdecl;

glTexCoord3sv: procedure(const v: PGLshort); cdecl;

glTexCoord4d: procedure(s, t, r, q: GLdouble); cdecl;

glTexCoord4dv: procedure(const v: PGLdouble); cdecl;

glTexCoord4f: procedure(s, t, r, q: GLfloat); cdecl;

glTexCoord4fv: procedure(const v: PGLfloat); cdecl;

glTexCoord4i: procedure(s, t, r, q: GLint); cdecl;

glTexCoord4iv: procedure(const v: PGLint); cdecl;

glTexCoord4s: procedure(s, t, r, q: GLshort); cdecl;

glTexCoord4sv: procedure(const v: PGLshort); cdecl;

glTexCoordPointer: procedure(size: GLint; atype: GLenum; stride: GLsizei; const pointer: Pointer); cdecl;

glTexEnvf: procedure(target: GLenum; pname: GLenum; param: GLfloat); cdecl;

glTexEnvfv: procedure(target: GLenum; pname: GLenum; const params: PGLfloat); cdecl;

glTexEnvi: procedure(target: GLenum; pname: GLenum; param: GLint); cdecl;

glTexEnviv: procedure(target: GLenum; pname: GLenum; const params: PGLint); cdecl;

glTexGend: procedure(coord: GLenum; pname: GLenum; param: GLdouble); cdecl;

glTexGendv: procedure(coord: GLenum; pname: GLenum; const params: PGLdouble); cdecl;

glTexGenf: procedure(coord: GLenum; pname: GLenum; param: GLfloat); cdecl;

glTexGenfv: procedure(coord: GLenum; pname: GLenum; const params: PGLfloat); cdecl;

glTexGeni: procedure(coord: GLenum; pname: GLenum; param: GLint); cdecl;

glTexGeniv: procedure(coord: GLenum; pname: GLenum; const params: PGLint); cdecl;

glTexImage1D: procedure(target: GLenum; level, internalformat: GLint; width: GLsizei; border: GLint; format, atype: GLenum; const pixels: Pointer); cdecl;

glTexImage2D: procedure(target: GLenum; level, internalformat: GLint; width, height: GLsizei; border: GLint; format, atype: GLenum; const pixels: Pointer); cdecl;

glTexParameterf: procedure(target: GLenum; pname: GLenum; param: GLfloat); cdecl;

glTexParameterfv: procedure(target: GLenum; pname: GLenum; const params: PGLfloat); cdecl;

glTexParameteri: procedure(target: GLenum; pname: GLenum; param: GLint); cdecl;

glTexParameteriv: procedure(target: GLenum; pname: GLenum; const params: PGLint); cdecl;

glTexSubImage1D: procedure(target: GLenum; level, xoffset: GLint; width: GLsizei; format, atype: GLenum; const pixels: Pointer); cdecl;

glTexSubImage2D: procedure(target: GLenum; level, xoffset, yoffset: GLint; width, height: GLsizei; format, atype: GLenum; const pixels: Pointer); cdecl;

glTranslated: procedure(x, y, z: GLdouble); cdecl;

glTranslatef: procedure(x, y, z: GLfloat); cdecl;

glVertex2d: procedure(x, y: GLdouble); cdecl;

glVertex2dv: procedure(const v: PGLdouble); cdecl;

glVertex2f: procedure(x, y: GLfloat); cdecl;

glVertex2fv: procedure(const v: PGLfloat); cdecl;

glVertex2i: procedure(x, y: GLint); cdecl;

glVertex2iv: procedure(const v: PGLint); cdecl;

glVertex2s: procedure(x, y: GLshort); cdecl;

glVertex2sv: procedure(const v: PGLshort); cdecl;

glVertex3d: procedure(x, y, z: GLdouble); cdecl;

glVertex3dv: procedure(const v: PGLdouble); cdecl;

glVertex3f: procedure(x, y, z: GLfloat); cdecl;

glVertex3fv: procedure(const v: PGLfloat); cdecl;

glVertex3i: procedure(x, y, z: GLint); cdecl;

glVertex3iv: procedure(const v: PGLint); cdecl;

glVertex3s: procedure(x, y, z: GLshort); cdecl;

glVertex3sv: procedure(const v: PGLshort); cdecl;

glVertex4d: procedure(x, y, z, w: GLdouble); cdecl;

glVertex4dv: procedure(const v: PGLdouble); cdecl;

glVertex4f: procedure(x, y, z, w: GLfloat); cdecl;

glVertex4fv: procedure(const v: PGLfloat); cdecl;

glVertex4i: procedure(x, y, z, w: GLint); cdecl;

glVertex4iv: procedure(const v: PGLint); cdecl;

glVertex4s: procedure(x, y, z, w: GLshort); cdecl;

glVertex4sv: procedure(const v: PGLshort); cdecl;

glVertexPointer: procedure(size: GLint; atype: GLenum; stride: GLsizei; const pointer: Pointer); cdecl;

glViewport: procedure(x, y: GLint; width, height: GLsizei); cdecl;

Description

Functions and Procedures

procedure initializeopengl(const sonames: array of filenamety);

procedure releaseopengl;

procedure regglinit(const initproc: dynlibprocty);

procedure reggldeinit(const deinitproc: dynlibprocty);

Types

GLenum = Cardinal;

PGLenum = ˆGLenum;

GLboolean = Byte;

PGLboolean = ˆGLboolean;

GLbitfield = Cardinal;

PGLbitfield = ˆGLbitfield;

GLbyte = ShortInt;

PGLbyte = ˆGLbyte;

GLshort = SmallInt;

PGLshort = ˆGLshort;

GLint = Integer;

PGLint = ˆGLint;

GLsizei = Integer;

PGLsizei = ˆGLsizei;

GLubyte = Byte;

PGLubyte = ˆGLubyte;

GLushort = Word;

PGLushort = ˆGLushort;

GLuint = Cardinal;

PGLuint = ˆGLuint;

GLfloat = Single;

PGLfloat = ˆGLfloat;

GLclampf = Single;

PGLclampf = ˆGLclampf;

GLdouble = Double;

PGLdouble = ˆGLdouble;

GLclampd = Double;

PGLclampd = ˆGLclampd;

PGLvoid = Pointer;

PPGLvoid = ˆPGLvoid;

TGLenum = GLenum;

TGLboolean = GLboolean;

TGLbitfield = GLbitfield;

TGLbyte = GLbyte;

TGLshort = GLshort;

TGLint = GLint;

TGLsizei = GLsizei;

TGLubyte = GLubyte;

TGLushort = GLushort;

TGLuint = GLuint;

TGLfloat = GLfloat;

TGLclampf = GLclampf;

TGLdouble = GLdouble;

TGLclampd = GLclampd;

PFNGLARRAYELEMENTEXTPROC = procedure(i: GLint); cdecl;

PFNGLDRAWARRAYSEXTPROC = procedure(mode: GLenum; first: GLint; count: GLsizei); cdecl;

PFNGLVERTEXPOINTEREXTPROC = procedure(size: GLint; atype: GLenum; stride, count: GLsizei; const pointer: Pointer); cdecl;

PFNGLNORMALPOINTEREXTPROC = procedure(atype: GLenum; stride, count: GLsizei; const pointer: Pointer); cdecl;

PFNGLCOLORPOINTEREXTPROC = procedure(size: GLint; atype: GLenum; stride, count: GLsizei; const pointer: Pointer); cdecl;

PFNGLINDEXPOINTEREXTPROC = procedure(atype: GLenum; stride, count: GLsizei; const pointer: Pointer); cdecl;

PFNGLTEXCOORDPOINTEREXTPROC = procedure(size: GLint; atype: GLenum; stride, count: GLsizei; const pointer: Pointer); cdecl;

PFNGLEDGEFLAGPOINTEREXTPROC = procedure(stride, count: GLsizei; const pointer: PGLboolean); cdecl;

PFNGLGETPOINTERVEXTPROC = procedure(pname: GLenum; params: Pointer); cdecl;

PFNGLARRAYELEMENTARRAYEXTPROC = procedure(mode: GLenum; count: GLsizei; const pi: Pointer); cdecl;

PFNGLADDSWAPHINTRECTWINPROC = procedure(x, y: GLint; width, height: GLsizei); cdecl;

PFNGLCOLORTABLEEXTPROC = procedure(target, internalFormat: GLenum; width: GLsizei; format, atype: GLenum; const data: Pointer); cdecl;

PFNGLCOLORSUBTABLEEXTPROC = procedure(target: GLenum; start, count: GLsizei; format, atype: GLenum; const data: Pointer); cdecl;

PFNGLGETCOLORTABLEEXTPROC = procedure(target, format, atype: GLenum; data: Pointer); cdecl;

PFNGLGETCOLORTABLEPARAMETERIVEXTPROC = procedure(target, pname: GLenum; params: PGLint); cdecl;

PFNGLGETCOLORTABLEPARAMETERFVEXTPROC = procedure(target, pname: GLenum; params: PGLfloat); cdecl;

Constants

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

GL_VERSION_1_1 = 1;

GL_ACCUM = $0100;

GL_LOAD = $0101;

GL_RETURN = $0102;

GL_MULT = $0103;

GL_ADD = $0104;

GL_NEVER = $0200;

GL_LESS = $0201;

GL_EQUAL = $0202;

GL_LEQUAL = $0203;

GL_GREATER = $0204;

GL_NOTEQUAL = $0205;

GL_GEQUAL = $0206;

GL_ALWAYS = $0207;

GL_CURRENT_BIT = $00000001;

GL_POINT_BIT = $00000002;

GL_LINE_BIT = $00000004;

GL_POLYGON_BIT = $00000008;

GL_POLYGON_STIPPLE_BIT = $00000010;

GL_PIXEL_MODE_BIT = $00000020;

GL_LIGHTING_BIT = $00000040;

GL_FOG_BIT = $00000080;

GL_DEPTH_BUFFER_BIT = $00000100;

GL_ACCUM_BUFFER_BIT = $00000200;

GL_STENCIL_BUFFER_BIT = $00000400;

GL_VIEWPORT_BIT = $00000800;

GL_TRANSFORM_BIT = $00001000;

GL_ENABLE_BIT = $00002000;

GL_COLOR_BUFFER_BIT = $00004000;

GL_HINT_BIT = $00008000;

GL_EVAL_BIT = $00010000;

GL_LIST_BIT = $00020000;

GL_TEXTURE_BIT = $00040000;

GL_SCISSOR_BIT = $00080000;

GL_ALL_ATTRIB_BITS = $000FFFFF;

GL_POINTS = $0000;

GL_LINES = $0001;

GL_LINE_LOOP = $0002;

GL_LINE_STRIP = $0003;

GL_TRIANGLES = $0004;

GL_TRIANGLE_STRIP = $0005;

GL_TRIANGLE_FAN = $0006;

GL_QUADS = $0007;

GL_QUAD_STRIP = $0008;

GL_POLYGON = $0009;

GL_ZERO = 0;

GL_ONE = 1;

GL_SRC_COLOR = $0300;

GL_ONE_MINUS_SRC_COLOR = $0301;

GL_SRC_ALPHA = $0302;

GL_ONE_MINUS_SRC_ALPHA = $0303;

GL_DST_ALPHA = $0304;

GL_ONE_MINUS_DST_ALPHA = $0305;

GL_DST_COLOR = $0306;

GL_ONE_MINUS_DST_COLOR = $0307;

GL_SRC_ALPHA_SATURATE = $0308;

GL_TRUE = 1;

GL_FALSE = 0;

GL_CLIP_PLANE0 = $3000;

GL_CLIP_PLANE1 = $3001;

GL_CLIP_PLANE2 = $3002;

GL_CLIP_PLANE3 = $3003;

GL_CLIP_PLANE4 = $3004;

GL_CLIP_PLANE5 = $3005;

GL_BYTE = $1400;

GL_UNSIGNED_BYTE = $1401;

GL_SHORT = $1402;

GL_UNSIGNED_SHORT = $1403;

GL_INT = $1404;

GL_UNSIGNED_INT = $1405;

GL_FLOAT = $1406;

GL_2_BYTES = $1407;

GL_3_BYTES = $1408;

GL_4_BYTES = $1409;

GL_DOUBLE = $140A;

GL_NONE = 0;

GL_FRONT_LEFT = $0400;

GL_FRONT_RIGHT = $0401;

GL_BACK_LEFT = $0402;

GL_BACK_RIGHT = $0403;

GL_FRONT = $0404;

GL_BACK = $0405;

GL_LEFT = $0406;

GL_RIGHT = $0407;

GL_FRONT_AND_BACK = $0408;

GL_AUX0 = $0409;

GL_AUX1 = $040A;

GL_AUX2 = $040B;

GL_AUX3 = $040C;

GL_NO_ERROR = 0;

GL_INVALID_ENUM = $0500;

GL_INVALID_VALUE = $0501;

GL_INVALID_OPERATION = $0502;

GL_STACK_OVERFLOW = $0503;

GL_STACK_UNDERFLOW = $0504;

GL_OUT_OF_MEMORY = $0505;

GL_2D = $0600;

GL_3D = $0601;

GL_3D_COLOR = $0602;

GL_3D_COLOR_TEXTURE = $0603;

GL_4D_COLOR_TEXTURE = $0604;

GL_PASS_THROUGH_TOKEN = $0700;

GL_POINT_TOKEN = $0701;

GL_LINE_TOKEN = $0702;

GL_POLYGON_TOKEN = $0703;

GL_BITMAP_TOKEN = $0704;

GL_DRAW_PIXEL_TOKEN = $0705;

GL_COPY_PIXEL_TOKEN = $0706;

GL_LINE_RESET_TOKEN = $0707;

GL_EXP = $0800;

GL_EXP2 = $0801;

GL_CW = $0900;

GL_CCW = $0901;

GL_COEFF = $0A00;

GL_ORDER = $0A01;

GL_DOMAIN = $0A02;

GL_CURRENT_COLOR = $0B00;

GL_CURRENT_INDEX = $0B01;

GL_CURRENT_NORMAL = $0B02;

GL_CURRENT_TEXTURE_COORDS = $0B03;

GL_CURRENT_RASTER_COLOR = $0B04;

GL_CURRENT_RASTER_INDEX = $0B05;

GL_CURRENT_RASTER_TEXTURE_COORDS = $0B06;

GL_CURRENT_RASTER_POSITION = $0B07;

GL_CURRENT_RASTER_POSITION_VALID = $0B08;

GL_CURRENT_RASTER_DISTANCE = $0B09;

GL_POINT_SMOOTH = $0B10;

GL_POINT_SIZE = $0B11;

GL_POINT_SIZE_RANGE = $0B12;

GL_POINT_SIZE_GRANULARITY = $0B13;

GL_LINE_SMOOTH = $0B20;

GL_LINE_WIDTH = $0B21;

GL_LINE_WIDTH_RANGE = $0B22;

GL_LINE_WIDTH_GRANULARITY = $0B23;

GL_LINE_STIPPLE = $0B24;

GL_LINE_STIPPLE_PATTERN = $0B25;

GL_LINE_STIPPLE_REPEAT = $0B26;

GL_LIST_MODE = $0B30;

GL_MAX_LIST_NESTING = $0B31;

GL_LIST_BASE = $0B32;

GL_LIST_INDEX = $0B33;

GL_POLYGON_MODE = $0B40;

GL_POLYGON_SMOOTH = $0B41;

GL_POLYGON_STIPPLE = $0B42;

GL_EDGE_FLAG = $0B43;

GL_CULL_FACE = $0B44;

GL_CULL_FACE_MODE = $0B45;

GL_FRONT_FACE = $0B46;

GL_LIGHTING = $0B50;

GL_LIGHT_MODEL_LOCAL_VIEWER = $0B51;

GL_LIGHT_MODEL_TWO_SIDE = $0B52;

GL_LIGHT_MODEL_AMBIENT = $0B53;

GL_SHADE_MODEL = $0B54;

GL_COLOR_MATERIAL_FACE = $0B55;

GL_COLOR_MATERIAL_PARAMETER = $0B56;

GL_COLOR_MATERIAL = $0B57;

GL_FOG = $0B60;

GL_FOG_INDEX = $0B61;

GL_FOG_DENSITY = $0B62;

GL_FOG_START = $0B63;

GL_FOG_END = $0B64;

GL_FOG_MODE = $0B65;

GL_FOG_COLOR = $0B66;

GL_DEPTH_RANGE = $0B70;

GL_DEPTH_TEST = $0B71;

GL_DEPTH_WRITEMASK = $0B72;

GL_DEPTH_CLEAR_VALUE = $0B73;

GL_DEPTH_FUNC = $0B74;

GL_ACCUM_CLEAR_VALUE = $0B80;

GL_STENCIL_TEST = $0B90;

GL_STENCIL_CLEAR_VALUE = $0B91;

GL_STENCIL_FUNC = $0B92;

GL_STENCIL_VALUE_MASK = $0B93;

GL_STENCIL_FAIL = $0B94;

GL_STENCIL_PASS_DEPTH_FAIL = $0B95;

GL_STENCIL_PASS_DEPTH_PASS = $0B96;

GL_STENCIL_REF = $0B97;

GL_STENCIL_WRITEMASK = $0B98;

GL_MATRIX_MODE = $0BA0;

GL_NORMALIZE = $0BA1;

GL_VIEWPORT = $0BA2;

GL_MODELVIEW_STACK_DEPTH = $0BA3;

GL_PROJECTION_STACK_DEPTH = $0BA4;

GL_TEXTURE_STACK_DEPTH = $0BA5;

GL_MODELVIEW_MATRIX = $0BA6;

GL_PROJECTION_MATRIX = $0BA7;

GL_TEXTURE_MATRIX = $0BA8;

GL_ATTRIB_STACK_DEPTH = $0BB0;

GL_CLIENT_ATTRIB_STACK_DEPTH = $0BB1;

GL_ALPHA_TEST = $0BC0;

GL_ALPHA_TEST_FUNC = $0BC1;

GL_ALPHA_TEST_REF = $0BC2;

GL_DITHER = $0BD0;

GL_BLEND_DST = $0BE0;

GL_BLEND_SRC = $0BE1;

GL_BLEND = $0BE2;

GL_LOGIC_OP_MODE = $0BF0;

GL_INDEX_LOGIC_OP = $0BF1;

GL_COLOR_LOGIC_OP = $0BF2;

GL_AUX_BUFFERS = $0C00;

GL_DRAW_BUFFER = $0C01;

GL_READ_BUFFER = $0C02;

GL_SCISSOR_BOX = $0C10;

GL_SCISSOR_TEST = $0C11;

GL_INDEX_CLEAR_VALUE = $0C20;

GL_INDEX_WRITEMASK = $0C21;

GL_COLOR_CLEAR_VALUE = $0C22;

GL_COLOR_WRITEMASK = $0C23;

GL_INDEX_MODE = $0C30;

GL_RGBA_MODE = $0C31;

GL_DOUBLEBUFFER = $0C32;

GL_STEREO = $0C33;

GL_RENDER_MODE = $0C40;

GL_PERSPECTIVE_CORRECTION_HINT = $0C50;

GL_POINT_SMOOTH_HINT = $0C51;

GL_LINE_SMOOTH_HINT = $0C52;

GL_POLYGON_SMOOTH_HINT = $0C53;

GL_FOG_HINT = $0C54;

GL_TEXTURE_GEN_S = $0C60;

GL_TEXTURE_GEN_T = $0C61;

GL_TEXTURE_GEN_R = $0C62;

GL_TEXTURE_GEN_Q = $0C63;

GL_PIXEL_MAP_I_TO_I = $0C70;

GL_PIXEL_MAP_S_TO_S = $0C71;

GL_PIXEL_MAP_I_TO_R = $0C72;

GL_PIXEL_MAP_I_TO_G = $0C73;

GL_PIXEL_MAP_I_TO_B = $0C74;

GL_PIXEL_MAP_I_TO_A = $0C75;

GL_PIXEL_MAP_R_TO_R = $0C76;

GL_PIXEL_MAP_G_TO_G = $0C77;

GL_PIXEL_MAP_B_TO_B = $0C78;

GL_PIXEL_MAP_A_TO_A = $0C79;

GL_PIXEL_MAP_I_TO_I_SIZE = $0CB0;

GL_PIXEL_MAP_S_TO_S_SIZE = $0CB1;

GL_PIXEL_MAP_I_TO_R_SIZE = $0CB2;

GL_PIXEL_MAP_I_TO_G_SIZE = $0CB3;

GL_PIXEL_MAP_I_TO_B_SIZE = $0CB4;

GL_PIXEL_MAP_I_TO_A_SIZE = $0CB5;

GL_PIXEL_MAP_R_TO_R_SIZE = $0CB6;

GL_PIXEL_MAP_G_TO_G_SIZE = $0CB7;

GL_PIXEL_MAP_B_TO_B_SIZE = $0CB8;

GL_PIXEL_MAP_A_TO_A_SIZE = $0CB9;

GL_UNPACK_SWAP_BYTES = $0CF0;

GL_UNPACK_LSB_FIRST = $0CF1;

GL_UNPACK_ROW_LENGTH = $0CF2;

GL_UNPACK_SKIP_ROWS = $0CF3;

GL_UNPACK_SKIP_PIXELS = $0CF4;

GL_UNPACK_ALIGNMENT = $0CF5;

GL_PACK_SWAP_BYTES = $0D00;

GL_PACK_LSB_FIRST = $0D01;

GL_PACK_ROW_LENGTH = $0D02;

GL_PACK_SKIP_ROWS = $0D03;

GL_PACK_SKIP_PIXELS = $0D04;

GL_PACK_ALIGNMENT = $0D05;

GL_MAP_COLOR = $0D10;

GL_MAP_STENCIL = $0D11;

GL_INDEX_SHIFT = $0D12;

GL_INDEX_OFFSET = $0D13;

GL_RED_SCALE = $0D14;

GL_RED_BIAS = $0D15;

GL_ZOOM_X = $0D16;

GL_ZOOM_Y = $0D17;

GL_GREEN_SCALE = $0D18;

GL_GREEN_BIAS = $0D19;

GL_BLUE_SCALE = $0D1A;

GL_BLUE_BIAS = $0D1B;

GL_ALPHA_SCALE = $0D1C;

GL_ALPHA_BIAS = $0D1D;

GL_DEPTH_SCALE = $0D1E;

GL_DEPTH_BIAS = $0D1F;

GL_MAX_EVAL_ORDER = $0D30;

GL_MAX_LIGHTS = $0D31;

GL_MAX_CLIP_PLANES = $0D32;

GL_MAX_TEXTURE_SIZE = $0D33;

GL_MAX_PIXEL_MAP_TABLE = $0D34;

GL_MAX_ATTRIB_STACK_DEPTH = $0D35;

GL_MAX_MODELVIEW_STACK_DEPTH = $0D36;

GL_MAX_NAME_STACK_DEPTH = $0D37;

GL_MAX_PROJECTION_STACK_DEPTH = $0D38;

GL_MAX_TEXTURE_STACK_DEPTH = $0D39;

GL_MAX_VIEWPORT_DIMS = $0D3A;

GL_MAX_CLIENT_ATTRIB_STACK_DEPTH = $0D3B;

GL_SUBPIXEL_BITS = $0D50;

GL_INDEX_BITS = $0D51;

GL_RED_BITS = $0D52;

GL_GREEN_BITS = $0D53;

GL_BLUE_BITS = $0D54;

GL_ALPHA_BITS = $0D55;

GL_DEPTH_BITS = $0D56;

GL_STENCIL_BITS = $0D57;

GL_ACCUM_RED_BITS = $0D58;

GL_ACCUM_GREEN_BITS = $0D59;

GL_ACCUM_BLUE_BITS = $0D5A;

GL_ACCUM_ALPHA_BITS = $0D5B;

GL_NAME_STACK_DEPTH = $0D70;

GL_AUTO_NORMAL = $0D80;

GL_MAP1_COLOR_4 = $0D90;

GL_MAP1_INDEX = $0D91;

GL_MAP1_NORMAL = $0D92;

GL_MAP1_TEXTURE_COORD_1 = $0D93;

GL_MAP1_TEXTURE_COORD_2 = $0D94;

GL_MAP1_TEXTURE_COORD_3 = $0D95;

GL_MAP1_TEXTURE_COORD_4 = $0D96;

GL_MAP1_VERTEX_3 = $0D97;

GL_MAP1_VERTEX_4 = $0D98;

GL_MAP2_COLOR_4 = $0DB0;

GL_MAP2_INDEX = $0DB1;

GL_MAP2_NORMAL = $0DB2;

GL_MAP2_TEXTURE_COORD_1 = $0DB3;

GL_MAP2_TEXTURE_COORD_2 = $0DB4;

GL_MAP2_TEXTURE_COORD_3 = $0DB5;

GL_MAP2_TEXTURE_COORD_4 = $0DB6;

GL_MAP2_VERTEX_3 = $0DB7;

GL_MAP2_VERTEX_4 = $0DB8;

GL_MAP1_GRID_DOMAIN = $0DD0;

GL_MAP1_GRID_SEGMENTS = $0DD1;

GL_MAP2_GRID_DOMAIN = $0DD2;

GL_MAP2_GRID_SEGMENTS = $0DD3;

GL_TEXTURE_1D = $0DE0;

GL_TEXTURE_2D = $0DE1;

GL_FEEDBACK_BUFFER_POINTER = $0DF0;

GL_FEEDBACK_BUFFER_SIZE = $0DF1;

GL_FEEDBACK_BUFFER_TYPE = $0DF2;

GL_SELECTION_BUFFER_POINTER = $0DF3;

GL_SELECTION_BUFFER_SIZE = $0DF4;

GL_TEXTURE_WIDTH = $1000;

GL_TEXTURE_HEIGHT = $1001;

GL_TEXTURE_INTERNAL_FORMAT = $1003;

GL_TEXTURE_BORDER_COLOR = $1004;

GL_TEXTURE_BORDER = $1005;

GL_DONT_CARE = $1100;

GL_FASTEST = $1101;

GL_NICEST = $1102;

GL_LIGHT0 = $4000;

GL_LIGHT1 = $4001;

GL_LIGHT2 = $4002;

GL_LIGHT3 = $4003;

GL_LIGHT4 = $4004;

GL_LIGHT5 = $4005;

GL_LIGHT6 = $4006;

GL_LIGHT7 = $4007;

GL_AMBIENT = $1200;

GL_DIFFUSE = $1201;

GL_SPECULAR = $1202;

GL_POSITION = $1203;

GL_SPOT_DIRECTION = $1204;

GL_SPOT_EXPONENT = $1205;

GL_SPOT_CUTOFF = $1206;

GL_CONSTANT_ATTENUATION = $1207;

GL_LINEAR_ATTENUATION = $1208;

GL_QUADRATIC_ATTENUATION = $1209;

GL_COMPILE = $1300;

GL_COMPILE_AND_EXECUTE = $1301;

GL_CLEAR = $1500;

GL_AND = $1501;

GL_AND_REVERSE = $1502;

GL_COPY = $1503;

GL_AND_INVERTED = $1504;

GL_NOOP = $1505;

GL_XOR = $1506;

GL_OR = $1507;

GL_NOR = $1508;

GL_EQUIV = $1509;

GL_INVERT = $150A;

GL_OR_REVERSE = $150B;

GL_COPY_INVERTED = $150C;

GL_OR_INVERTED = $150D;

GL_NAND = $150E;

GL_SET = $150F;

GL_EMISSION = $1600;

GL_SHININESS = $1601;

GL_AMBIENT_AND_DIFFUSE = $1602;

GL_COLOR_INDEXES = $1603;

GL_MODELVIEW = $1700;

GL_PROJECTION = $1701;

GL_TEXTURE = $1702;

GL_COLOR = $1800;

GL_DEPTH = $1801;

GL_STENCIL = $1802;

GL_COLOR_INDEX = $1900;

GL_STENCIL_INDEX = $1901;

GL_DEPTH_COMPONENT = $1902;

GL_RED = $1903;

GL_GREEN = $1904;

GL_BLUE = $1905;

GL_ALPHA = $1906;

GL_RGB = $1907;

GL_RGBA = $1908;

GL_LUMINANCE = $1909;

GL_LUMINANCE_ALPHA = $190A;

GL_BITMAP = $1A00;

GL_POINT = $1B00;

GL_LINE = $1B01;

GL_FILL = $1B02;

GL_RENDER = $1C00;

GL_FEEDBACK = $1C01;

GL_SELECT = $1C02;

GL_FLAT = $1D00;

GL_SMOOTH = $1D01;

GL_KEEP = $1E00;

GL_REPLACE = $1E01;

GL_INCR = $1E02;

GL_DECR = $1E03;

GL_VENDOR = $1F00;

GL_RENDERER = $1F01;

GL_VERSION = $1F02;

GL_EXTENSIONS = $1F03;

GL_S = $2000;

GL_T = $2001;

GL_R = $2002;

GL_Q = $2003;

GL_MODULATE = $2100;

GL_DECAL = $2101;

GL_TEXTURE_ENV_MODE = $2200;

GL_TEXTURE_ENV_COLOR = $2201;

GL_TEXTURE_ENV = $2300;

GL_EYE_LINEAR = $2400;

GL_OBJECT_LINEAR = $2401;

GL_SPHERE_MAP = $2402;

GL_TEXTURE_GEN_MODE = $2500;

GL_OBJECT_PLANE = $2501;

GL_EYE_PLANE = $2502;

GL_NEAREST = $2600;

GL_LINEAR = $2601;

GL_NEAREST_MIPMAP_NEAREST = $2700;

GL_LINEAR_MIPMAP_NEAREST = $2701;

GL_NEAREST_MIPMAP_LINEAR = $2702;

GL_LINEAR_MIPMAP_LINEAR = $2703;

GL_TEXTURE_MAG_FILTER = $2800;

GL_TEXTURE_MIN_FILTER = $2801;

GL_TEXTURE_WRAP_S = $2802;

GL_TEXTURE_WRAP_T = $2803;

GL_CLAMP = $2900;

GL_REPEAT = $2901;

GL_CLIENT_PIXEL_STORE_BIT = $00000001;

GL_CLIENT_VERTEX_ARRAY_BIT = $00000002;

GL_CLIENT_ALL_ATTRIB_BITS = $FFFFFFFF;

GL_POLYGON_OFFSET_FACTOR = $8038;

GL_POLYGON_OFFSET_UNITS = $2A00;

GL_POLYGON_OFFSET_POINT = $2A01;

GL_POLYGON_OFFSET_LINE = $2A02;

GL_POLYGON_OFFSET_FILL = $8037;

GL_ALPHA4 = $803B;

GL_ALPHA8 = $803C;

GL_ALPHA12 = $803D;

GL_ALPHA16 = $803E;

GL_LUMINANCE4 = $803F;

GL_LUMINANCE8 = $8040;

GL_LUMINANCE12 = $8041;

GL_LUMINANCE16 = $8042;

GL_LUMINANCE4_ALPHA4 = $8043;

GL_LUMINANCE6_ALPHA2 = $8044;

GL_LUMINANCE8_ALPHA8 = $8045;

GL_LUMINANCE12_ALPHA4 = $8046;

GL_LUMINANCE12_ALPHA12 = $8047;

GL_LUMINANCE16_ALPHA16 = $8048;

GL_INTENSITY = $8049;

GL_INTENSITY4 = $804A;

GL_INTENSITY8 = $804B;

GL_INTENSITY12 = $804C;

GL_INTENSITY16 = $804D;

GL_R3_G3_B2 = $2A10;

GL_RGB4 = $804F;

GL_RGB5 = $8050;

GL_RGB8 = $8051;

GL_RGB10 = $8052;

GL_RGB12 = $8053;

GL_RGB16 = $8054;

GL_RGBA2 = $8055;

GL_RGBA4 = $8056;

GL_RGB5_A1 = $8057;

GL_RGBA8 = $8058;

GL_RGB10_A2 = $8059;

GL_RGBA12 = $805A;

GL_RGBA16 = $805B;

GL_TEXTURE_RED_SIZE = $805C;

GL_TEXTURE_GREEN_SIZE = $805D;

GL_TEXTURE_BLUE_SIZE = $805E;

GL_TEXTURE_ALPHA_SIZE = $805F;

GL_TEXTURE_LUMINANCE_SIZE = $8060;

GL_TEXTURE_INTENSITY_SIZE = $8061;

GL_PROXY_TEXTURE_1D = $8063;

GL_PROXY_TEXTURE_2D = $8064;

GL_TEXTURE_PRIORITY = $8066;

GL_TEXTURE_RESIDENT = $8067;

GL_TEXTURE_BINDING_1D = $8068;

GL_TEXTURE_BINDING_2D = $8069;

GL_VERTEX_ARRAY = $8074;

GL_NORMAL_ARRAY = $8075;

GL_COLOR_ARRAY = $8076;

GL_INDEX_ARRAY = $8077;

GL_TEXTURE_COORD_ARRAY = $8078;

GL_EDGE_FLAG_ARRAY = $8079;

GL_VERTEX_ARRAY_SIZE = $807A;

GL_VERTEX_ARRAY_TYPE = $807B;

GL_VERTEX_ARRAY_STRIDE = $807C;

GL_NORMAL_ARRAY_TYPE = $807E;

GL_NORMAL_ARRAY_STRIDE = $807F;

GL_COLOR_ARRAY_SIZE = $8081;

GL_COLOR_ARRAY_TYPE = $8082;

GL_COLOR_ARRAY_STRIDE = $8083;

GL_INDEX_ARRAY_TYPE = $8085;

GL_INDEX_ARRAY_STRIDE = $8086;

GL_TEXTURE_COORD_ARRAY_SIZE = $8088;

GL_TEXTURE_COORD_ARRAY_TYPE = $8089;

GL_TEXTURE_COORD_ARRAY_STRIDE = $808A;

GL_EDGE_FLAG_ARRAY_STRIDE = $808C;

GL_VERTEX_ARRAY_POINTER = $808E;

GL_NORMAL_ARRAY_POINTER = $808F;

GL_COLOR_ARRAY_POINTER = $8090;

GL_INDEX_ARRAY_POINTER = $8091;

GL_TEXTURE_COORD_ARRAY_POINTER = $8092;

GL_EDGE_FLAG_ARRAY_POINTER = $8093;

GL_V2F = $2A20;

GL_V3F = $2A21;

GL_C4UB_V2F = $2A22;

GL_C4UB_V3F = $2A23;

GL_C3F_V3F = $2A24;

GL_N3F_V3F = $2A25;

GL_C4F_N3F_V3F = $2A26;

GL_T2F_V3F = $2A27;

GL_T4F_V4F = $2A28;

GL_T2F_C4UB_V3F = $2A29;

GL_T2F_C3F_V3F = $2A2A;

GL_T2F_N3F_V3F = $2A2B;

GL_T2F_C4F_N3F_V3F = $2A2C;

GL_T4F_C4F_N3F_V4F = $2A2D;

GL_EXT_vertex_array = 1;

GL_WIN_swap_hint = 1;

GL_EXT_bgra = 1;

GL_EXT_paletted_texture = 1;

GL_VERTEX_ARRAY_EXT = $8074;

GL_NORMAL_ARRAY_EXT = $8075;

GL_COLOR_ARRAY_EXT = $8076;

GL_INDEX_ARRAY_EXT = $8077;

GL_TEXTURE_COORD_ARRAY_EXT = $8078;

GL_EDGE_FLAG_ARRAY_EXT = $8079;

GL_VERTEX_ARRAY_SIZE_EXT = $807A;

GL_VERTEX_ARRAY_TYPE_EXT = $807B;

GL_VERTEX_ARRAY_STRIDE_EXT = $807C;

GL_VERTEX_ARRAY_COUNT_EXT = $807D;

GL_NORMAL_ARRAY_TYPE_EXT = $807E;

GL_NORMAL_ARRAY_STRIDE_EXT = $807F;

GL_NORMAL_ARRAY_COUNT_EXT = $8080;

GL_COLOR_ARRAY_SIZE_EXT = $8081;

GL_COLOR_ARRAY_TYPE_EXT = $8082;

GL_COLOR_ARRAY_STRIDE_EXT = $8083;

GL_COLOR_ARRAY_COUNT_EXT = $8084;

GL_INDEX_ARRAY_TYPE_EXT = $8085;

GL_INDEX_ARRAY_STRIDE_EXT = $8086;

GL_INDEX_ARRAY_COUNT_EXT = $8087;

GL_TEXTURE_COORD_ARRAY_SIZE_EXT = $8088;

GL_TEXTURE_COORD_ARRAY_TYPE_EXT = $8089;

GL_TEXTURE_COORD_ARRAY_STRIDE_EXT = $808A;

GL_TEXTURE_COORD_ARRAY_COUNT_EXT = $808B;

GL_EDGE_FLAG_ARRAY_STRIDE_EXT = $808C;

GL_EDGE_FLAG_ARRAY_COUNT_EXT = $808D;

GL_VERTEX_ARRAY_POINTER_EXT = $808E;

GL_NORMAL_ARRAY_POINTER_EXT = $808F;

GL_COLOR_ARRAY_POINTER_EXT = $8090;

GL_INDEX_ARRAY_POINTER_EXT = $8091;

GL_TEXTURE_COORD_ARRAY_POINTER_EXT = $8092;

GL_EDGE_FLAG_ARRAY_POINTER_EXT = $8093;

GL_DOUBLE_EXT = GL_DOUBLE;

GL_BGR_EXT = $80E0;

GL_BGRA_EXT = $80E1;

GL_COLOR_TABLE_FORMAT_EXT = $80D8;

GL_COLOR_TABLE_WIDTH_EXT = $80D9;

GL_COLOR_TABLE_RED_SIZE_EXT = $80DA;

GL_COLOR_TABLE_GREEN_SIZE_EXT = $80DB;

GL_COLOR_TABLE_BLUE_SIZE_EXT = $80DC;

GL_COLOR_TABLE_ALPHA_SIZE_EXT = $80DD;

GL_COLOR_TABLE_LUMINANCE_SIZE_EXT = $80DE;

GL_COLOR_TABLE_INTENSITY_SIZE_EXT = $80DF;

GL_COLOR_INDEX1_EXT = $80E2;

GL_COLOR_INDEX2_EXT = $80E3;

GL_COLOR_INDEX4_EXT = $80E4;

GL_COLOR_INDEX8_EXT = $80E5;

GL_COLOR_INDEX12_EXT = $80E6;

GL_COLOR_INDEX16_EXT = $80E7;

GL_LOGIC_OP = GL_INDEX_LOGIC_OP;

GL_TEXTURE_COMPONENTS = GL_TEXTURE_INTERNAL_FORMAT;

Variables

glAccum: procedure(op: GLenum; value: GLfloat); cdecl;

glAlphaFunc: procedure(func: GLenum; ref: GLclampf); cdecl;

glAreTexturesResident: function(n: GLsizei; const textures: PGLuint; residences: PGLboolean): GLboolean; cdecl;

glArrayElement: procedure(i: GLint); cdecl;

glBegin: procedure(mode: GLenum); cdecl;

glBindTexture: procedure(target: GLenum; texture: GLuint); cdecl;

glBitmap: procedure(width, height: GLsizei; xorig, yorig: GLfloat; xmove, ymove: GLfloat; const bitmap: PGLubyte); cdecl;

glBlendFunc: procedure(sfactor, dfactor: GLenum); cdecl;

glCallList: procedure(list: GLuint); cdecl;

glCallLists: procedure(n: GLsizei; atype: GLenum; const lists: Pointer); cdecl;

glClear: procedure(mask: GLbitfield); cdecl;

glClearAccum: procedure(red, green, blue, alpha: GLfloat); cdecl;

glClearColor: procedure(red, green, blue, alpha: GLclampf); cdecl;

glClearDepth: procedure(depth: GLclampd); cdecl;

glClearIndex: procedure(c: GLfloat); cdecl;

glClearStencil: procedure(s: GLint); cdecl;

glClipPlane: procedure(plane: GLenum; const equation: PGLdouble); cdecl;

glColor3b: procedure(red, green, blue: GLbyte); cdecl;

glColor3bv: procedure(const v: PGLbyte); cdecl;

glColor3d: procedure(red, green, blue: GLdouble); cdecl;

glColor3dv: procedure(const v: PGLdouble); cdecl;

glColor3f: procedure(red, green, blue: GLfloat); cdecl;

glColor3fv: procedure(const v: PGLfloat); cdecl;

glColor3i: procedure(red, green, blue: GLint); cdecl;

glColor3iv: procedure(const v: PGLint); cdecl;

glColor3s: procedure(red, green, blue: GLshort); cdecl;

glColor3sv: procedure(const v: PGLshort); cdecl;

glColor3ub: procedure(red, green, blue: GLubyte); cdecl;

glColor3ubv: procedure(const v: PGLubyte); cdecl;

glColor3ui: procedure(red, green, blue: GLuint); cdecl;

glColor3uiv: procedure(const v: PGLuint); cdecl;

glColor3us: procedure(red, green, blue: GLushort); cdecl;

glColor3usv: procedure(const v: PGLushort); cdecl;

glColor4b: procedure(red, green, blue, alpha: GLbyte); cdecl;

glColor4bv: procedure(const v: PGLbyte); cdecl;

glColor4d: procedure(red, green, blue, alpha: GLdouble); cdecl;

glColor4dv: procedure(const v: PGLdouble); cdecl;

glColor4f: procedure(red, green, blue, alpha: GLfloat); cdecl;

glColor4fv: procedure(const v: PGLfloat); cdecl;

glColor4i: procedure(red, green, blue, alpha: GLint); cdecl;

glColor4iv: procedure(const v: PGLint); cdecl;

glColor4s: procedure(red, green, blue, alpha: GLshort); cdecl;

glColor4sv: procedure(const v: PGLshort); cdecl;

glColor4ub: procedure(red, green, blue, alpha: GLubyte); cdecl;

glColor4ubv: procedure(const v: PGLubyte); cdecl;

glColor4ui: procedure(red, green, blue, alpha: GLuint); cdecl;

glColor4uiv: procedure(const v: PGLuint); cdecl;

glColor4us: procedure(red, green, blue, alpha: GLushort); cdecl;

glColor4usv: procedure(const v: PGLushort); cdecl;

glColorMask: procedure(red, green, blue, alpha: GLboolean); cdecl;

glColorMaterial: procedure(face, mode: GLenum); cdecl;

glColorPointer: procedure(size: GLint; atype: GLenum; stride: GLsizei; const pointer: Pointer); cdecl;

glCopyPixels: procedure(x, y: GLint; width, height: GLsizei; atype: GLenum); cdecl;

glCopyTexImage1D: procedure(target: GLenum; level: GLint; internalFormat: GLenum; x, y: GLint; width: GLsizei; border: GLint); cdecl;

glCopyTexImage2D: procedure(target: GLenum; level: GLint; internalFormat: GLenum; x, y: GLint; width, height: GLsizei; border: GLint); cdecl;