Source position: ctgl.pas line 10646
type TglVertexBlendEnviATI = procedure(
pname: GLenum;
param: GLint
);