Delphi编写系统服务七：完成端口演示 收藏
Delphi编写系统服务七：完成端口演示 收藏
在开发大量Socket并发服务器，完成端口加重叠I/O是迄今为止最好的一种解决方案，下面是简单的介绍：
“完成端口”模型是迄今为止最为复杂的一种I/O模型，特别适合需要同时管理为数众多的套接字，采用这种模型，往往可以达到最佳的系统性能。但是只适合Windows NT和Windows 2000及以上操作系统。因其设计的复杂性，只有在你的应用程序需要同时管理数百乃至上千套接字的时候，而且希望随着系统内安装的CPU数量增多，应用程序的性能也可以线性提升，才考虑采用“完成端口”模型。
重叠I/O（Overlapped I/O）模型使应用程序达到更佳的系统性能。重叠模型的基本设计原理便是让应用程序使用一个重叠的数据结构，一次投递一个或多个Winsock I/O请求。针对哪些提交的请求，在它们完成之后，应用程序可为它们提供服务。该模型适用于除Windows CE之外的各种Windows平台。
开发完成端口最具有挑战是线程个数和管理内存，创建一个完成端口后，就需要创建一个或多个“工作者线程”，以便在I/O请求投递给完成端口对象后，为完成端口提供服务。但是到底应创建多少个线程，这实际正是完成端口最为复杂的一个方面，一般采用的是为每一个CPU分配一个线程（有的是CPU个数加1，有的是CPU*2的线程个数）。内存分配效率低是因为应用程序在分配内存的时候，系统内核需要不停的Lock/UnLock，而且在多CPU的情况下，会成为整个程序性能的瓶颈，不能随CPU的个数增加而性能提高，一种比较好的做法一个一次分配多块内存。
下面是我写一个的完成端口的演示程序，在我的电脑上测试可以达到链接5100个客服端，服务器性能还很好，由于我写的客服端占用资源比较的，最后直接重启了，具体见代码。演示程序主要的瓶颈在于发消息的这一块，在实际应用中应去掉。
（配置：操作系统 Microsoft Windows XP Professional 操作系统 Service Pack 版本 Service Pack 2；CPU：Intel(R) Pentium(R)4 2.40GHz 2.40GHz；内存：2G；主板：华硕P4P800）。
主要源代码：(Delphi 7编写)，下载地址：http://download.csdn.net/source/818039
{*******************************************************}
{
相关文档：
在Delphi中的Record类型中，与之C语言对应的即是结构体类型（struct
），也可能是为了符合C语言或C++程序员的习惯，对于它在Delphi中的应用存在的一些问题进行初步的说明。在Delphi中的记录体类型有两种方式定义
Type
RecTest = record (packed
)
ID :integer; ......
最近需要安装第三方组件，在网络上找到一些资料转过来看看
由于组件提供的方式不同，所以安装的方法也是不一样的，下面就目前常见的各种形式的组件的安装方法介绍一下。
1 只有一个DCU文件的组件。DCU文件是编译好的单元文件，这样的组件是作者不想把源码公� ......
Source Code
http://www.codefans.com/CodeList/Catalog_5_CodeTime_Desc_1.html
http://www.vscodes.com/sitemap.html
http://www.itlove.net/Soft/261/
DelphiX
http://www.micrel.cz/Dx/
http://www.delphi3d.net/index.php
http://www.pascalgamedevelopment.com/
http://www.2ccc.com/article.asp?articleid ......
前段时间因为项目需要，获取指定文件的图标，绕了很多弯子，现在弄出来了，跟大家共享下.
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls,ShellAPI, ExtCtrls;
type
TForm1 = class(TForm)
l ......
