开始游戏的数据通讯

让我通过代码确认一下数据获取的具体路径：客户端发送选择角色请求： procedure TfrmMain.SendSelChr(chrname: string); begin m_sCharName := chrname; SendClientMessage(CM_SELCHR, 0, 0, 0,...

meinvwudi · 2024-12-08T06:59:58+00:00

让我通过代码确认一下数据获取的具体路径：客户端发送选择角色请求： procedure TfrmMain.SendSelChr(chrname: string); begin m_sCharName := chrname; SendClientMessage(CM_SELCHR, 0, 0, 0,...

开始游戏的数据通讯

meinvwudi

让我通过代码确认一下数据获取的具体路径：

客户端发送选择角色请求：
```
procedure TfrmMain.SendSelChr(chrname: string);
begin
  m_sCharName := chrname;
  SendClientMessage(CM_SELCHR, 0, 0, 0, 0, chrname);
end;
```
RunGate 转发到 LoginServer：
```
procedure TLoginSrv.ProcessSelChr(
  PlayObject: TPlayObject;
  DefMsg: pTDefaultMessage;
  sCharName: string
);
begin
  // LoginServer 向 DBServer 请求角色数据
  if RequestDBHumanInfo(PlayObject.ConnectionID, sCharName) then begin
    PlayObject.WaitingDBInfo := True;
  end;
end;
```
LoginServer 请求 DBServer：
```
function TLoginSrv.RequestDBHumanInfo(nConnID: Integer; sCharName: string): Boolean;
var
  DBMsg: TDBMessage;
begin
  // 构造请求消息
  DBMsg.ident := DB_LOADHUMANRCD;
  DBMsg.sCharName := sCharName;
  
  // 发送到 DBServer
  SendDBServerMsg(nConnID, @DBMsg);
end;
```
1. 数据返回路径：
```
DBServer -> LoginServer -> RunGate -> Client
```
所以确认数据流向是：
```
Client -> RunGate -> LoginServer -> DBServer -> LoginServer -> RunGate -> Client
```
LoginServer 在这个过程中起到了中转和处理的作用：
1. 接收客户端请求
2. 向 DBServer 请求数据
3. 处理返回的数据
4. 转发给客户端
不是直接与 DBServer 通信，而是通过 LoginServer 中转。这样设计的好处：
- 统一管理数据访问
- 提供额外的安全验证
- 处理数据格式转换
- 实现更好的封装性