语音聊天实现没有通过Acm控件的,比较长,有兴趣的可以看一下,还有通过UDP的聊天功能。
unit Unit1;
interface
uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, NMUDP, CheckLst,winsock, ElTree,ElHeader,ShellAPI, ExtCtrls, ComCtrls,MMSystem,Msacm, ElXPThemedControl;
type TForm1 = class(TForm) udp_Send: TNMUDP; Panel1: TPanel; Panel2: TPanel; btn_Send: TButton; Label1: TLabel; edt_Words: TEdit; tim_Timer: TTimer; rih_Words: TRichE......
阅读全文