一.不引用编码器与解码器的情况下(ECHO的DEMO) 类TIOCPtcpclient,接收服务器的数据事件:OnRecvBuffer 类TDiocpTcpServer,接收客户端数据事件:OnRecvBuffer TIocpTcpServer property OnDataReceived: TOnDataReceived read FOnDataReceived write  FOnDataReceived; 二.引用编码器与解码器的情况下 编码器与解码器对接收数据进行了一次封装,在OnRe

constructor TfrmMain.Create(AOwner: TComponent);begin inherited Create(AOwner); sfLogger.setAppender(TStringsAppender.Create(mmoLog.Lines)); sfLogger.AppendInMainThread := true; FTcpServer := TDiocpTcpServer.Create(Self); FTcpServer.Name := 'iocpSVR'

FTcpServer.registerCoderClass(TIOCPStreamDecoder, TIOCPStreamEncoder);//注册编码器与解码器 FTcpServer.registerContextClass(TMyClientContext);//注册clientcontext (* * Unit owner: D10.Mofen * homePage: http://www.diocp.org * blog: http://www.cnblogs.com/dksoft *

ECHOServer代码(不考虑粘包的处理): unit ufrmMain; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ActnList, diocp_tcp_server, ExtCtrls, ComCtrls, utils_safeLogger, utils_BufferPool, utils_fileWriter,

TDiocpCoderTcpServer返回数据记录有条数限制的问题 在使用TDiocpCoderTcpServer控件返回查询数据的时候,发现当记录条数超过一定数量的时候(比方有人反试图返回30万条查询记录就报错),就会报“内存溢出”的错误. 解决办法: 修改diocp_tcp_server.pas单元 constructor TDiocpTcpServer.Create(AOwner: TComponent);方法 将FMaxSendingQueueSize := 1000;改为 FMaxS