自定义博客皮肤VIP专享

*博客头图:

格式为PNG、JPG,宽度*高度大于1920*100像素,不超过2MB,主视觉建议放在右侧,请参照线上博客头图

请上传大于1920*100像素的图片!

博客底图:

图片格式为PNG、JPG,不超过1MB,可上下左右平铺至整个背景

栏目图:

图片格式为PNG、JPG,图片宽度*高度为300*38像素,不超过0.5MB

主标题颜色:

RGB颜色,例如:#AFAFAF

Hover:

RGB颜色,例如:#AFAFAF

副标题颜色:

RGB颜色,例如:#AFAFAF

自定义博客皮肤

-+
  • 博客(1)
  • 资源 (1)
  • 收藏
  • 关注

原创 Delphi X执行shell命令,并获取返回结果

Delphi X执行shell命令,并获取返回结果话不多说,我们上代码; 建议你把以下代码抄到线程里面运行。话不多说,我们上代码; 建议你把以下代码抄到线程里面运行。uses System.Classes, Winapi.Windows, System.SysUtils;function RunDosCommand2(Command: string): string;const //预防返回量大,我们设置4096个字节 DEF_OUTPUT_BUFSIZE = 4096;var

2020-08-01 09:56:49 449

TSunTCPServer

作者博客`http://mr_anderson.blog.tom.com //_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_ //SunTCPServer 1.1 2007-02-03 //_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_ 强大的TCPServer控件For Kylix3~. 在1.0的基础上,增加了线程调节。在TCP服务启动前,程序员可以根据服务器的应用范围设置合理的线程数。(TSunTCPServer.ReadThdCount)TCP客户端会平均分布到这N个线程里,大大提高读取效率。建议:1个线程最多负责500个客户端,也就是如果你希望SunTCPServer支持5000个并发连接,那么ReadThdCount就设置成10. Echo Demo里面有SunTCPServer的完整用法,该控件使用非常简单,所以没有写使用文档的打算。如果使用上有任何问题,欢迎发送E-mail到 [email protected] //_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_ //SunTCPServer 1.0 //_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_ 强大的TCPServer控件For Kylix3~. 原来一直用Indy做TCP方面的开发,其实在Windows下就发现了其不稳定,而且作为服务器来说性能远远跟不上需求。后来从事Linux下面的开发,Indy更让人无法忍受,当服务器端主动断开客户端时,INDY居然不会释放相关线程资源。所以当时程序跑一周左右就得重起,这对于程序员来说简直是个噩梦。 后来下定决心自己写一个TCP服务器,目标是使用无堵塞方式同时接受1万个并发连接。SunTCPServer 1.0激活时同时启动两线程,一线程负责客户端接入,并加载到客户端列表。一线程负责轮询客户端列表,读取数据和检测客户端状态。 在该模式下,用SunTCPServer写的Echo服务器性能比indy和TCPServer高出很多倍。但连接数到3000以后性能明显下降,该问题将在下一版本得到解决。 修改LINUX连接数限制方法如下: /etc/security/limits.conf加入下列行 * soft nofile 65536 * hard nofile 65536 现在,你的服务器可以支持65536个连接了!

2007-02-03

空空如也

TA创建的收藏夹 TA关注的收藏夹

TA关注的人

提示
确定要删除当前文章?
取消 删除