I want the use wave files

[Antonio Linares]

Salvador,

Prueba a cambiar esta línea:

pW3 = AnsiToWide( ( LPSTR ) LockResource( hglb ) );

por:

pW3 = AnsiToWide( ( LPSTR ) hglb );

[Salvador]

Antonio,
De esta manera funciona:

Code: Select all  Expand view  RUN

LPWSTR AnsiToWide( LPSTR );

HB_FUNC( PLAYSOUNDRESOURCE )
{
   LPWSTR pW = AnsiToWide( hb_parc( 1 ) ) ;
       
   hb_retl( PlaySound( pW,  GetModuleHandle(NULL), ( ( hb_pcount() > 1 ) ? hb_parni( 2 ) : SND_ASYNC ) | SND_RESOURCE |    SND_NODEFAULT ) );
                     
}

Gracias.

[Antonio Linares]

Salvador,

Hace falta una última llamada a hb_xfree( pW ); para liberar la memoria creada.

[Salvador]

Ok, gracias