Source position: GLCgShader.pas line 65
type TCgShaderEvent = procedure(
CgShader: TCustomCgShader
) of object;