Oppure

Loading
08/05/11 15:42
Lafa_96
2 cose...1 è possibile riprodurre una traccia audio salvata sul pc? se sì come? grazie!
aaa
08/05/11 17:10
Poggi Marco
Riprodurre un suono in pascal è possibile... anche se con molte limitazioni.
Vedi la finzione sound.

Vedi questo esempio: pierotofy.it/pages/guide_tutorials/Pascal/Beep/
Ultima modifica effettuata da Poggi Marco 08/05/11 17:11
aaa
09/05/11 12:01
Phi
Per Windows esiste la unit mmsystem
freepascal.org/packages/…
Questa permette di eseguire file wave(.wav).

Comunque, se serve per piccoli file, puoi aggiungerli al programma come risorse, usando come tipo WAVE, e inserire nel programma questo codice:

const
SND_MEMORY = 4;
SND_ASYNC = 1;
SND_RESOURCE = 004;
nomerisorsa : pchar = {qui devi inserire il nome della risorsa};

Function PlaySound(x1: PChar; x2: HMODULE; x3: DWORD): BOOL;stdcall; external 'winmm.dll' name 'PlaySound';

...

PlaySound(nomerisorsa,HInstance, snd_ASync or snd_Memory or snd_Resource);



Oppure, se ti accontenti di un suono a frequenza costante usi,
o la funzione Beep(frequenza, durata) della unit windows,
o le funzioni già linkate da Marco della unit crt

Ultima modifica effettuata da Phi 09/05/11 12:03
aaa