to:wz_hzb
播放完会抛出消息:MM_MCINOTIFY
MCI_NOTIFY_ABORTED
The device received a command that prevented the current conditions for initiating the callback function from being met. If a new command interrupts the current command and it also requests notification, the device sends this message only and not MCI_NOTIFY_SUPERCEDED.
MCI_NOTIFY_FAILURE
A device error occurred while the device was executing the command.
MCI_NOTIFY_SUCCESSFUL
The conditions initiating the callback function have been met.
MCI_NOTIFY_SUPERSEDED
The device received another command with the "notify" flag set and the current conditions for initiating the callback function have been superseded.
procedure L_play_info(var msg:Tmessage);message MM_MCINOTIFY;
...
procedure TForm1.L_play_info(var msg:Tmessage);
begin