说明.txt
来自「多线程网络通讯源码」· 文本 代码 · 共 8 行
TXT
8 行
看到很多朋友在寻求多线程网络传输代码,为此,从我开发的网络棋牌游戏中整理出这个献给大家:)
开发环境:Delphi7.0+WinXP,没用其他控件(除了Delphi自带的Indy)
使用协议:TCP/IP
客户端一次发送65000字节的包,服务端负责组装并处理数据粘连。
使用ReadBuffer(),Send()函数来接收发送Buffer内字节,这样作的目的是使程序具有更好的灵活性。你可以自定义Buffer内那些字节的含义,例如是字符串、图像、声音、命令等等。
文件的多线程读写采用windows内存映像技术。
关键的服务器处理函数IdTCPServer1Execute(AThread: TIdPeerThread)是非线程安全的。如果使用临界区,那么多线程将在这里串行执行,严重降低多线程效率。对此,我采用一个简单的办法,具体可以看程序。
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?