Source position: msesigmidi.pas line 254
type getvoiceclasseventty = procedure(
const sender: tobject;
var avoiceclass: datamoduleclassty
) of object;