Source position: ctgl.pas line 9386
type TglGetObjectParameterivAPPLE = procedure(
objectType: GLenum;
name_: GLuint;
pname: GLenum;
params: PGLint
);