Source position: ctgl.pas line 9274
type TglGetCompressedTextureImageEXT = procedure(
texture: GLuint;
target: GLenum;
lod: GLint;
img: Pvoid
);