[ecfisa]

Hola.

Te falta indicarle el archivo a reproducir:

Código Delphi [-]
   ShellExecute(Handle,'open',
    'C:\Program Files\Windows Media Player\wmplayer.exe',
    PChar(ComboBox1.Text), nil, 1);

Por supuesto ComboBox1.Text deberá tener la ruta completa al archivo que deseas escuchar, o si no deberás concatenar la ruta al nombre de archivo:

Ejemplo:

Código Delphi [-]
 var
  Nombre: string;
begin
  Nombre:= 'C:\Canciones\' + ComboBox1.Text';
  PChar(Nombre)
 // o también
  PChar(Ruta + ComboBox1.Text)

Saludos.