PlaySound , como reproducir aleatorio ?

[gaston260]

Gracias por leerme ! use este codigo que es muy facil jeje y anda bastante bien ! pero si alguien quiere aportar algo mas sera bien venido !

saludos !

Código Delphi [-]
       Randomize;
          cont := Random(8);
  if cont = 2  then
     (PlaySound('C:\Windows\Media\Entrada de Windows XP.wav', 0, SND_FILENAME or SND_ASYNC));