Source position: GLParticleFX.pas line 165
type TPFXCreateParticleEvent = procedure(
Sender: TObject;
aParticle: TGLParticle
) of object;