请教一个关于c++builder实现windows音频录放音的问题！

[cui_0606]

现在在做一个windows音频的程序模型，用ＶＣ我解决了录音和放音同步的功能，程序实现了自环和远程通讯功能．现在要转换成用c++builder来做同样的模型，却遇到了困难，现给出ＶＣ源代码（调试后已经通过），望哪位高手可以根据ＶＣ写出Ｃ＋＋builder的代码处理，不胜感激！可以将写好的c++builder代码压缩发到我的邮件：[e-mail]

（我个人在用Ｃ＋＋builder解决问题的时候，用了c++builder中的serversocket和clientsocket两组件实现远程通信和串口的处理，可是总是不对，希望高手指教）

现给出程序的源代码

[cui_0606]

RecTestDlg.cpp

#include "stdafx.h"
#include "RecTest.h"
#include "RecTestDlg.h"

#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif

/////////////////////////////////////////////////////////////////////////////
// CAboutDlg dialog used for App About
CString g_IpAddress;


class CAboutDlg : public CDialog
{
public:
CAboutDlg();

// Dialog Data
//{{AFX_DATA(CAboutDlg)
enum { IDD = IDD_ABOUTBOX };
//}}AFX_DATA

// ClassWizard generated virtual function overrides
//{{AFX_VIRTUAL(CAboutDlg)
protected:
virtual void DoDataExchange(CDataExchange* pDX); // DDX/DDV support
//}}AFX_VIRTUAL

// Implementation
protected:
//{{AFX_MSG(CAboutDlg)
//}}AFX_MSG
DECLARE_MESSAGE_MAP()
};

CAboutDlg::CAboutDlg() : CDialog(CAboutDlg::IDD)
{
//{{AFX_DATA_INIT(CAboutDlg)
//}}AFX_DATA_INIT
}

void CAboutDlg::DoDataExchange(CDataExchange* pDX)
{
CDialog::DoDataExchange(pDX);
//{{AFX_DATA_MAP(CAboutDlg)
//}}AFX_DATA_MAP
}

BEGIN_MESSAGE_MAP(CAboutDlg, CDialog)
//{{AFX_MSG_MAP(CAboutDlg)
// No message handlers
//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CRecTestDlg dialog

CRecTestDlg::CRecTestDlg(CWnd* pParent /*=NULL*/)
: CDialog(CRecTestDlg::IDD, pParent)
{
//{{AFX_DATA_INIT(CRecTestDlg)

//}}AFX_DATA_INIT
// Note that LoadIcon does not require a subsequent DestroyIcon in Win32
m_hIcon = AfxGetApp()->LoadIcon(IDR_MAINFRAME);
}

void CRecTestDlg::DoDataExchange(CDataExchange* pDX)
{
CDialog::DoDataExchange(pDX);
//{{AFX_DATA_MAP(CRecTestDlg)
DDX_Control(pDX, IDC_IPADDRESS1, m_RemoteIp);
//}}AFX_DATA_MAP
}

BEGIN_MESSAGE_MAP(CRecTestDlg, CDialog)
//{{AFX_MSG_MAP(CRecTestDlg)
ON_WM_SYSCOMMAND()
ON_WM_PAINT()
ON_WM_QUERYDRAGICON()
ON_BN_CLICKED(IDC_BEGIN, OnBegin)
ON_MESSAGE(MM_WIM_DATA,OnMM_WIM_DATA)
ON_MESSAGE(MM_WIM_CLOSE,OnMM_WIM_CLOSE)
ON_MESSAGE(MM_WOM_OPEN,OnMM_WOM_OPEN)
ON_MESSAGE(MM_WOM_DONE,OnMM_WOM_DONE)
ON_MESSAGE(MM_WOM_CLOSE,OnMM_WOM_CLOSE)
//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CRecTestDlg message handlers

BOOL CRecTestDlg::OnInitDialog()
{
CDialog::OnInitDialog();

// Add "About..." menu item to system menu.

// IDM_ABOUTBOX must be in the system command range.
ASSERT((IDM_ABOUTBOX & 0xFFF0) == IDM_ABOUTBOX);
ASSERT(IDM_ABOUTBOX < 0xF000);

CMenu* pSysMenu = GetSystemMenu(FALSE);
if (pSysMenu != NULL)
{
CString strAboutMenu;
strAboutMenu.LoadString(IDS_ABOUTBOX);
if (!strAboutMenu.IsEmpty())
{
pSysMenu->AppendMenu(MF_SEPARATOR);
pSysMenu->AppendMenu(MF_STRING, IDM_ABOUTBOX, strAboutMenu);
}
}

// Set the icon for this dialog. The framework does this automatically
// when the application's main window is not a dialog
SetIcon(m_hIcon, TRUE); // Set big icon
SetIcon(m_hIcon, FALSE); // Set small icon

// TODO: Add extra initialization here
//allocate memory for wave header
pWaveHdr1=reinterpret_cast<PWAVEHDR>(malloc(sizeof(WAVEHDR)));
pWaveHdr2=reinterpret_cast<PWAVEHDR>(malloc(sizeof(WAVEHDR)));
pWaveHdrOut=reinterpret_cast<PWAVEHDR>(malloc(sizeof(WAVEHDR)));
//***reinterpret_cast **** operation is used to convert any type of
//pointer to other type
//allocate memory for save buffer
for(int i=0;i<InBlocks;i++)
{
m_AudioDataIn[i].dwLength = 0;
m_AudioDataIn[i].lpdata = reinterpret_cast<PBYTE>(malloc(1));

}

for(i =0;i<OutBlocks;i++)
{
m_AudioDataOut[i].dwLength = 0;
m_AudioDataOut[i].lpdata = reinterpret_cast<PBYTE>(malloc(1));
}
nAudioIn = 0;
nAudioOut = 0;
nSend = 0;
nReceive = 0;

return TRUE; // return TRUE unless you set the focus to a control
}

[cui_0606]

void CRecTestDlg::OnSysCommand(UINT nID, LPARAM lParam)
{
if ((nID & 0xFFF0) == IDM_ABOUTBOX)
{
CAboutDlg dlgAbout;
dlgAbout.DoModal();
}
else
{
CDialog::OnSysCommand(nID, lParam);
}
}



void CRecTestDlg::OnPaint()
{
if (IsIconic())
{
CPaintDC dc(this); // device context for painting

SendMessage(WM_ICONERASEBKGND, (WPARAM) dc.GetSafeHdc(), 0);

// Center icon in client rectangle
int cxIcon = GetSystemMetrics(SM_CXICON);
int cyIcon = GetSystemMetrics(SM_CYICON);
CRect rect;
GetClientRect(&rect);
int x = (rect.Width() - cxIcon + 1) / 2;
int y = (rect.Height() - cyIcon + 1) / 2;

// Draw the icon
dc.DrawIcon(x, y, m_hIcon);
}
else
{
CDialog::OnPaint();
}
}

// The system calls this to obtain the cursor to display while the user drags
// the minimized window.
HCURSOR CRecTestDlg::OnQueryDragIcon()
{
return (HCURSOR) m_hIcon;
}

UINT Audio_Listen_Thread(LPVOID lParam)
{
CRecTestDlg *pdlg = (CRecTestDlg*)lParam;
CSocket m_Server;
DWORD length;
if(!m_Server.Create(4002))
AfxMessageBox("Listen Socket create error"+pdlg->GetError(GetLastError()));//不可单个运行，重复产生同一端口显然是错误的
if(!m_Server.Listen())
AfxMessageBox("m_server.Listen ERROR"+pdlg->GetError(GetLastError()));
CSocket recSo;
if(! m_Server.Accept(recSo))
AfxMessageBox("m_server.Accept() error"+pdlg->GetError(GetLastError()));
m_Server.Close();
int sendcount=0;//just for test
int ret ;
while(1)
{ //开始循环接收声音文件，首先接收文件长度
ret = recSo.Receive(&length,sizeof(DWORD));
if(ret== SOCKET_ERROR )
AfxMessageBox("服务器端接收声音文件长度出错，原因： "+pdlg->GetError(GetLastError()));
if(ret!=sizeof(DWORD))
{
AfxMessageBox("接收文件头错误，将关闭该线程");
recSo.Close();
return -1;
}//接下来开辟length长的内存空间
pdlg->m_AudioDataOut[pdlg->nReceive].lpdata =(PBYTE)realloc (0,length);
if (pdlg->m_AudioDataOut[pdlg->nReceive].lpdata == NULL)
{
MessageBeep (MB_ICONEXCLAMATION) ;
AfxMessageBox("erro memory_ReceiveAudio");
pdlg->OnOK();
recSo.Close();
return -1;
}
else//内存申请成功，可以进行循环检测接受
{
DWORD dwReceived = 0,dwret;
while(length>dwReceived)
{
dwret = recSo.Receive((pdlg->m_AudioDataOut[pdlg->nReceive].lpdata+dwReceived),(length-dwReceived));
dwReceived +=dwret;
if(dwReceived ==length)
{
pdlg->m_AudioDataOut[pdlg->nReceive].dwLength = length;
break;
}

}
}//本轮声音文件接收完毕
pdlg->nReceive=(pdlg->nReceive+1)%OutBlocks;
}
recSo.Close();
pdlg->OnOK();
return 0;
}
UINT Audio_Send_Thread(LPVOID lParam)//专职的声音文件发送线程
{ // 端口也是专用的
CRecTestDlg *pdlg = (CRecTestDlg*)lParam;
CSocket m_Client;
FILE *f_pcm;


m_Client.Create();
f_pcm = fopen("pcm","w");
if(f_pcm == NULL)
{
AfxMessageBox("Open file error!");
return 0;
}
if( m_Client.Connect(g_IpAddress,4002))
{
DWORD ret, length;
int count=0;
while(1)//循环使用指针nSend
{
length =pdlg->m_AudioDataIn[pdlg->nSend].dwLength;
if(length !=0)
{
fwrite(pdlg->m_AudioDataIn[pdlg->nSend].lpdata,1,INP_BUFFER_SIZE,f_pcm);
//首先发送块的长度
if(((ret = m_Client.Send(&length,sizeof(DWORD)))!=sizeof(DWORD))||(ret==SOCKET_ERROR))
{
AfxMessageBox("声音文件头传输错误!"+pdlg->GetError(GetLastError()));
pdlg->OnOK();
break;
}//其次发送块的内容 ,循环检测发送
DWORD dwSent = 0;//已经发送掉的字节数
while(1)//==============================发送声音文件开始
{
ret = m_Client.Send((pdlg->m_AudioDataIn[pdlg->nSend].lpdata+dwSent),(length-dwSent));
if(ret==SOCKET_ERROR)//检错
{
AfxMessageBox("声音文件传输错误!"+pdlg->GetError(GetLastError()));
pdlg->OnOK();
break;
}
else //发送未发送完的
{
dwSent += ret;
if(dwSent ==length)
{
free(pdlg->m_AudioDataIn[pdlg->nSend].lpdata);
pdlg->m_AudioDataIn[pdlg->nSend].dwLength = 0;
break;
}
}
} //======================================发送声音文件结束
}
pdlg->nSend = (pdlg->nSend +1)% InBlocks;
}

}
else
AfxMessageBox("Socket连接失败"+pdlg->GetError(GetLastError()));
m_Client.Close();
return 0;
}

[cui_0606]

CString CRecTestDlg::GetError(DWORD error) //返回错误信息
{
CString strError;
switch(error)
{
case WSANOTINITIALISED:
strError="初始化错误";
break;
case WSAENOTCONN:
strError="对方没有启动";
break;
case WSAEWOULDBLOCK :
strError="对方已经关闭";
break;
case WSAECONNREFUSED:
strError="连接的尝试被拒绝";
break;
case WSAENOTSOCK:
strError="在一个非套接字上尝试了一个操作";
break;
case WSAEADDRINUSE:
strError="特定的地址已在使用中";
break;
case WSAECONNRESET:
strError="与主机的连接被关闭";
break;
default:
strError="一般错误";
}
return strError;

}

void CRecTestDlg::OnBegin()
{
// TODO: Add your control notification handler code here
//allocate buffer memory
BYTE f1,f2,f3,f4;
m_RemoteIp.GetAddress(f1,f2,f3,f4);
g_IpAddress.Format("%d.%d.%d.%d",f1,f2,f3,f4);
pBuffer1=(PBYTE)malloc(INP_BUFFER_SIZE);
pBuffer2=(PBYTE)malloc(INP_BUFFER_SIZE);
if (!pBuffer1 || !pBuffer2)
{
if (pBuffer1) free(pBuffer1);
if (pBuffer2) free(pBuffer2);
MessageBeep(MB_ICONEXCLAMATION);
AfxMessageBox("Memory erro!");
return ;
}

//open waveform audio for input

m_waveformin.wFormatTag=WAVE_FORMAT_PCM;
m_waveformin.nChannels=1;
m_waveformin.nSamplesPerSec=8000;//采样频率
m_waveformin.nAvgBytesPerSec=16000;
m_waveformin.nBlockAlign=2;
m_waveformin.wBitsPerSample=16;
m_waveformin.cbSize=0;


if (waveInOpen(&hWaveIn,WAVE_MAPPER,&m_waveformin,(unsigned long)Handle,NULL,CALLBACK_WINDOW))
{ //打开录音设备函数
free(pBuffer1);
free(pBuffer2);
MessageBeep(MB_ICONEXCLAMATION);
AfxMessageBox("Audio can not be open!");
}
pWaveHdr1->lpData=(LPTSTR)pBuffer1;
pWaveHdr1->dwBufferLength=INP_BUFFER_SIZE;
pWaveHdr1->dwBytesRecorded=0;
pWaveHdr1->dwUser=0;
pWaveHdr1->dwFlags=0;
pWaveHdr1->dwLoops=1;
pWaveHdr1->lpNext=NULL;
pWaveHdr1->reserved=0;

waveInPrepareHeader(hWaveIn,pWaveHdr1,sizeof(WAVEHDR));

pWaveHdr2->lpData=(LPTSTR)pBuffer2;
pWaveHdr2->dwBufferLength=INP_BUFFER_SIZE;
pWaveHdr2->dwBytesRecorded=0;
pWaveHdr2->dwUser=0;
pWaveHdr2->dwFlags=0;
pWaveHdr2->dwLoops=1;
pWaveHdr2->lpNext=NULL;
pWaveHdr2->reserved=0;

waveInPrepareHeader(hWaveIn,pWaveHdr2,sizeof(WAVEHDR));

// Add the buffers

waveInAddBuffer (hWaveIn, pWaveHdr1, sizeof (WAVEHDR)) ;
waveInAddBuffer (hWaveIn, pWaveHdr2, sizeof (WAVEHDR)) ;

// Begin sampling
waveInStart (hWaveIn) ;

::AfxBeginThread(Audio_Listen_Thread,this);
::AfxBeginThread(Audio_Send_Thread,this);
m_waveformout.wFormatTag = WAVE_FORMAT_PCM;
m_waveformout.nChannels =1;
m_waveformout.nSamplesPerSec =8000;
m_waveformout.nAvgBytesPerSec =16000;
m_waveformout.nBlockAlign =2;
m_waveformout.wBitsPerSample =16;
m_waveformout.cbSize =0;


if (waveOutOpen(&hWaveOut,WAVE_MAPPER,&m_waveformout,(DWORD)this->m_hWnd,NULL,CALLBACK_WINDOW))
{
MessageBeep(MB_ICONEXCLAMATION);
AfxMessageBox("Audio output erro");
}

return ;

}

void CRecTestDlg::OnMM_WIM_DATA(UINT wParam,LONG lParam)
{

int nextBlock = (nAudioIn+1)% InBlocks;
if(m_AudioDataIn[nextBlock].dwLength!=0)//下一“块”没发走
{ //把PWAVEHDR(即pBUfferi)里的数据拷贝到当前“块”中

m_AudioDataIn[nAudioIn].lpdata
= (PBYTE)realloc (m_AudioDataIn[nAudioIn].lpdata , (((PWAVEHDR) lParam)->dwBytesRecorded+m_AudioDataIn[nAudioIn].dwLength)) ;
if (m_AudioDataIn[nAudioIn].lpdata == NULL)
{
waveInClose (hWaveIn) ;
MessageBeep (MB_ICONEXCLAMATION) ;
AfxMessageBox("erro memory OnMM_WIM_DATA");
return ;
}
CopyMemory ((m_AudioDataIn[nAudioIn].lpdata+m_AudioDataIn[nAudioIn].dwLength),
((PWAVEHDR) lParam)->lpData,
((PWAVEHDR) lParam)->dwBytesRecorded) ;//(*destination,*resource,nLen);

m_AudioDataIn[nAudioIn].dwLength +=((PWAVEHDR) lParam)->dwBytesRecorded;

}
else //把PWAVEHDR(即pBUfferi)里的数据拷贝到下一“块”中
{
nAudioIn = (nAudioIn+1)% InBlocks;
m_AudioDataIn[nAudioIn].lpdata = (PBYTE)realloc
(0,((PWAVEHDR) lParam)->dwBytesRecorded);
CopyMemory(m_AudioDataIn[nAudioIn].lpdata,
((PWAVEHDR) lParam)->lpData,
((PWAVEHDR) lParam)->dwBytesRecorded) ;
m_AudioDataIn[nAudioIn].dwLength =((PWAVEHDR) lParam)->dwBytesRecorded;

}
// Send out a new buffer
waveInAddBuffer (hWaveIn, (PWAVEHDR) lParam, sizeof (WAVEHDR)) ;
return ;


}

void CRecTestDlg::OnMM_WIM_CLOSE(UINT wParam,LONG lParam)
{

waveInUnprepareHeader (hWaveIn, pWaveHdr1, sizeof (WAVEHDR)) ;
waveInUnprepareHeader (hWaveIn, pWaveHdr2, sizeof (WAVEHDR)) ;

free (pBuffer1) ;
free (pBuffer2) ;

return ;
}
void CRecTestDlg::OnMM_WOM_OPEN(UINT wParam,LONG lParam)
{
// Set up header
pWaveHdrOut->lpData = (LPTSTR)m_AudioDataOut[nAudioOut].lpdata ;
pWaveHdrOut->dwBufferLength = m_AudioDataOut[nAudioOut].dwLength ;
pWaveHdrOut->dwBytesRecorded = 0 ;
pWaveHdrOut->dwUser = 0 ;
pWaveHdrOut->dwFlags = WHDR_BEGINLOOP ;
pWaveHdrOut->dwLoops = 1 ;
pWaveHdrOut->lpNext = NULL ;
pWaveHdrOut->reserved = 0 ;

// Prepare and write
waveOutPrepareHeader (hWaveOut, pWaveHdrOut, sizeof (WAVEHDR)) ;
waveOutWrite (hWaveOut, pWaveHdrOut, sizeof (WAVEHDR)) ;

return;

}
void CRecTestDlg::OnMM_WOM_DONE(UINT wParam,LONG lParam)
{
free(m_AudioDataOut[nAudioOut].lpdata);
m_AudioDataOut[nAudioOut].lpdata = reinterpret_cast<PBYTE>(malloc(1));
m_AudioDataOut[nAudioOut].dwLength = 0;

nAudioOut= (nAudioOut+1)%OutBlocks;
((PWAVEHDR)lParam)->lpData = (LPTSTR)m_AudioDataOut[nAudioOut].lpdata ;
((PWAVEHDR)lParam)->dwBufferLength = m_AudioDataOut[nAudioOut].dwLength ;
TRACE("the next length %d\n",((PWAVEHDR)lParam)->dwBufferLength);
waveOutPrepareHeader (hWaveOut,(PWAVEHDR)lParam,sizeof(WAVEHDR));
waveOutWrite(hWaveOut,(PWAVEHDR)lParam,sizeof(WAVEHDR));//cut
return;

}
void CRecTestDlg::OnMM_WOM_CLOSE(UINT wParam,LONG lParam)
{
waveOutUnprepareHeader (hWaveOut, pWaveHdrOut, sizeof (WAVEHDR)) ;

//release all the memory of the AudioData
for(int i=0;i<InBlocks;i++)
{
if(m_AudioDataIn[i].dwLength != 0)
free(m_AudioDataIn[i].lpdata);

}
for(i=0;i<OutBlocks;i++)
{
if(m_AudioDataOut[i].dwLength != 0)
free(m_AudioDataOut[i].lpdata);
}
}


void CRecTestDlg::OnOK()
{
// TODO: Add extra validation here
waveInReset(hWaveIn);
waveInClose(hWaveIn);

waveOutReset(hWaveOut);
waveOutClose (hWaveOut);


CDialog::OnOK();
}

[daily66]

好贴
关注学习一下

[cuixin_0606]

up

[cuixin_0606]

up

[cuixin_0606]

up

[constantine]

参考acm控件代码，或者直接用都行

[cuiyuwen_0606]

已经将代码发到你邮箱了

[i_love_pc]

关注

[Wade_Song]

能够发一份到我的E-mail吗？
[e-mail]
Thanks!!!!!