AmineTheGreat
Messages postés
47
Date d'inscription
mercredi 13 juin 2007
Statut
Membre
Dernière intervention
28 décembre 2010
17 juil. 2007 à 17:31
mciSendString('close all', nil, 0, 0); // Fermeture (au cas où)
mciSendString('open new type waveaudio alias capture', nil, 0, 0); // Ouverture du périphérique MCI
mciSendString('seek capture to start', nil, 0, 0); // Préparation de la capture
mciSendString('set capture samplespersec 44100', nil, 0, 0); // Qualité du son
mciSendString(PChar('set capture bitspersample ' ) , nil, 0, 0);
mciSendString('set capture channels 2', nil, 0, 0); // Nombre de canaux
mciSendString('record capture', nil, 0, 0);
En fait le son est mis en mémoire à ce stade. Ensuite on le sauvegarde sur un fichier comme ceci :
mciSendString(PChar('save capture "c:\test.wav"'), nil, 0, 0); // Enregistrement
mciSendString('stop capture', nil, 0, 0);
mciSendString('close capture', nil, 0, 0);
"Si tu veux du miel, résiste au piqure des abeilles"