📄 opengl.pas
字号:
{$EXTERNALSYM GL_FEEDBACK}
GL_SELECT = $1C02;
{$EXTERNALSYM GL_SELECT}
{ ShadingModel }
GL_FLAT = $1D00;
{$EXTERNALSYM GL_FLAT}
GL_SMOOTH = $1D01;
{$EXTERNALSYM GL_SMOOTH}
{ StencilFunction }
{ GL_NEVER }
{ GL_LESS }
{ GL_EQUAL }
{ GL_LEQUAL }
{ GL_GREATER }
{ GL_NOTEQUAL }
{ GL_GEQUAL }
{ GL_ALWAYS }
{ StencilOp }
{ GL_ZERO }
GL_KEEP = $1E00;
{$EXTERNALSYM GL_KEEP}
GL_REPLACE = $1E01;
{$EXTERNALSYM GL_REPLACE}
GL_INCR = $1E02;
{$EXTERNALSYM GL_INCR}
GL_DECR = $1E03;
{$EXTERNALSYM GL_DECR}
{ GL_INVERT }
{ StringName }
GL_VENDOR = $1F00;
{$EXTERNALSYM GL_VENDOR}
GL_RENDERER = $1F01;
{$EXTERNALSYM GL_RENDERER}
GL_VERSION = $1F02;
{$EXTERNALSYM GL_VERSION}
GL_EXTENSIONS = $1F03;
{$EXTERNALSYM GL_EXTENSIONS}
{ TextureCoordName }
GL_S = $2000;
{$EXTERNALSYM GL_S}
GL_T = $2001;
{$EXTERNALSYM GL_T}
GL_R = $2002;
{$EXTERNALSYM GL_R}
GL_Q = $2003;
{$EXTERNALSYM GL_Q}
{ TextureEnvMode }
GL_MODULATE = $2100;
{$EXTERNALSYM GL_MODULATE}
GL_DECAL = $2101;
{$EXTERNALSYM GL_DECAL}
{ GL_BLEND }
{ TextureEnvParameter }
GL_TEXTURE_ENV_MODE = $2200;
{$EXTERNALSYM GL_TEXTURE_ENV_MODE}
GL_TEXTURE_ENV_COLOR = $2201;
{$EXTERNALSYM GL_TEXTURE_ENV_COLOR}
{ TextureEnvTarget }
GL_TEXTURE_ENV = $2300;
{$EXTERNALSYM GL_TEXTURE_ENV}
{ TextureGenMode }
GL_EYE_LINEAR = $2400;
{$EXTERNALSYM GL_EYE_LINEAR}
GL_OBJECT_LINEAR = $2401;
{$EXTERNALSYM GL_OBJECT_LINEAR}
GL_SPHERE_MAP = $2402;
{$EXTERNALSYM GL_SPHERE_MAP}
{ TextureGenParameter }
GL_TEXTURE_GEN_MODE = $2500;
{$EXTERNALSYM GL_TEXTURE_GEN_MODE}
GL_OBJECT_PLANE = $2501;
{$EXTERNALSYM GL_OBJECT_PLANE}
GL_EYE_PLANE = $2502;
{$EXTERNALSYM GL_EYE_PLANE}
{ TextureMagFilter }
GL_NEAREST = $2600;
{$EXTERNALSYM GL_NEAREST}
GL_LINEAR = $2601;
{$EXTERNALSYM GL_LINEAR}
{ TextureMinFilter }
{ GL_NEAREST }
{ GL_LINEAR }
GL_NEAREST_MIPMAP_NEAREST = $2700;
{$EXTERNALSYM GL_NEAREST_MIPMAP_NEAREST}
GL_LINEAR_MIPMAP_NEAREST = $2701;
{$EXTERNALSYM GL_LINEAR_MIPMAP_NEAREST}
GL_NEAREST_MIPMAP_LINEAR = $2702;
{$EXTERNALSYM GL_NEAREST_MIPMAP_LINEAR}
GL_LINEAR_MIPMAP_LINEAR = $2703;
{$EXTERNALSYM GL_LINEAR_MIPMAP_LINEAR}
{ TextureParameterName }
GL_TEXTURE_MAG_FILTER = $2800;
{$EXTERNALSYM GL_TEXTURE_MAG_FILTER}
GL_TEXTURE_MIN_FILTER = $2801;
{$EXTERNALSYM GL_TEXTURE_MIN_FILTER}
GL_TEXTURE_WRAP_S = $2802;
{$EXTERNALSYM GL_TEXTURE_WRAP_S}
GL_TEXTURE_WRAP_T = $2803;
{$EXTERNALSYM GL_TEXTURE_WRAP_T}
{ GL_TEXTURE_BORDER_COLOR }
{ TextureTarget }
{ GL_TEXTURE_1D }
{ GL_TEXTURE_2D }
{ TextureWrapMode }
GL_CLAMP = $2900;
{$EXTERNALSYM GL_CLAMP}
GL_REPEAT = $2901;
{$EXTERNALSYM GL_REPEAT}
{ ClipPlaneName }
GL_CLIP_PLANE0 = $3000;
{$EXTERNALSYM GL_CLIP_PLANE0}
GL_CLIP_PLANE1 = $3001;
{$EXTERNALSYM GL_CLIP_PLANE1}
GL_CLIP_PLANE2 = $3002;
{$EXTERNALSYM GL_CLIP_PLANE2}
GL_CLIP_PLANE3 = $3003;
{$EXTERNALSYM GL_CLIP_PLANE3}
GL_CLIP_PLANE4 = $3004;
{$EXTERNALSYM GL_CLIP_PLANE4}
GL_CLIP_PLANE5 = $3005;
{$EXTERNALSYM GL_CLIP_PLANE5}
{ LightName }
GL_LIGHT0 = $4000;
{$EXTERNALSYM GL_LIGHT0}
GL_LIGHT1 = $4001;
{$EXTERNALSYM GL_LIGHT1}
GL_LIGHT2 = $4002;
{$EXTERNALSYM GL_LIGHT2}
GL_LIGHT3 = $4003;
{$EXTERNALSYM GL_LIGHT3}
GL_LIGHT4 = $4004;
{$EXTERNALSYM GL_LIGHT4}
GL_LIGHT5 = $4005;
{$EXTERNALSYM GL_LIGHT5}
GL_LIGHT6 = $4006;
{$EXTERNALSYM GL_LIGHT6}
GL_LIGHT7 = $4007;
{$EXTERNALSYM GL_LIGHT7}
// Extensions
GL_EXT_vertex_array = 1;
{$EXTERNALSYM GL_EXT_vertex_array}
GL_WIN_swap_hint = 1;
{$EXTERNALSYM GL_WIN_swap_hint}
// EXT_vertex_array
GL_VERTEX_ARRAY_EXT = $8074;
{$EXTERNALSYM GL_VERTEX_ARRAY_EXT}
GL_NORMAL_ARRAY_EXT = $8075;
{$EXTERNALSYM GL_NORMAL_ARRAY_EXT}
GL_COLOR_ARRAY_EXT = $8076;
{$EXTERNALSYM GL_COLOR_ARRAY_EXT}
GL_INDEX_ARRAY_EXT = $8077;
{$EXTERNALSYM GL_INDEX_ARRAY_EXT}
GL_TEXTURE_COORD_ARRAY_EXT = $8078;
{$EXTERNALSYM GL_TEXTURE_COORD_ARRAY_EXT}
GL_EDGE_FLAG_ARRAY_EXT = $8079;
{$EXTERNALSYM GL_EDGE_FLAG_ARRAY_EXT}
GL_VERTEX_ARRAY_SIZE_EXT = $807A;
{$EXTERNALSYM GL_VERTEX_ARRAY_SIZE_EXT}
GL_VERTEX_ARRAY_TYPE_EXT = $807B;
{$EXTERNALSYM GL_VERTEX_ARRAY_TYPE_EXT}
GL_VERTEX_ARRAY_STRIDE_EXT = $807C;
{$EXTERNALSYM GL_VERTEX_ARRAY_STRIDE_EXT}
GL_VERTEX_ARRAY_COUNT_EXT = $807D;
{$EXTERNALSYM GL_VERTEX_ARRAY_COUNT_EXT}
GL_NORMAL_ARRAY_TYPE_EXT = $807E;
{$EXTERNALSYM GL_NORMAL_ARRAY_TYPE_EXT}
GL_NORMAL_ARRAY_STRIDE_EXT = $807F;
{$EXTERNALSYM GL_NORMAL_ARRAY_STRIDE_EXT}
GL_NORMAL_ARRAY_COUNT_EXT = $8080;
{$EXTERNALSYM GL_NORMAL_ARRAY_COUNT_EXT}
GL_COLOR_ARRAY_SIZE_EXT = $8081;
{$EXTERNALSYM GL_COLOR_ARRAY_SIZE_EXT}
GL_COLOR_ARRAY_TYPE_EXT = $8082;
{$EXTERNALSYM GL_COLOR_ARRAY_TYPE_EXT}
GL_COLOR_ARRAY_STRIDE_EXT = $8083;
{$EXTERNALSYM GL_COLOR_ARRAY_STRIDE_EXT}
GL_COLOR_ARRAY_COUNT_EXT = $8084;
{$EXTERNALSYM GL_COLOR_ARRAY_COUNT_EXT}
GL_INDEX_ARRAY_TYPE_EXT = $8085;
{$EXTERNALSYM GL_INDEX_ARRAY_TYPE_EXT}
GL_INDEX_ARRAY_STRIDE_EXT = $8086;
{$EXTERNALSYM GL_INDEX_ARRAY_STRIDE_EXT}
GL_INDEX_ARRAY_COUNT_EXT = $8087;
{$EXTERNALSYM GL_INDEX_ARRAY_COUNT_EXT}
GL_TEXTURE_COORD_ARRAY_SIZE_EXT = $8088;
{$EXTERNALSYM GL_TEXTURE_COORD_ARRAY_SIZE_EXT}
GL_TEXTURE_COORD_ARRAY_TYPE_EXT = $8089;
{$EXTERNALSYM GL_TEXTURE_COORD_ARRAY_TYPE_EXT}
GL_TEXTURE_COORD_ARRAY_STRIDE_EXT = $808A;
{$EXTERNALSYM GL_TEXTURE_COORD_ARRAY_STRIDE_EXT}
GL_TEXTURE_COORD_ARRAY_COUNT_EXT = $808B;
{$EXTERNALSYM GL_TEXTURE_COORD_ARRAY_COUNT_EXT}
GL_EDGE_FLAG_ARRAY_STRIDE_EXT = $808C;
{$EXTERNALSYM GL_EDGE_FLAG_ARRAY_STRIDE_EXT}
GL_EDGE_FLAG_ARRAY_COUNT_EXT = $808D;
{$EXTERNALSYM GL_EDGE_FLAG_ARRAY_COUNT_EXT}
GL_VERTEX_ARRAY_POINTER_EXT = $808E;
{$EXTERNALSYM GL_VERTEX_ARRAY_POINTER_EXT}
GL_NORMAL_ARRAY_POINTER_EXT = $808F;
{$EXTERNALSYM GL_NORMAL_ARRAY_POINTER_EXT}
GL_COLOR_ARRAY_POINTER_EXT = $8090;
{$EXTERNALSYM GL_COLOR_ARRAY_POINTER_EXT}
GL_INDEX_ARRAY_POINTER_EXT = $8091;
{$EXTERNALSYM GL_INDEX_ARRAY_POINTER_EXT}
GL_TEXTURE_COORD_ARRAY_POINTER_EXT = $8092;
{$EXTERNALSYM GL_TEXTURE_COORD_ARRAY_POINTER_EXT}
GL_EDGE_FLAG_ARRAY_POINTER_EXT = $8093;
{$EXTERNALSYM GL_EDGE_FLAG_ARRAY_POINTER_EXT}
type
PPointFloat = ^TPointFloat;
{$EXTERNALSYM _POINTFLOAT}
_POINTFLOAT = record
X,Y: Single;
end;
TPointFloat = _POINTFLOAT;
{$EXTERNALSYM POINTFLOAT}
POINTFLOAT = _POINTFLOAT;
PGlyphMetricsFloat = ^TGlyphMetricsFloat;
{$EXTERNALSYM _GLYPHMETRICSFLOAT}
_GLYPHMETRICSFLOAT = record
gmfBlackBoxX: Single;
gmfBlackBoxY: Single;
gmfptGlyphOrigin: TPointFloat;
gmfCellIncX: Single;
gmfCellIncY: Single;
end;
TGlyphMetricsFloat = _GLYPHMETRICSFLOAT;
{$EXTERNALSYM GLYPHMETRICSFLOAT}
GLYPHMETRICSFLOAT = _GLYPHMETRICSFLOAT;
const
{$EXTERNALSYM WGL_FONT_LINES}
WGL_FONT_LINES = 0;
{$EXTERNALSYM WGL_FONT_POLYGONS}
WGL_FONT_POLYGONS = 1;
{***********************************************************}
procedure glAccum (op: GLenum; value: GLfloat); stdcall;
{$EXTERNALSYM glAccum}
procedure glAlphaFunc (func: GLenum; ref: GLclampf); stdcall;
{$EXTERNALSYM glAlphaFunc}
procedure glBegin (mode: GLenum); stdcall;
{$EXTERNALSYM glBegin}
procedure glBitmap (width, height: GLsizei; xorig, yorig: GLfloat;
xmove, ymove: GLfloat; bitmap: Pointer); stdcall;
{$EXTERNALSYM glBitmap}
procedure glBlendFunc (sfactor, dfactor: GLenum); stdcall;
{$EXTERNALSYM glBlendFunc}
procedure glCallList (list: GLuint); stdcall;
{$EXTERNALSYM glCallList}
procedure glCallLists (n: GLsizei; cltype: GLenum; lists: Pointer); stdcall;
{$EXTERNALSYM glCallLists}
procedure glClear (mask: GLbitfield); stdcall;
{$EXTERNALSYM glClear}
procedure glClearAccum (red, green, blue, alpha: GLfloat); stdcall;
{$EXTERNALSYM glClearAccum}
procedure glClearColor (red, green, blue, alpha: GLclampf); stdcall;
{$EXTERNALSYM glClearColor}
procedure glClearDepth (depth: GLclampd); stdcall;
{$EXTERNALSYM glClearDepth}
procedure glClearIndex (c: GLfloat); stdcall;
{$EXTERNALSYM glClearIndex}
procedure glClearStencil (s: GLint); stdcall;
{$EXTERNALSYM glClearStencil}
procedure glClipPlane (plane: GLenum; equation: PGLDouble); stdcall;
{$EXTERNALSYM glClipPlane}
procedure glColor3b (red, green, blue: GLbyte); stdcall;
{$EXTERNALSYM glColor3b}
procedure glColor3bv (v: PGLByte); stdcall;
{$EXTERNALSYM glColor3bv}
procedure glColor3d (red, green, blue: GLdouble); stdcall;
{$EXTERNALSYM glColor3d}
procedure glColor3dv (v: PGLdouble); stdcall;
{$EXTERNALSYM glColor3dv}
procedure glColor3f (red, green, blue: GLfloat); stdcall;
{$EXTERNALSYM glColor3f}
procedure glColor3fv (v: PGLfloat); stdcall;
{$EXTERNALSYM glColor3fv}
procedure glColor3i (red, green, blue: GLint); stdcall;
{$EXTERNALSYM glColor3i}
procedure glColor3iv (v: PGLint); stdcall;
{$EXTERNALSYM glColor3iv}
procedure glColor3s (red, green, blue: GLshort); stdcall;
{$EXTERNALSYM glColor3s}
procedure glColor3sv (v: PGLshort); stdcall;
{$EXTERNALSYM glColor3sv}
procedure glColor3ub (red, green, blue: GLubyte); stdcall;
{$EXTERNALSYM glColor3ub}
procedure glColor3ubv (v: PGLubyte); stdcall;
{$EXTERNALSYM glColor3ubv}
procedure glColor3ui (red, green, blue: GLuint); stdcall;
{$EXTERNALSYM glColor3ui}
procedure glColor3uiv (v: PGLuint); stdcall;
{$EXTERNALSYM glColor3uiv}
procedure glColor3us (red, green, blue: GLushort); stdcall;
{$EXTERNALSYM glColor3us}
procedure glColor3usv (v: PGLushort); stdcall;
{$EXTERNALSYM glColor3usv}
procedure glColor4b (red, green, blue, alpha: GLbyte); stdcall;
{$EXTERNALSYM glColor4b}
procedure glColor4bv (v: PGLbyte); stdcall;
{$EXTERNALSYM glColor4bv}
procedure glColor4d (red, green, blue, alpha: GLdouble); stdcall;
{$EXTERNALSYM glColor4d}
procedure glColor4dv (v: PGLdouble); stdcall;
{$EXTERNALSYM glColor4dv}
procedure glColor4f (red, green, blue, alpha: GLfloat); stdcall;
{$EXTERNALSYM glColor4f}
procedure glColor4fv (v: PGLfloat); stdcall;
{$EXTERNALSYM glColor4fv}
procedure glColor4i (red, green, blue, alpha: GLint); stdcall;
{$EXTERNALSYM glColor4i}
procedure glColor4iv (v: PGLint); stdcall;
{$EXTERNALSYM glColor4iv}
procedure glColor4s (red, green, blue, alpha: GLshort); stdcall;
{$EXTERNALSYM glColor4s}
procedure glColor4sv (v: PGLshort); stdcall;
{$EXTERNALSYM glColor4sv}
procedure glColor4ub (red, green, blue, alpha: GLubyte); stdcall;
{$EXTERNALSYM glColor4ub}
procedure glColor4ubv (v: PGLubyte); stdcall;
{$EXTERNALSYM glColor4ubv}
procedure glColor4ui (red, green, blue, alpha: GLuint); stdcall;
{$EXTERNALSYM glColor4ui}
procedure glColor4uiv (v: PGLuint); stdcall;
{$EXTERNALSYM glColor4uiv}
procedure glColor4us (red, green, blue, alpha: GLushort); stdcall;
{$EXTERNALSYM glColor4us}
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -