Reproducir sonido

[lfb]

Hola colegas
Necesito saber como reproducir un sonido pero no con el TMediaPlayer e investigado y se utiliza la biblioteca <mmsystem> pero no se como utilizarla. Espero que no les cause molestias

Que tengan un buen dia

[[cHackAll]]

...
 
#include <mmsystem.h>
 
...
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
 PlaySound("c:\windows\media\chord.wav", 0, SND_FILENAME);
}

[lfb]

Gracias cHackAll
Pero lo que necesito es que pueda reproducir archivos .mp3

[[cHackAll]]

Empezado por lfb

Gracias cHackAll
Pero lo que necesito es que pueda reproducir archivos .mp3

Vaya... disculpa el no haber entendido tal cosa en tu primer post

 mciExecute("play .\sonata_ClubDelphi.mp3");

[lfb]

cHackAll
Esa funcion que me diste no me aparece, verificar lo que me dijiste por el C++ Builder no la reconoce.
Disculpa la molestia, y muchas gracias por la ayuda

Saludos

[[cHackAll]]

Empezado por lfb

cHackAll
Esa funcion que me diste no me aparece, verificar lo que me dijiste por el C++ Builder no la reconoce.
Disculpa la molestia, y muchas gracias por la ayuda

Saludos

En realidad no es un problema de que la "reconozca" o no;

Empezado por mmsystem.h

#if (WINVER < 0x030a)
WINMMAPI BOOL WINAPI mciExecute(LPCSTR pszCommand);
#endif /* ifdef WINVER < 0x030a */

Donde:

Empezado por ras.h

WINVER values in this file:
WINVER < 0x400 = Windows NT 3.5, Windows NT 3.51
WINVER = 0x400 = Windows 95, Windows98, Windows NT4 (default)
WINVER > 0x400 = Windows NT4 enhancements
WINVER = 0x500 = Windows 2000

Lo que prácticamente nos obliga a usar las APIs "nuevas" como mciSendCommandA o tantas otras.

En fin; independientemente de la causa de que no te funcione mi anterior code; siempre podemos cargar la libreria por cuenta propia y ejecutar una función deseada ignorando los "caprichos" del BCB:

typedef BOOL (*TProc)(char *lpstrCommand);
void __fastcall TForm1::Button1Click(TObject *Sender)
{
 HMODULE hLib = LoadLibrary("winmm.dll");
 if (hLib)
  {
   TProc mciExecute = (TProc)GetProcAddress(hLib,"mciExecute");
   mciExecute("play c:\\sonata_ClubDelphi.mp3");
   FreeLibrary(hLib);
  }
}

PD: todavia no puedo llegar a optimizar el code en C... pero ya estaremos viendo

Saludos