Reminder with Text and Sound alert

Check it out

procedure OnTimer;
var
    sMessage: string;
begin
   if frmRemider.cBoxPlaySound.Checked = True then
   begin
       SoundFile := SQLExecute('SELECT message FROM reminder WHERE strftime(''%d.%m.%Y %H:%M'', datetime) = strftime(''%d.%m.%Y %H:%M'', ''now'', ''localtime'') ');
       Mediaplayer.PlayFile(frmRemider.edSoundFile.Text);
   end;

   if frmRemider.cBoxShowTextPop.Checked = True then
   begin
       sMessage := SQLExecute('SELECT message FROM reminder WHERE strftime(''%d.%m.%Y %H:%M'', datetime) = strftime(''%d.%m.%Y %H:%M'', ''now'', ''localtime'') ');
       if sMessage<>'' then ShowMessage(sMessage);
   end;

   Mediaplayer.Stop;
end;

ShowMessage shows modal windows, it's mean that script stop working and wait when this windows will be closed, so just first play sound, after that show message.

I couldn't get the sound alert of the remainders work properly..

I get an error "Cannot determine the device type from the given filename extension"

Could anybody help to resolve the issue please.

Sample project is attached:

Adam,
The reason you were getting the error was because your SELECT was not working properly and the SoundFile variable was empty. A couple of things needed to be considered. If the program is run and the due date and time have already passed, the alerts should be initiated. Also, if you have multiple reminders, you cannot use the form fields to look at the checkboxes for playing the sound and showing a  message because the form is only going to show the last record edited. So you have to store the play sound and show message in each reminder record and then select reminders having the Boolean fields checked. Once a reminder has been initiated, then it is turned off so it does not keep repeating. Hopefully the revised project is closer to what you want or at least gets you headed in the right direction.

PM family, please how do I play an embed sound file from the database
I don't want to play from the sound_filename but play the sound data embed in the database.
Thank you