Ver Mensaje Individual
 
Antiguo 13-02-2008
Avatar de cHackAll
[cHackAll] cHackAll is offline
Baneado?
 
Registrado: oct 2006
Posts: 2.159
Reputación: 22
cHackAll Va por buen camino
Cita:
Empezado por lfb Ver Mensaje
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;
Cita:
Empezado por mmsystem.h
#if (WINVER < 0x030a)
WINMMAPI BOOL WINAPI mciExecute(LPCSTR pszCommand);
#endif /* ifdef WINVER < 0x030a */
Donde:
Cita:
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:
Código:
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
Responder Con Cita