MessageBox y PlaySnd simultáneos

[[seoane]]

Empezado por jhonny

Aquí es donde mejor retiro mis palabras y abro paso a un señor como seoane... La idea de usar un Hilo es definitivamente mucho mas practica

Todo lo contrario, parece que volví a sacar el cañón para matar un par de moscas

Mucho mas sencillo así:

Código Delphi [-]
var
  Sonido: String;
begin
  Sonido:= 'C:\WINDOWS\Media\Error de Windows XP.wav';
  PlaySound(PChar(Sonido),0,SND_FILENAME or SND_ASYNC or SND_LOOP);
  ShowMessage('Pulsa aceptar para terminar');
  PlaySound(nil,0,0);
end;

El código anterior estaba reciclado de este otro, en donde si tenia sentido usar un thread.