Source position: custombgraimagebutton.pas line 28
type TCustomBGRAImageButtonPlaySound = procedure(
Sender: TObject;
const AFileName: string;
AState: TButtonState
) of object;