イベント


property OnChangePosition: TNotifyEvent;



property OnChangeStatus: TNotifyEvent;



property OnEndPlay: TMP3EndPlayEvent;

TMP3EndPlayReason = (merSuccessful, merStoped, merFailure);
TMP3EndPlayEvent = procedure(Sender: TObject; Reason: TMP3EndPlayReason) of object;