FiveTech Software tech support forums

Questo esempio funziona perfettamente, l'inconveniente è che nella function giro(), SndPlaySound( "Accordi\Beat68.wav", 1 ) viene interrotta da SndPlaySound( "Accordi\"+aFile[t]+".wav", 1 ). Io vorrei invece che rimanesse in esecuzione SndPlaySound( "Accordi\Beat68.wav", 1 ) in ...

... a sviluppare una utility per chitarra che consente di suonare gli accordi memorizzando le progressioni, i vari accordi sono registrati in wav per cui uso SndPlaySound per suonarli. Ora, vorrei aggiungere una base di Drum ma non so come eseguire contemporaneamente due SndPlaySound. Help me

Antonio.
MsgInfo( File( CURDIR() + "\TEST.WAV" ) devuelve .t.

msginfo( sndPlaySound( CURDIR() + "\TEST.WAV", nOr( SND_ASYNC, SND_LOOP, SND_NOSTOP, SND_FILENAME ) )) devuelve .t.

El caso es que en una Pda con Ppc 2003 funciona.

Salvador,

Tambien puedes comprobar, aunque sea obvio, que el fichero esté ahí:

MsgInfo( File( CURDIR() + "\TEST.WAV" ) )

Salvador,

sndPlaySound() devuelve un valor lógico indicando si se ha podido reproducir el fichero.

Cambia hb_retnl() por hb_retl() y comprueba desde el PRG el valor que te devuelve:

MsgInfo( sndPlaySound( CURDIR() + "\TEST.WAV", nOr( SND_ASYNC, SND_LOOP, SND_NOSTOP, SND_FILENAME ) ) )

Puedes Grabar tus SONIDOS en formato .WAV y llamar directamente en tu programa.

Graba todos los ficheros .WAV, directamente en tu ARCHIVO.RES con un tamaño asta 1.052.000 Bytes, use cuantos necessitar.

El comando que los accionan és SNDPLAYRES. Identico a SNDPLAYSOUND.

Saludos.

... oBmp FILE cFile ID 15 OF oDlx ADJUST cPath := cFilePath( GetModuleFileName( GetInstance() ) ) oActiveX = TActiveX():Redefine( 16, oDlx, "ShockwaveFlash.ShockwaveFlash.9" ) oActiveXX = TActiveX():Redefine( 19, oDlx, "ShockwaveFlash.ShockwaveFlash.9" ) dbselectarea( "BITACORA" ) dbgotop() oBrw ...

Carlos, Probá poniendo, a continuación de las definiciones de los gets, lo siguiente: odlgh02:bGotFocus = { || msgsound("TuSonido.wav") } odlgh03:bGotFocus = { || msgsound("TuSonido.wav") } odlgh07:bGotFocus = { || msgsound("TuSonido.wav") } Obviamente en "TuSonido.wav" tenés que poner ...

Hoal Amigos: Tengo una ventana con unos get que quiero que cada vez que coja el foco tres de ellos haga sonar un WAV, quiero que suenen el wav cuando entren en odlgh02, odlgh07 y odlgh03 la parte del codigo es : DEFINE DIALOG Modicu6 OF oDlgw PIXEL FROM 0,0 TO 470,800 TITLE "Alta ...

Antonio

Saludos para ti y los tuyos

Puedo saber la longitud de un archivo de sonido *.wav , *.wma o cualquier pista de CD en tiempo?

Estube buscando el los samples mmedia

Gracias antonio

Jairo Barbosa

... oMsgItem[4]:SetText("Venta Aut.: "+IF(lAuto[VAL(nCaja)],"S","N")),; oMsgItem[4]:Refresh(), SndPlaySound("Click.Wav")), ), ; if( ( nK == Asc( "T" ) .OR. nK == Asc( "t" ) ) .AND. GetKeyState( VK_CONTROL ), ; ( IF(lImpre[VAL(nCaja)],lImpre[VAL(nCaja)]:=.F.,lImpre[VAL(nCaja)]:=.T.),; ...

Convert VB.NET to FWH Hello Antonio, I am trieing to convert my kitchen screen to Fivewin. Now I have problems with playing wav-files. The kitchen screen has for each meal a wav-file and plays this file to announce the order. The error is on loading MMSYSTEM.DLL . This runs on a VISTA ...

... = { | hDC | PalBmpDraw( hDC, 0, 0, oBmp:hBitmap ) } //MsgInfo( "definio dialogo" ) oDlg2:bGotFocus = { || SndPlaySound("c:\Windows\media\chimes.wav") } // Odlg2:oIcon=oIcon3 // oDlg2:nClrText=nRGB(249,16,32) //MsgInfo( "antes del get" ) REDEFINE GET oGet VAR CNOMBRE PICTURE "@!" ID 101 OF oDlg2 ...

Compañero...

para que emita un pitido: msgbeep()

Si quieres que "hable" deberás grabar el sonido en un archivo con formato .wav y reproducirlo mediante la función SndPlaySound("tu_archivo.wav")

Un saludo.
LORENZO

I'm ever gotten that promble like you. But if the WAV file not long time it work. I think the WAV file not over 2 Minute be work fine.