使用Delphi编写棋牌类游戏 基础篇(2)
对于网络游戏来说，它和单机版游戏最大的区别就在于网络通信部分。可以说，网络通信是构成网游的最基本元素。在这里我不想详细的论述如何使用DELPHI在WINDOWS下进行网络编程，因为这是一个非常复杂的话题。这里我只是想说明在我设计的棋牌类游戏中如何实现游戏网络部分的。
对于WINDOWS来说，它的通信模型大概分为5种。分别是：
1：SELECT模型。
2：WSAAsynSelect模型。
3：WSAEventSelect模型。
4：IO重叠模型
5：完成端口模型。
对于性能来说，完成端口可以管理上万连接（理论连接数量可以达到65535个），所以我选择它来作为我游戏服务器的通信模型。
由于游戏客户端和游戏服务器的连接只需要一条就可以，所以我选择了Select模型作为客户端通信模型。
关于如何编写完成端口以及在完成端口中如何加入心跳，如何避免网络通信中的粘包现象在我以前的BLOG中已经有了详细的讲解，由于篇幅太多，我这里就不在将其贴出。详细的可以参看我的BLOG 《DELPHI中完成端口(IOCP)的简单分析（1）》-《 DELPHI中完成端口(IOCP)的简单分析（4）》和《网络通信中的心跳机制的实现！》
但是在我最近重新检查代码的时候发现我以前关于IOCP的一些处理方式不合适或者有些地方是错误的，我已经在以前的BLOG帖子中做了相关的修改。
在这里我们讨论一下如何实现客户端通信模型(Select模型)。对于熟悉网络编程的程序员来说，编写一个SELECT通信模型是一件很简单的事，因为它是5中通信模型中最简单的一种。
编写select模型的代码如下：
Var
Fsocket：Tsokcet;
procedure Star;
var
CliAddrIn:TSockAddrIn;
hThread:THandle;
ThreadID,outByte:DWORD;
keep_alive,out_keep_alive:TTimeVal;
iAddrSize,opt,I:Integer;
begin
//加载SOCKET,我使用的是2.2版为了后面方便加入心跳
if WSAStartUp($202, wsData) <> 0 then
begin
WSACleanup();
end;
//创建一个套接字
Fsocket:=socket(AF_INET,SOCK_STREAM,0);
if Fsocket =SOCKET_ERROR then
begin
closesocket(Fsocket);
end
else
begin
//这里填入实际的服务器IP地址和服务器监听端口
CliAddrIn.sin_addr.s_addr:=inet_addr(Pchar(‘127.0.0.1’));
相关文档：
VC声明
HANDLE CreateMutex(
LPSECURITY_ATTRIBUTES lpMutexAttributes, // SD
BOOL bInitialOwner, // initial owner
LPCTSTR lpName // object name
);
delphi声明：
function CreateMutex(lpMutexAttributes: PSecurityAttributes; bInitialOwner: BOOL; lpName: PChar): THandle; stdcall;
创� ......
常忘记，在此做笔记。
这几个函数都包含在StrUtils中，所以需要uses StrUtils;
假设字符串是 Dstr := ’Delphi is the BEST’, 那么
LeftStr(Dstr, 5) := ’Delph’
MidStr(Dstr, 6, 7) := ’ ......
DirectoryExists('C:\WINDOWS'):Boolean;检测文件夹是否存在！
FileExists('c:\Dir.txt'):Boolean;检测文件是否存在！
EDIT组件
OnChange 当编辑框中的内容发生变化时触发该事件
OnKeyPress 当按下一个按键时，触发该事件
OnEnter 编辑框获得输入焦点时，触发该事件
MEMO组合
WordWrap 用于设定Momo组件是否具有自� ......
这个本来我我在DELPHI盒子看到的，后来我对其作了一点修改，这里上全部代码，可以直接用
首先有两个自定的转换函数：
function myStrToHex(s:string):string; //字串转16进制
var
TmpStr:string;
i:integer;
begin
TmpStr:='';
for i:=1 to Length(s)do
TmpStr:=TmpStr+IntToHex(ord(s[i]),2);
Res ......
windows几个重要的内核数据结构虽然网上也有相关的定义，但个人觉得不齐全定义不规范，因此用一天时间使用WinDbg+Win2000sourcecode重新定义了常用的内核数据结构，并尽可能还原微软的原结构定义，每个结构都递归到最子层的结构并且通过了测试。通过这次工作过程不仅使自己得到一次学习的机会，而且提高了自己的整体软件架� ......
