Gravar Áudio

Mensagem por **fladimir** » 29 Set 2016 22:33

Tem como fazermos via Harbour um EXE pra rodar em segundo plano e gravar áudio?

Mensagem por **fladimir** » 02 Out 2016 11:18

Ninguém saberia?

Mensagem por **asimoes** » 06 Out 2016 09:49

Do microfone?

Mensagem por **asimoes** » 06 Out 2016 09:57

Fladimir,

Dá uma olhada neste tópico: https://pctoledo.org/forum/viewto ... 43&t=16967

Mensagem por **asimoes** » 06 Out 2016 10:14

Um exemplo:

Código: Selecionar todos

   mciSendString("open new Type waveaudio Alias recsound", Nil, 0, 0)
   mciSendString("set capture time format ms bitspersample 16 channels 2 samplespersec 48000 bytespersec 192000 alignment 4", Nil, 0, 0)
   mciSendString("record recsound", Nil, 0, 0)
   Inkey(0)
   mciSendString("stop recsound" , NIL, 0, 0)
   mciSendString("save recsound sample.wav" , NIL, 0, 0)
   mciSendString("close recsound" , NIL, 0, 0)

#pragma BEGINDUMP
#include <windows.h>
#include <tchar.h>
#include <stdio.h>
#include <hbapi.h>
HB_FUNC ( MCISENDSTRING )

{
   BYTE bBuffer[ 255 ];

   hb_retnl( ( LONG ) mciSendString( ( LPSTR) hb_parc( 1 ), ( LPSTR ) bBuffer, 254, ( HWND ) hb_parnl( 3 ) ) );
}

#pragma ENDDUMP

Mensagem por **fladimir** » 06 Out 2016 13:04

Vlw aSimoes, não testei mas pelo q olhei por cima vai ser isso mesmo...

A hora q sobrar um tempinho testo e posto aki os resultados, mas independente vlw.

Mensagem por **Kapiaba** » 06 Out 2016 13:11

http://forums.fivetechsupport.com/viewt ... dio#p77109