两台计算机进行语音通信,
对发送方来说,它通过ACMWaveIn捕获到语音后,即通过IdUDPServer发送出去,
对接收方来说,当IdUDPServer接收到数据后即通过ACMWaveOut播放出来,
代码如下(略有发动):
procedure TForm1.ACMWaveIn1Data(data: Pointer; size: Integer);
begin
    IdUDPServer1.SendBuffer(toIP,toPort,data,size);
end;procedure TForm1.IdUDPServer1Read(Sender: TObject; AData: TStream;
  ABinding: TIdSocketHandle);
begin
  ACMWaveOut1.PlayBack(AData,AData.Size);
end;两台计算机都是对等的。并且可以证明,以上事件均发生。运行时,两台计算机都一样,发生嘟哮嘟的声音,不知道为什么?