11 2023 档案

原始翎风CLIENT8位 (7) 对于@(pcm^)的理解
摘要：procedure TfrmMain.ClientGetMyMagics(body: string);var i: integer; data: string; pcm: PTClientMagic;begin for i := 0 to g_MagicList.Count - 1 do Dispo 阅读全文
posted @ 2023-11-30 14:56 D7mir 阅读(51) 评论(0) 推荐(0)
原始翎风CLIENT8位 (6) frmMain中的网络消息的处理流程接受消息处理
摘要：frmMain中的网络消息的处理流程接受消息处理 TfrmMain.CSocketRead 接收服务器传来的消息，字符串格式， 如果字符串中有*号，去掉* 号 ，并 回传 * 号给服务器没有 * 号的 字符串加入到SocStr字符串变量中 Timer1Timer，定时器 10毫秒设置 开关，锁定，避 阅读全文
posted @ 2023-11-28 22:37 D7mir 阅读(123) 评论(0) 推荐(0)