Source position: ctgl.pas line 8722
type TglCompressedTextureSubImage1D = procedure(
texture: GLuint;
level: GLint;
xoffset: GLint;
width: GLsizei;
format: GLenum;
imageSize: GLsizei;
data: Pvoid
);