Androidapi.Gles3

Unit Androidapi.Gles3.pas

For Delphi 10.3+ we enable GLES 3.0 for all platforms

SET OPENGL MINIMUM VERSION FOR EMBEDDED SHADERS

Constants

const AndroidLib : string = "/usr/lib/libandroid.so";
const AndroidJniGraphicsLib : string = "/usr/lib/libjnigraphics.so";
const AndroidEglLib : string = "/usr/lib/libEGL.so";
const AndroidGlesLib : string = "/usr/lib/libGLESv1_CM.so";
const AndroidGles2Lib : string = "/usr/lib/libGLESv2.so";
const AndroidGles3Lib : string = "/usr/lib/libGLESv3.so";
const AndroidLogLib : string = "/usr/lib/liblog.so";
const AndroidOpenSlesLib : string = "/usr/lib/libOpenSLES.so";
const GL_ES_VERSION_2_0 : Integer = $1;
const GL_ES_VERSION_3_2 : Integer = $1;
const GL_DEPTH_BUFFER_BIT : Integer = $100;
const GL_STENCIL_BUFFER_BIT : Integer = $400;
const GL_COLOR_BUFFER_BIT : Integer = $4000;
const GL_FALSE : Integer = $0;
const GL_TRUE : Integer = $1;
const GL_COLOR : Integer = $1800;
const GL_DEPTH : Integer = $1801;
const GL_STENCIL : Integer = $1802;
const GL_POINTS : Integer = $0;
const GL_LINES : Integer = $1;
const GL_LINE_LOOP : Integer = $2;
const GL_LINE_STRIP : Integer = $3;
const GL_TRIANGLES : Integer = $4;
const GL_TRIANGLE_STRIP : Integer = $5;
const GL_TRIANGLE_FAN : Integer = $6;
const GL_ZERO : Integer = $0;
const GL_ONE : Integer = $1;
const GL_SRC_COLOR : Integer = $300;
const GL_ONE_MINUS_SRC_COLOR : Integer = $301;
const GL_SRC_ALPHA : Integer = $302;
const GL_ONE_MINUS_SRC_ALPHA : Integer = $303;
const GL_DST_ALPHA : Integer = $304;
const GL_ONE_MINUS_DST_ALPHA : Integer = $305;
const GL_DST_COLOR : Integer = $306;
const GL_ONE_MINUS_DST_COLOR : Integer = $307;
const GL_SRC_ALPHA_SATURATE : Integer = $308;
const GL_FUNC_ADD : Integer = $8006;
const GL_BLEND_EQUATION : Integer = $8009;
const GL_BLEND_EQUATION_RGB : Integer = $8009;
const GL_BLEND_EQUATION_ALPHA : Integer = $883D;
const GL_FUNC_SUBTRACT : Integer = $800A;
const GL_FUNC_REVERSE_SUBTRACT : Integer = $800B;
const GL_BLEND_DST_RGB : Integer = $80C8;
const GL_BLEND_SRC_RGB : Integer = $80C9;
const GL_BLEND_DST_ALPHA : Integer = $80CA;
const GL_BLEND_SRC_ALPHA : Integer = $80CB;
const GL_CONSTANT_COLOR : Integer = $8001;
const GL_ONE_MINUS_CONSTANT_COLOR : Integer = $8002;
const GL_CONSTANT_ALPHA : Integer = $8003;
const GL_ONE_MINUS_CONSTANT_ALPHA : Integer = $8004;
const GL_BLEND_COLOR : Integer = $8005;
const GL_ARRAY_BUFFER : Integer = $8892;
const GL_ELEMENT_ARRAY_BUFFER : Integer = $8893;
const GL_ARRAY_BUFFER_BINDING : Integer = $8894;
const GL_ELEMENT_ARRAY_BUFFER_BINDING : Integer = $8895;
const GL_STREAM_DRAW : Integer = $88E0;
const GL_STATIC_DRAW : Integer = $88E4;
const GL_DYNAMIC_DRAW : Integer = $88E8;
const GL_BUFFER_SIZE : Integer = $8764;
const GL_BUFFER_USAGE : Integer = $8765;
const GL_UNIFORM_BUFFER : Integer = $8A11;
const GL_CURRENT_VERTEX_ATTRIB : Integer = $8626;
const GL_FRONT : Integer = $404;
const GL_BACK : Integer = $405;
const GL_FRONT_AND_BACK : Integer = $408;
const GL_TEXTURE_2D : Integer = $DE1;
const GL_CULL_FACE : Integer = $B44;
const GL_BLEND : Integer = $BE2;
const GL_DITHER : Integer = $BD0;
const GL_STENCIL_TEST : Integer = $B90;
const GL_DEPTH_TEST : Integer = $B71;
const GL_SCISSOR_TEST : Integer = $C11;
const GL_POLYGON_OFFSET_FILL : Integer = $8037;
const GL_SAMPLE_ALPHA_TO_COVERAGE : Integer = $809E;
const GL_SAMPLE_COVERAGE : Integer = $80A0;
const GL_NO_ERROR : Integer = $0;
const GL_INVALID_ENUM : Integer = $500;
const GL_INVALID_VALUE : Integer = $501;
const GL_INVALID_OPERATION : Integer = $502;
const GL_STACK_OVERFLOW : Integer = $503;
const GL_STACK_UNDERFLOW : Integer = $504;
const GL_OUT_OF_MEMORY : Integer = $505;
const GL_CONTEXT_LOST : Integer = $507;
const GL_INVALID_INDEX : Integer = $FFFFFFFF;
const GL_CW : Integer = $900;
const GL_CCW : Integer = $901;
const GL_LINE_WIDTH : Integer = $B21;
const GL_ALIASED_POINT_SIZE_RANGE : Integer = $846D;
const GL_ALIASED_LINE_WIDTH_RANGE : Integer = $846E;
const GL_CULL_FACE_MODE : Integer = $B45;
const GL_FRONT_FACE : Integer = $B46;
const GL_DEPTH_RANGE : Integer = $B70;
const GL_DEPTH_WRITEMASK : Integer = $B72;
const GL_DEPTH_CLEAR_VALUE : Integer = $B73;
const GL_DEPTH_FUNC : Integer = $B74;
const GL_STENCIL_CLEAR_VALUE : Integer = $B91;
const GL_STENCIL_FUNC : Integer = $B92;
const GL_STENCIL_FAIL : Integer = $B94;
const GL_STENCIL_PASS_DEPTH_FAIL : Integer = $B95;
const GL_STENCIL_PASS_DEPTH_PASS : Integer = $B96;
const GL_STENCIL_REF : Integer = $B97;
const GL_STENCIL_VALUE_MASK : Integer = $B93;
const GL_STENCIL_WRITEMASK : Integer = $B98;
const GL_STENCIL_BACK_FUNC : Integer = $8800;
const GL_STENCIL_BACK_FAIL : Integer = $8801;
const GL_STENCIL_BACK_PASS_DEPTH_FAIL : Integer = $8802;
const GL_STENCIL_BACK_PASS_DEPTH_PASS : Integer = $8803;
const GL_STENCIL_BACK_REF : Integer = $8CA3;
const GL_STENCIL_BACK_VALUE_MASK : Integer = $8CA4;
const GL_STENCIL_BACK_WRITEMASK : Integer = $8CA5;
const GL_VIEWPORT : Integer = $BA2;
const GL_SCISSOR_BOX : Integer = $C10;
const GL_COLOR_CLEAR_VALUE : Integer = $C22;
const GL_COLOR_WRITEMASK : Integer = $C23;
const GL_UNPACK_ALIGNMENT : Integer = $CF5;
const GL_PACK_ALIGNMENT : Integer = $D05;
const GL_MAX_TEXTURE_SIZE : Integer = $D33;
const GL_MAX_COLOR_ATTACHMENTS : Integer = $8CDF;
const GL_MAX_VIEWPORT_DIMS : Integer = $D3A;
const GL_SUBPIXEL_BITS : Integer = $D50;
const GL_RED_BITS : Integer = $D52;
const GL_GREEN_BITS : Integer = $D53;
const GL_BLUE_BITS : Integer = $D54;
const GL_ALPHA_BITS : Integer = $D55;
const GL_DEPTH_BITS : Integer = $D56;
const GL_STENCIL_BITS : Integer = $D57;
const GL_POLYGON_OFFSET_UNITS : Integer = $2A00;
const GL_POLYGON_OFFSET_FACTOR : Integer = $8038;
const GL_TEXTURE_BINDING_2D : Integer = $8069;
const GL_SAMPLE_BUFFERS : Integer = $80A8;
const GL_SAMPLES : Integer = $80A9;
const GL_SAMPLE_COVERAGE_VALUE : Integer = $80AA;
const GL_SAMPLE_COVERAGE_INVERT : Integer = $80AB;
const GL_NUM_COMPRESSED_TEXTURE_FORMATS : Integer = $86A2;
const GL_COMPRESSED_TEXTURE_FORMATS : Integer = $86A3;
const GL_DONT_CARE : Integer = $1100;
const GL_FASTEST : Integer = $1101;
const GL_NICEST : Integer = $1102;
const GL_GENERATE_MIPMAP_HINT : Integer = $8192;
const GL_BYTE : Integer = $1400;
const GL_UNSIGNED_BYTE : Integer = $1401;
const GL_SHORT : Integer = $1402;
const GL_UNSIGNED_SHORT : Integer = $1403;
const GL_INT : Integer = $1404;
const GL_UNSIGNED_INT : Integer = $1405;
const GL_FLOAT : Integer = $1406;
const GL_HALF_FLOAT : Integer = $140B;
const GL_FIXED : Integer = $140C;
const GL_ALPHA : Integer = $1906;
const GL_RGB : Integer = $1907;
const GL_RGBA : Integer = $1908;
const GL_LUMINANCE : Integer = $1909;
const GL_LUMINANCE_ALPHA : Integer = $190A;
const GL_UNSIGNED_SHORT_4_4_4_4 : Integer = $8033;
const GL_UNSIGNED_SHORT_5_5_5_1 : Integer = $8034;
const GL_UNSIGNED_SHORT_5_6_5 : Integer = $8363;
const GL_FRAGMENT_SHADER : Integer = $8B30;
const GL_VERTEX_SHADER : Integer = $8B31;
const GL_MAX_VERTEX_ATTRIBS : Integer = $8869;
const GL_MAX_VERTEX_UNIFORM_VECTORS : Integer = $8DFB;
const GL_MAX_VARYING_VECTORS : Integer = $8DFC;
const GL_MAX_COMBINED_TEXTURE_IMAGE_UNITS : Integer = $8B4D;
const GL_MAX_VERTEX_TEXTURE_IMAGE_UNITS : Integer = $8B4C;
const GL_MAX_TEXTURE_IMAGE_UNITS : Integer = $8872;
const GL_MAX_FRAGMENT_UNIFORM_VECTORS : Integer = $8DFD;
const GL_SHADER_TYPE : Integer = $8B4F;
const GL_DELETE_STATUS : Integer = $8B80;
const GL_LINK_STATUS : Integer = $8B82;
const GL_VALIDATE_STATUS : Integer = $8B83;
const GL_ATTACHED_SHADERS : Integer = $8B85;
const GL_ACTIVE_UNIFORMS : Integer = $8B86;
const GL_ACTIVE_UNIFORM_MAX_LENGTH : Integer = $8B87;
const GL_ACTIVE_ATTRIBUTES : Integer = $8B89;
const GL_ACTIVE_ATTRIBUTE_MAX_LENGTH : Integer = $8B8A;
const GL_SHADING_LANGUAGE_VERSION : Integer = $8B8C;
const GL_CURRENT_PROGRAM : Integer = $8B8D;
const GL_NEVER : Integer = $200;
const GL_LESS : Integer = $201;
const GL_EQUAL : Integer = $202;
const GL_LEQUAL : Integer = $203;
const GL_GREATER : Integer = $204;
const GL_NOTEQUAL : Integer = $205;
const GL_GEQUAL : Integer = $206;
const GL_ALWAYS : Integer = $207;
const GL_KEEP : Integer = $1E00;
const GL_REPLACE : Integer = $1E01;
const GL_INCR : Integer = $1E02;
const GL_DECR : Integer = $1E03;
const GL_INVERT : Integer = $150A;
const GL_INCR_WRAP : Integer = $8507;
const GL_DECR_WRAP : Integer = $8508;
const GL_VENDOR : Integer = $1F00;
const GL_RENDERER : Integer = $1F01;
const GL_VERSION : Integer = $1F02;
const GL_EXTENSIONS : Integer = $1F03;
const GL_NEAREST : Integer = $2600;
const GL_LINEAR : Integer = $2601;
const GL_NEAREST_MIPMAP_NEAREST : Integer = $2700;
const GL_LINEAR_MIPMAP_NEAREST : Integer = $2701;
const GL_NEAREST_MIPMAP_LINEAR : Integer = $2702;
const GL_LINEAR_MIPMAP_LINEAR : Integer = $2703;
const GL_TEXTURE_MAG_FILTER : Integer = $2800;
const GL_TEXTURE_MIN_FILTER : Integer = $2801;
const GL_TEXTURE_WRAP_S : Integer = $2802;
const GL_TEXTURE_WRAP_T : Integer = $2803;
const GL_TEXTURE_WRAP_R : Integer = $8072;
const GL_TEXTURE : Integer = $1702;
const GL_TEXTURE_CUBE_MAP : Integer = $8513;
const GL_TEXTURE_BINDING_CUBE_MAP : Integer = $8514;
const GL_TEXTURE_CUBE_MAP_POSITIVE_X : Integer = $8515;
const GL_TEXTURE_CUBE_MAP_NEGATIVE_X : Integer = $8516;
const GL_TEXTURE_CUBE_MAP_POSITIVE_Y : Integer = $8517;
const GL_TEXTURE_CUBE_MAP_NEGATIVE_Y : Integer = $8518;
const GL_TEXTURE_CUBE_MAP_POSITIVE_Z : Integer = $8519;
const GL_TEXTURE_CUBE_MAP_NEGATIVE_Z : Integer = $851A;
const GL_MAX_CUBE_MAP_TEXTURE_SIZE : Integer = $851C;
const GL_TEXTURE0 : Integer = $84C0;
const GL_TEXTURE1 : Integer = $84C1;
const GL_TEXTURE2 : Integer = $84C2;
const GL_TEXTURE3 : Integer = $84C3;
const GL_TEXTURE4 : Integer = $84C4;
const GL_TEXTURE5 : Integer = $84C5;
const GL_TEXTURE6 : Integer = $84C6;
const GL_TEXTURE7 : Integer = $84C7;
const GL_TEXTURE8 : Integer = $84C8;
const GL_TEXTURE9 : Integer = $84C9;
const GL_TEXTURE10 : Integer = $84CA;
const GL_TEXTURE11 : Integer = $84CB;
const GL_TEXTURE12 : Integer = $84CC;
const GL_TEXTURE13 : Integer = $84CD;
const GL_TEXTURE14 : Integer = $84CE;
const GL_TEXTURE15 : Integer = $84CF;
const GL_TEXTURE16 : Integer = $84D0;
const GL_TEXTURE17 : Integer = $84D1;
const GL_TEXTURE18 : Integer = $84D2;
const GL_TEXTURE19 : Integer = $84D3;
const GL_TEXTURE20 : Integer = $84D4;
const GL_TEXTURE21 : Integer = $84D5;
const GL_TEXTURE22 : Integer = $84D6;
const GL_TEXTURE23 : Integer = $84D7;
const GL_TEXTURE24 : Integer = $84D8;
const GL_TEXTURE25 : Integer = $84D9;
const GL_TEXTURE26 : Integer = $84DA;
const GL_TEXTURE27 : Integer = $84DB;
const GL_TEXTURE28 : Integer = $84DC;
const GL_TEXTURE29 : Integer = $84DD;
const GL_TEXTURE30 : Integer = $84DE;
const GL_TEXTURE31 : Integer = $84DF;
const GL_ACTIVE_TEXTURE : Integer = $84E0;
const GL_REPEAT : Integer = $2901;
const GL_CLAMP_TO_EDGE : Integer = $812F;
const GL_MIRRORED_REPEAT : Integer = $8370;
const GL_FLOAT_VEC2 : Integer = $8B50;
const GL_FLOAT_VEC3 : Integer = $8B51;
const GL_FLOAT_VEC4 : Integer = $8B52;
const GL_INT_VEC2 : Integer = $8B53;
const GL_INT_VEC3 : Integer = $8B54;
const GL_INT_VEC4 : Integer = $8B55;
const GL_BOOL : Integer = $8B56;
const GL_BOOL_VEC2 : Integer = $8B57;
const GL_BOOL_VEC3 : Integer = $8B58;
const GL_BOOL_VEC4 : Integer = $8B59;
const GL_FLOAT_MAT2 : Integer = $8B5A;
const GL_FLOAT_MAT3 : Integer = $8B5B;
const GL_FLOAT_MAT4 : Integer = $8B5C;
const GL_SAMPLER_2D : Integer = $8B5E;
const GL_SAMPLER_CUBE : Integer = $8B60;
const GL_VERTEX_ATTRIB_ARRAY_ENABLED : Integer = $8622;
const GL_VERTEX_ATTRIB_ARRAY_SIZE : Integer = $8623;
const GL_VERTEX_ATTRIB_ARRAY_STRIDE : Integer = $8624;
const GL_VERTEX_ATTRIB_ARRAY_TYPE : Integer = $8625;
const GL_VERTEX_ATTRIB_ARRAY_NORMALIZED : Integer = $886A;
const GL_VERTEX_ATTRIB_ARRAY_POINTER : Integer = $8645;
const GL_VERTEX_ATTRIB_ARRAY_BUFFER_BINDING : Integer = $889F;
const GL_IMPLEMENTATION_COLOR_READ_TYPE : Integer = $8B9A;
const GL_IMPLEMENTATION_COLOR_READ_FORMAT : Integer = $8B9B;
const GL_COMPILE_STATUS : Integer = $8B81;
const GL_INFO_LOG_LENGTH : Integer = $8B84;
const GL_SHADER_SOURCE_LENGTH : Integer = $8B88;
const GL_SHADER_COMPILER : Integer = $8DFA;
const GL_SHADER_BINARY_FORMATS : Integer = $8DF8;
const GL_NUM_SHADER_BINARY_FORMATS : Integer = $8DF9;
const GL_LOW_FLOAT : Integer = $8DF0;
const GL_MEDIUM_FLOAT : Integer = $8DF1;
const GL_HIGH_FLOAT : Integer = $8DF2;
const GL_LOW_INT : Integer = $8DF3;
const GL_MEDIUM_INT : Integer = $8DF4;
const GL_HIGH_INT : Integer = $8DF5;
const GL_FRAMEBUFFER : Integer = $8D40;
const GL_RENDERBUFFER : Integer = $8D41;
const GL_RGBA4 : Integer = $8056;
const GL_RGB5_A1 : Integer = $8057;
const GL_RGB565 : Integer = $8D62;
const GL_DEPTH_COMPONENT : Integer = $1902;
const GL_DEPTH_COMPONENT16 : Integer = $81A5;
const GL_DEPTH_COMPONENT24 : Integer = $81A6;
const GL_DEPTH_COMPONENT32 : Integer = $8CAC;
const GL_STENCIL_INDEX : Integer = $1901;
const GL_STENCIL_INDEX8 : Integer = $8D48;
const GL_RENDERBUFFER_WIDTH : Integer = $8D42;
const GL_RENDERBUFFER_HEIGHT : Integer = $8D43;
const GL_RENDERBUFFER_INTERNAL_FORMAT : Integer = $8D44;
const GL_RENDERBUFFER_RED_SIZE : Integer = $8D50;
const GL_RENDERBUFFER_GREEN_SIZE : Integer = $8D51;
const GL_RENDERBUFFER_BLUE_SIZE : Integer = $8D52;
const GL_RENDERBUFFER_ALPHA_SIZE : Integer = $8D53;
const GL_RENDERBUFFER_DEPTH_SIZE : Integer = $8D54;
const GL_RENDERBUFFER_STENCIL_SIZE : Integer = $8D55;
const GL_FRAMEBUFFER_ATTACHMENT_OBJECT_TYPE : Integer = $8CD0;
const GL_FRAMEBUFFER_ATTACHMENT_OBJECT_NAME : Integer = $8CD1;
const GL_FRAMEBUFFER_ATTACHMENT_TEXTURE_LEVEL : Integer = $8CD2;
const GL_FRAMEBUFFER_ATTACHMENT_TEXTURE_CUBE_MAP_FACE : Integer = $8CD3;
const GL_COLOR_ATTACHMENT0 : Integer = $8CE0;
const GL_COLOR_ATTACHMENT1 : Integer = $8CE1;
const GL_COLOR_ATTACHMENT2 : Integer = $8CE2;
const GL_COLOR_ATTACHMENT3 : Integer = $8CE3;
const GL_COLOR_ATTACHMENT4 : Integer = $8CE4;
const GL_COLOR_ATTACHMENT5 : Integer = $8CE5;
const GL_COLOR_ATTACHMENT6 : Integer = $8CE6;
const GL_COLOR_ATTACHMENT7 : Integer = $8CE7;
const GL_COLOR_ATTACHMENT8 : Integer = $8CE8;
const GL_COLOR_ATTACHMENT9 : Integer = $8CE9;
const GL_COLOR_ATTACHMENT10 : Integer = $8CEA;
const GL_COLOR_ATTACHMENT11 : Integer = $8CEB;
const GL_COLOR_ATTACHMENT12 : Integer = $8CEC;
const GL_COLOR_ATTACHMENT13 : Integer = $8CED;
const GL_COLOR_ATTACHMENT14 : Integer = $8CEE;
const GL_COLOR_ATTACHMENT15 : Integer = $8CEF;
const GL_DEPTH_ATTACHMENT : Integer = $8D00;
const GL_STENCIL_ATTACHMENT : Integer = $8D20;
const GL_NONE : Integer = $0;
const GL_FRAMEBUFFER_COMPLETE : Integer = $8CD5;
const GL_FRAMEBUFFER_INCOMPLETE_ATTACHMENT : Integer = $8CD6;
const GL_FRAMEBUFFER_INCOMPLETE_MISSING_ATTACHMENT : Integer = $8CD7;
const GL_FRAMEBUFFER_INCOMPLETE_DIMENSIONS : Integer = $8CD9;
const GL_FRAMEBUFFER_UNSUPPORTED : Integer = $8CDD;
const GL_FRAMEBUFFER_BINDING : Integer = $8CA6;
const GL_RENDERBUFFER_BINDING : Integer = $8CA7;
const GL_MAX_RENDERBUFFER_SIZE : Integer = $84E8;
const GL_INVALID_FRAMEBUFFER_OPERATION : Integer = $506;

Mics. types

type GLchar = shortint;
type GLenum = cardinal;
type GLboolean = byte;
type GLbitfield = cardinal;
type GLbyte = shortint;
type GLshort = shortint;
type GLint = integer;
type GLsizei = integer;
type GLubyte = byte;
type GLushort = word;
type GLuint = cardinal;
type GLfloat = Float;
type GLclampf = Float;
type GLfixed = integer;
type GLclampx = integer;
type GLintptr = Int64;
type GLsizeiptr = Int64;
type PGLchar = pointer to ;
type PPGLchar = pointer to ;
type PGLenum = pointer to Cardinal;
type PGLsizei = pointer to Integer;
type PGLfloat = pointer to Single;
type PGLshort = pointer to SmallInt;
type PGLvoid = pointer to Pointer;
type PPGLvoid = pointer to Pointer;
type PGLubyte = pointer to Byte;
type PGLint = pointer to Integer;
type PGLboolean = pointer to Byte;
type PGLuint = pointer to Cardinal;
type PGLfixed = pointer to Integer;

Functions / Procedures

external public procedure glActiveTexture ( texture : Cardinal ) ;
external public procedure glAttachShader ( _program : Cardinal; shader : Cardinal ) ;
external public procedure glBindAttribLocation ( _program : Cardinal; index : Cardinal; const name : @PAnsiChar ) ;
external public procedure glBindBuffer ( target : Cardinal; buffer : Cardinal ) ;
external public procedure glBindBufferBase ( target : Cardinal; index : Cardinal; buffer : Cardinal ) ;
external public procedure glBindFramebuffer ( target : Cardinal; framebuffer : Cardinal ) ;
external public procedure glBindRenderbuffer ( target : Cardinal; renderbuffer : Cardinal ) ;
external public procedure glBindTexture ( target : Cardinal; texture : Cardinal ) ;
external public procedure glBlendColor ( red : Single; green : Single; blue : Single; alpha : Single ) ;
external public procedure glBlendEquation ( mode : Cardinal ) ;
external public procedure glBlendEquationiEXT ( buf : Cardinal; mode : Cardinal ) ;
external public procedure glBlendEquationSeparate ( modeRGB : Cardinal; modeAlpha : Cardinal ) ;
external public procedure glBlendFunc ( sfactor : Cardinal; dfactor : Cardinal ) ;
external public procedure glBlendFunciEXT ( buf : Cardinal; src : Cardinal; dst : Cardinal ) ;
external public procedure glBlendFuncSeparate ( srcRGB : Cardinal; dstRGB : Cardinal; srcAlpha : Cardinal; dstAlpha : Cardinal ) ;
external public procedure glBufferData ( target : Cardinal; size : LongInt; const data : Pointer; usage : Cardinal ) ;
external public procedure glBufferSubData ( target : Cardinal; offset : NativeInt; size : LongInt; const data : Pointer ) ;
external public function glCheckFramebufferStatus ( target : Cardinal ) : Cardinal ;
external public procedure glClear ( mask : Cardinal ) ;
external public procedure glClearColor ( red : Single; green : Single; blue : Single; alpha : Single ) ;
external public procedure glClearDepthf ( depth : Single ) ;
external public procedure glClearStencil ( s : Integer ) ;
external public procedure glColorMask ( red : Byte; green : Byte; blue : Byte; alpha : Byte ) ;
external public procedure glCompileShader ( shader : Cardinal ) ;
external public procedure glCompressedTexImage2D ( target : Cardinal; level : Integer; internalformat : Cardinal; width : Integer; height : Integer; border : Integer; imageSize : Integer; const data : Pointer ) ;
external public procedure glCompressedTexSubImage2D ( target : Cardinal; level : Integer; xoffset : Integer; yoffset : Integer; width : Integer; height : Integer; format : Cardinal; imageSize : Integer; const data : Pointer ) ;
external public procedure glCopyTexImage2D ( target : Cardinal; level : Integer; internalformat : Cardinal; x : Integer; y : Integer; width : Integer; height : Integer; border : Integer ) ;
external public procedure glCopyTexSubImage2D ( target : Cardinal; level : Integer; xoffset : Integer; yoffset : Integer; x : Integer; y : Integer; width : Integer; height : Integer ) ;
external public function glCreateProgram ( ) : Cardinal ;
external public function glCreateShader ( _type : Cardinal ) : Cardinal ;
external public procedure glCullFace ( mode : Cardinal ) ;
external public procedure glDeleteBuffers ( n : Integer; const buffers : PGLuint ) ;
external public procedure glDeleteFramebuffers ( n : Integer; const framebuffers : PGLuint ) ;
external public procedure glDeleteProgram ( _program : Cardinal ) ;
external public procedure glDeleteRenderbuffers ( n : Integer; const renderbuffers : PGLuint ) ;
external public procedure glDeleteShader ( shader : Cardinal ) ;
external public procedure glDeleteTextures ( n : Integer; const textures : PGLuint ) ;
external public procedure glDepthFunc ( func : Cardinal ) ;
external public procedure glDepthMask ( flag : Byte ) ;
external public procedure glDepthRangef ( zNear : Single; zFar : Single ) ;
external public procedure glDetachShader ( _program : Cardinal; shader : Cardinal ) ;
external public procedure glDisable ( cap : Cardinal ) ;
external public procedure glDisableVertexAttribArray ( index : Cardinal ) ;
external public procedure glDrawArrays ( mode : Cardinal; first : Integer; count : Integer ) ;
external public procedure glDrawElements ( mode : Cardinal; count : Integer; _type : Cardinal; const indices : Pointer ) ;
external public procedure glEnable ( cap : Cardinal ) ;
external public procedure glEnableVertexAttribArray ( index : Cardinal ) ;
external public procedure glFinish ( ) ;
external public procedure glFlush ( ) ;
external public procedure glFramebufferRenderbuffer ( target : Cardinal; attachment : Cardinal; renderbuffertarget : Cardinal; renderbuffer : Cardinal ) ;
external public procedure glFramebufferTexture2D ( target : Cardinal; attachment : Cardinal; textarget : Cardinal; texture : Cardinal; level : Integer ) ;
external public procedure glFrontFace ( mode : Cardinal ) ;
external public procedure glGenBuffers ( n : Integer; buffers : PGLuint ) ;
external public procedure glGenerateMipmap ( target : Cardinal ) ;
external public procedure glGenFramebuffers ( n : Integer; framebuffers : PGLuint ) ;
external public procedure glGenRenderbuffers ( n : Integer; renderbuffers : PGLuint ) ;
external public procedure glGenTextures ( n : Integer; textures : PGLuint ) ;
external public procedure glGetActiveAttrib ( _program : Cardinal; index : Cardinal; bufsize : Integer; length : PGLsizei; size : PGLint; _type : PGLenum; name : @PAnsiChar ) ;
external public procedure glGetActiveUniform ( _program : Cardinal; index : Cardinal; bufsize : Integer; length : PGLsizei; size : PGLint; _type : PGLenum; name : @PAnsiChar ) ;
external public procedure glGetAttachedShaders ( _program : Cardinal; maxcount : Integer; count : PGLsizei; shaders : PGLuint ) ;
external public function glGetAttribLocation ( _program : Cardinal; const name : @PAnsiChar ) : Integer ;
external public procedure glGetBooleanv ( pname : Cardinal; params : PGLboolean ) ;
external public procedure glGetBufferParameteriv ( target : Cardinal; pname : Cardinal; params : PGLint ) ;
external public function glGetError ( ) : Cardinal ;
external public procedure glGetFloatv ( pname : Cardinal; params : PGLfloat ) ;
external public procedure glGetFramebufferAttachmentParameteriv ( target : Cardinal; attachment : Cardinal; pname : Cardinal; params : PGLint ) ;
external public procedure glGetIntegerv ( pname : Cardinal; params : PGLint ) ;
external public procedure glGetProgramiv ( _program : Cardinal; pname : Cardinal; params : PGLint ) ;
external public procedure glGetProgramInfoLog ( _program : Cardinal; bufsize : Integer; length : PGLsizei; infolog : @PAnsiChar ) ;
external public procedure glGetRenderbufferParameteriv ( target : Cardinal; pname : Cardinal; params : PGLint ) ;
external public procedure glGetShaderiv ( shader : Cardinal; pname : Cardinal; params : PGLint ) ;
external public procedure glGetShaderInfoLog ( shader : Cardinal; bufsize : Integer; length : PGLsizei; infolog : @PAnsiChar ) ;
external public procedure glGetShaderPrecisionFormat ( shadertype : Cardinal; precisiontype : Cardinal; range : PGLint; precision : PGLint ) ;
external public procedure glGetShaderSource ( shader : Cardinal; bufsize : Integer; length : PGLsizei; source : @PAnsiChar ) ;
external public function glGetString ( name : Cardinal ) : PGLubyte ;
external public procedure glClearBufferiv ( buffer : Cardinal; drawbuffer : Integer; const value : PGLint ) ;
external public procedure glClearBufferuiv ( buffer : Cardinal; drawbuffer : Integer; const value : PGLuint ) ;
external public procedure glClearBufferfv ( buffer : Cardinal; drawbuffer : Integer; const value : PGLfloat ) ;
external public procedure glClearBufferfi ( buffer : Cardinal; drawbuffer : Integer; depth : Single; stencil : Integer ) ;
external public procedure glGetTexParameterfv ( target : Cardinal; pname : Cardinal; params : PGLfloat ) ;
external public procedure glGetTexParameteriv ( target : Cardinal; pname : Cardinal; params : PGLint ) ;
external public procedure glGetUniformfv ( _program : Cardinal; location : Integer; params : PGLfloat ) ;
external public procedure glGetUniformiv ( _program : Cardinal; location : Integer; params : PGLint ) ;
external public function glGetUniformLocation ( _program : Cardinal; const name : @PAnsiChar ) : Integer ;
external public function glGetUniformBlockIndex ( _program : Cardinal; const uniformBlockName : @PAnsiChar ) : Cardinal ;
external public procedure glUniformBlockBinding ( _program : Cardinal; uniformBlockIndex : Cardinal; uniformBlockBinding : Cardinal ) ;
external public procedure glGetVertexAttribfv ( index : Cardinal; pname : Cardinal; params : PGLfloat ) ;
external public procedure glGetVertexAttribiv ( index : Cardinal; pname : Cardinal; params : PGLint ) ;
external public procedure glGetVertexAttribPointerv ( index : Cardinal; pname : Cardinal; pointer : PPGLvoid ) ;
external public procedure glHint ( target : Cardinal; mode : Cardinal ) ;
external public function glIsBuffer ( buffer : Cardinal ) : Byte ;
external public function glIsEnabled ( cap : Cardinal ) : Byte ;
external public function glIsFramebuffer ( framebuffer : Cardinal ) : Byte ;
external public function glIsProgram ( _program : Cardinal ) : Byte ;
external public function glIsRenderbuffer ( renderbuffer : Cardinal ) : Byte ;
external public function glIsShader ( shader : Cardinal ) : Byte ;
external public function glIsTexture ( texture : Cardinal ) : Byte ;
external public procedure glLineWidth ( width : Single ) ;
external public procedure glLinkProgram ( _program : Cardinal ) ;
external public procedure glPixelStorei ( pname : Cardinal; param : Integer ) ;
external public procedure glPolygonOffset ( factor : Single; units : Single ) ;
external public procedure glReadPixels ( x : Integer; y : Integer; width : Integer; height : Integer; format : Cardinal; _type : Cardinal; pixels : Pointer ) ;
external public procedure glReleaseShaderCompiler ( ) ;
external public procedure glRenderbufferStorage ( target : Cardinal; internalformat : Cardinal; width : Integer; height : Integer ) ;
external public procedure glSampleCoverage ( value : Single; invert : Byte ) ;
external public procedure glScissor ( x : Integer; y : Integer; width : Integer; height : Integer ) ;
external public procedure glShaderBinary ( n : Integer; const shaders : PGLuint; binaryformat : Cardinal; const binary : Pointer; length : Integer ) ;
external public procedure glShaderSource ( shader : Cardinal; count : Integer; const _string : PPGLchar; const length : PGLint ) ;
external public procedure glStencilFunc ( func : Cardinal; ref : Integer; mask : Cardinal ) ;
external public procedure glStencilFuncSeparate ( face : Cardinal; func : Cardinal; ref : Integer; mask : Cardinal ) ;
external public procedure glStencilMask ( mask : Cardinal ) ;
external public procedure glStencilMaskSeparate ( face : Cardinal; mask : Cardinal ) ;
external public procedure glStencilOp ( fail : Cardinal; zfail : Cardinal; zpass : Cardinal ) ;
external public procedure glStencilOpSeparate ( face : Cardinal; fail : Cardinal; zfail : Cardinal; zpass : Cardinal ) ;
external public procedure glTexImage2D ( target : Cardinal; level : Integer; internalformat : Integer; width : Integer; height : Integer; border : Integer; format : Cardinal; _type : Cardinal; const pixels : Pointer ) ;
external public procedure glTexParameterf ( target : Cardinal; pname : Cardinal; param : Single ) ;
external public procedure glTexParameterfv ( target : Cardinal; pname : Cardinal; const params : PGLfloat ) ;
external public procedure glTexParameteri ( target : Cardinal; pname : Cardinal; param : Integer ) ;
external public procedure glTexParameteriv ( target : Cardinal; pname : Cardinal; const params : PGLint ) ;
external public procedure glTexSubImage2D ( target : Cardinal; level : Integer; xoffset : Integer; yoffset : Integer; width : Integer; height : Integer; format : Cardinal; _type : Cardinal; const pixels : Pointer ) ;
external public procedure glUniform1f ( location : Integer; x : Single ) ;
external public procedure glUniform1fv ( location : Integer; count : Integer; const v : PGLfloat ) ;
external public procedure glUniform1i ( location : Integer; x : Integer ) ;
external public procedure glUniform1iv ( location : Integer; count : Integer; const v : PGLint ) ;
external public procedure glUniform2f ( location : Integer; x : Single; y : Single ) ;
external public procedure glUniform2fv ( location : Integer; count : Integer; const v : PGLfloat ) ;
external public procedure glUniform2i ( location : Integer; x : Integer; y : Integer ) ;
external public procedure glUniform2iv ( location : Integer; count : Integer; const v : PGLint ) ;
external public procedure glUniform3f ( location : Integer; x : Single; y : Single; z : Single ) ;
external public procedure glUniform3fv ( location : Integer; count : Integer; const v : PGLfloat ) ;
external public procedure glUniform3i ( location : Integer; x : Integer; y : Integer; z : Integer ) ;
external public procedure glUniform3iv ( location : Integer; count : Integer; const v : PGLint ) ;
external public procedure glUniform4f ( location : Integer; x : Single; y : Single; z : Single; w : Single ) ;
external public procedure glUniform4fv ( location : Integer; count : Integer; const v : PGLfloat ) ;
external public procedure glUniform4i ( location : Integer; x : Integer; y : Integer; z : Integer; w : Integer ) ;
external public procedure glUniform4iv ( location : Integer; count : Integer; const v : PGLint ) ;
external public procedure glUniformMatrix2fv ( location : Integer; count : Integer; transpose : Byte; const value : PGLfloat ) ;
external public procedure glUniformMatrix3fv ( location : Integer; count : Integer; transpose : Byte; const value : PGLfloat ) ;
external public procedure glUniformMatrix4fv ( location : Integer; count : Integer; transpose : Byte; const value : PGLfloat ) ;
external public procedure glUseProgram ( _program : Cardinal ) ;
external public procedure glValidateProgram ( _program : Cardinal ) ;
external public procedure glVertexAttrib1f ( indx : Cardinal; x : Single ) ;
external public procedure glVertexAttrib1fv ( indx : Cardinal; const values : PGLfloat ) ;
external public procedure glVertexAttrib2f ( indx : Cardinal; x : Single; y : Single ) ;
external public procedure glVertexAttrib2fv ( indx : Cardinal; const values : PGLfloat ) ;
external public procedure glVertexAttrib3f ( indx : Cardinal; x : Single; y : Single; z : Single ) ;
external public procedure glVertexAttrib3fv ( indx : Cardinal; const values : PGLfloat ) ;
external public procedure glVertexAttrib4f ( indx : Cardinal; x : Single; y : Single; z : Single; w : Single ) ;
external public procedure glVertexAttrib4fv ( indx : Cardinal; const values : PGLfloat ) ;
external public procedure glVertexAttribPointer ( indx : Cardinal; size : Integer; _type : Cardinal; normalized : Byte; stride : Integer; const ptr : Pointer ) ;
external public procedure glViewport ( x : Integer; y : Integer; width : Integer; height : Integer ) ;
external public procedure glDrawBuffers ( n : Integer; const bufs : PGLenum ) ;
external public procedure glMemoryBarrier ( barriers : Cardinal ) ;