📄 gl.pas
字号:
// GL_TEXTURE_PRIORITY
// TextureTarget
// GL_TEXTURE_1D
// GL_TEXTURE_2D
// GL_PROXY_TEXTURE_1D
// GL_PROXY_TEXTURE_2D
// TextureWrapMode
GL_CLAMP = $2900;
GL_REPEAT = $2901;
// VertexPointerType
// GL_SHORT
// GL_INT
// GL_FLOAT
// GL_DOUBLE
// ClientAttribMask
GL_CLIENT_PIXEL_STORE_BIT = $00000001;
GL_CLIENT_VERTEX_ARRAY_BIT = $00000002;
GL_CLIENT_ALL_ATTRIB_BITS = $FFFFFFFF;
// polygon_offset
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;
// texture
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;
// texture_object
GL_TEXTURE_PRIORITY = $8066;
GL_TEXTURE_RESIDENT = $8067;
GL_TEXTURE_BINDING_1D = $8068;
GL_TEXTURE_BINDING_2D = $8069;
// vertex_array
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;
// Extensions
GL_EXT_vertex_array = 1;
GL_WIN_swap_hint = 1;
GL_EXT_bgra = 1;
GL_EXT_paletted_texture = 1;
// EXT_vertex_array
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;
// EXT_bgra
GL_BGR_EXT = $80E0;
GL_BGRA_EXT = $80E1;
// EXT_paletted_texture
// These must match the GL_COLOR_TABLE_*_SGI enumerants
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;
// For compatibility with OpenGL v1.0
GL_LOGIC_OP = GL_INDEX_LOGIC_OP;
GL_TEXTURE_COMPONENTS = GL_TEXTURE_INTERNAL_FORMAT;
{******************************************************************************}
var
glAccum: procedure(op: GLenum; value: GLfloat); stdcall;
glAlphaFunc: procedure(func: GLenum; ref: GLclampf); stdcall;
glAreTexturesResident: function (n: GLsizei; const textures: PGLuint; residences: PGLboolean): GLboolean; stdcall;
glArrayElement: procedure(i: GLint); stdcall;
glBegin: procedure(mode: GLenum); stdcall;
glBindTexture: procedure(target: GLenum; texture: GLuint); stdcall;
glBitmap: procedure (width, height: GLsizei; xorig, yorig: GLfloat; xmove, ymove: GLfloat; const bitmap: PGLubyte); stdcall;
glBlendFunc: procedure(sfactor, dfactor: GLenum); stdcall;
glCallList: procedure(list: GLuint); stdcall;
glCallLists: procedure(n: GLsizei; atype: GLenum; const lists: Pointer); stdcall;
glClear: procedure(mask: GLbitfield); stdcall;
glClearAccum: procedure(red, green, blue, alpha: GLfloat); stdcall;
glClearColor: procedure(red, green, blue, alpha: GLclampf); stdcall;
glClearDepth: procedure(depth: GLclampd); stdcall;
glClearIndex: procedure(c: GLfloat); stdcall;
glClearStencil: procedure(s: GLint); stdcall;
glClipPlane: procedure(plane: GLenum; const equation: PGLdouble); stdcall;
glColor3b: procedure(red, green, blue: GLbyte); stdcall;
glColor3bv: procedure(const v: PGLbyte); stdcall;
glColor3d: procedure(red, green, blue: GLdouble); stdcall;
glColor3dv: procedure(const v: PGLdouble); stdcall;
glColor3f: procedure(red, green, blue: GLfloat); stdcall;
glColor3fv: procedure(const v: PGLfloat); stdcall;
glColor3i: procedure(red, green, blue: GLint); stdcall;
glColor3iv: procedure(const v: PGLint); stdcall;
glColor3s: procedure(red, green, blue: GLshort); stdcall;
glColor3sv: procedure(const v: PGLshort); stdcall;
glColor3ub: procedure(red, green, blue: GLubyte); stdcall;
glColor3ubv: procedure(const v: PGLubyte); stdcall;
glColor3ui: procedure(red, green, blue: GLuint); stdcall;
glColor3uiv: procedure(const v: PGLuint); stdcall;
glColor3us: procedure(red, green, blue: GLushort); stdcall;
glColor3usv: procedure(const v: PGLushort); stdcall;
glColor4b: procedure(red, green, blue, alpha: GLbyte); stdcall;
glColor4bv: procedure(const v: PGLbyte); stdcall;
glColor4d: procedure(red, green, blue, alpha: GLdouble); stdcall;
glColor4dv: procedure(const v: PGLdouble); stdcall;
glColor4f: procedure(red, green, blue, alpha: GLfloat); stdcall;
glColor4fv: procedure(const v: PGLfloat); stdcall;
glColor4i: procedure(red, green, blue, alpha: GLint); stdcall;
glColor4iv: procedure(const v: PGLint); stdcall;
glColor4s: procedure(red, green, blue, alpha: GLshort); stdcall;
glColor4sv: procedure(const v: PGLshort); stdcall;
glColor4ub: procedure(red, green, blue, alpha: GLubyte); stdcall;
glColor4ubv: procedure(const v: PGLubyte); stdcall;
glColor4ui: procedure(red, green, blue, alpha: GLuint); stdcall;
glColor4uiv: procedure(const v: PGLuint); stdcall;
glColor4us: procedure(red, green, blue, alpha: GLushort); stdcall;
glColor4usv: procedure(const v: PGLushort); stdcall;
glColorMask: procedure(red, green, blue, alpha: GLboolean); stdcall;
glColorMaterial: procedure(face, mode: GLenum); stdcall;
glColorPointer: procedure(size: GLint; atype: GLenum; stride: GLsizei; const pointer: Pointer);
glCopyPixels: procedure(x, y: GLint; width, height: GLsizei; atype: GLenum); stdcall;
glCopyTexImage1D: procedure (target: GLenum; level: GLint; internalFormat: GLenum; x, y: GLint; width: GLsizei; border: GLint); stdcall;
glCopyTexImage2D: procedure(target: GLenum; level: GLint; internalFormat: GLenum; x, y: GLint; width, height: GLsizei; border: GLint); stdcall;
glCopyTexSubImage1D: procedure(target: GLenum; level, xoffset, x, y: GLint; width: GLsizei); stdcall;
glCopyTexSubImage2D: procedure(target: GLenum; level, xoffset, yoffset, x, y: GLint; width, height: GLsizei); stdcall;
glCullFace: procedure(mode: GLenum); stdcall;
glDeleteLists: procedure(list: GLuint; range: GLsizei); stdcall;
glDeleteTextures: procedure(n: GLsizei; const textures: PGLuint); stdcall;
glDepthFunc: procedure(func: GLenum); stdcall;
glDepthMask: procedure(flag: GLboolean); stdcall;
glDepthRange: procedure(zNear, zFar: GLclampd); stdcall;
glDisable: procedure(cap: GLenum); stdcall;
glDisableClientState: procedure(aarray: GLenum); stdcall;
glDrawArrays: procedure(mode: GLenum; first: GLint; count: GLsizei); stdcall;
glDrawBuffer: procedure(mode: GLenum); stdcall;
glDrawElements: procedure(mode: GLenum; count: GLsizei; atype: GLenum; const indices: Pointer); stdcall;
glDrawPixels: procedure(width, height: GLsizei; format, atype: GLenum; const pixels: Pointer); stdcall;
glEdgeFlag: procedure(flag: GLboolean); stdcall;
glEdgeFlagPointer: procedure(stride: GLsizei; const pointer: Pointer); stdcall;
glEdgeFlagv: procedure(const flag: PGLboolean); stdcall;
glEnable: procedure(cap: GLenum); stdcall;
glEnableClientState: procedure(aarray: GLenum); stdcall;
glEnd: procedure; stdcall;
glEndList: procedure; stdcall;
glEvalCoord1d: procedure(u: GLdouble); stdcall;
glEvalCoord1dv: procedure(const u: PGLdouble); stdcall;
glEvalCoord1f: procedure(u: GLfloat); stdcall;
glEvalCoord1fv: procedure(const u: PGLfloat); stdcall;
glEvalCoord2d: procedure(u, v: GLdouble); stdcall;
glEvalCoord2dv: procedure(const u: PGLdouble); stdcall;
glEvalCoord2f: procedure(u, v: GLfloat); stdcall;
glEvalCoord2fv: procedure(const u: PGLfloat); stdcall;
glEvalMesh1: procedure(mode: GLenum; i1, i2: GLint); stdcall;
glEvalMesh2: procedure(mode: GLenum; i1, i2, j1, j2: GLint); stdcall;
glEvalPoint1: procedure(i: GLint); stdcall;
glEvalPoint2: procedure(i, j: GLint); stdcall;
glFeedbackBuffer: procedure(size: GLsizei; atype: GLenum; buffer: PGLfloat); stdcall;
glFinish: procedure; stdcall;
glFlush: procedure; stdcall;
glFogf: procedure(pname: GLenum; param: GLfloat); stdcall;
glFogfv: procedure(pname: GLenum; const params: PGLfloat); stdcall;
glFogi: procedure(pname: GLenum; param: GLint); stdcall;
glFogiv: procedure(pname: GLenum; const params: PGLint); stdcall;
glFrontFace: procedure(mode: GLenum); stdcall;
glFrustum: procedure(left, right, bottom, top, zNear, zFar: GLdouble); stdcall;
glGenLists: function(range: GLsizei): GLuint; stdcall;
glGenTextures: procedure(n: GLsizei; textures: PGLuint); stdcall;
glGetBooleanv: procedure(pname: GLenum; params: PGLboolean); stdcall;
glGetClipPlane: procedure(plane: GLenum; equation: PGLdouble); stdcall;
glGetDoublev: procedure(pname: GLenum; params: PGLdouble); stdcall;
glGetError: function: GLenum; stdcall;
glGetFloatv: procedure(pname: GLenum; params: PGLfloat); stdcall;
glGetIntegerv: procedure(pname: GLenum; params: PGLint); stdcall;
glGetLightfv: procedure(light, pname: GLenum; params: PGLfloat); stdcall;
glGetLightiv: procedure(light, pname: GLenum; params: PGLint); stdcall;
glGetMapdv: procedure(target, query: GLenum; v: PGLdouble); stdcall;
glGetMapfv: procedure(target, query: GLenum; v: PGLfloat); stdcall;
glGetMapiv: procedure(target, query: GLenum; v: GLint); stdcall;
glGetMaterialfv: procedure(face, pname: GLenum; params: PGLfloat); stdcall;
glGetMaterialiv: procedure(face, pname: GLenum; params: GLint); stdcall;
glGetPixelMapfv: procedure(map: GLenum; values: PGLfloat); stdcall;
glGetPixelMapuiv: procedure(map: GLenum; values: PGLuint); stdcall;
glGetPixelMapusv: procedure(map: GLenum; values: PGLushort); stdcall;
glGetPointerv: procedure(pname: GLenum; params: Pointer); stdcall;
glGetPolygonStipple: procedure(mask: PGLubyte); stdcall;
glGetString: function(name: GLenum): PGLubyte; stdcall;
glGetTexEnvfv: procedure(target, pname: GLenum; params: PGLfloat); stdcall;
glGetTexEnviv: procedure(target, pname: GLenum; params: PGLint); stdcall;
glGetTexGendv: procedure(coord, pname: GLenum; params: PGLdouble); stdcall;
glGetTexGenfv: procedure(coord, pname: GLenum; params: PGLfloat); stdcall;
glGetTexGeniv: procedure(coord, pname: GLenum; params: PGLint); stdcall;
glGetTexImage: procedure(target: GLenum; level: GLint; format: GLenum; atype: GLenum; pixels: Pointer); stdcall;
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -