Also beim Start der Anwendung (FormCreate bzw. FormShow) hatte ich manchmal Probleme mit Application.MessageBox. Vielleicht trifft dieses Problem ja auch hier bei MessageDlg zu:
Versuch mal statt
Delphi-Quellcode:
if MessageDlg('Do you want to play Backgroundmusic ?', mtConfirmation,
[mbYes, mbNo], 0) = mrYes then
dieses:
Delphi-Quellcode:
if MessageBox(
Handle, '
Do you want to play Backgroundmusic ?', '
Confirmation',
MB_YESNO
or MB_ICONQUESTION) = IDYES
then