D7mir

2024年5月7日

摘要： IntroScn.pas 嗟夫DELPHI 输入法相关知识凡是窗口类都有TImeMode 这是个集合其中包含有： TImeMode = (imDisable, imClose, imOpen, imDontCare,imSAlpha, imAlpha, imHira, imSKata, imKa 阅读全文

posted @ 2024-05-07 22:34 D7mir 阅读(57) 评论(0) 推荐(0)

原始翎风CLIENT8位 (12) playscn的学习

摘要：绘图关键的数据地图客户区，以主角的地图坐标为中心左右各9格，上下9，8格一切以主角为中心进行计算，换算。Map.m_ClientRectLeft := g_MySelf.m_nRx - 9; Top := g_MySelf.m_nRy - 9;Right := g_MySelf.m_nRx + 9; 阅读全文

posted @ 2024-05-07 22:32 D7mir 阅读(31) 评论(0) 推荐(0)

原始翎风CLIENT8位 (11) fsata的学习

摘要：本单元提供系统中的所有对话框显示 MAINIMAGEFILE = 'Data\Prguse.wil';MAINIMAGEFILE2 = 'Data\Prguse2.wil';MAINIMAGEFILE3 = 'Data\Prguse3.wil';CHRSELIMAGEFILE = 'Data\Chr 阅读全文

posted @ 2024-05-07 22:31 D7mir 阅读(26) 评论(0) 推荐(0)

原始翎风CLIENT8位 (9) magieff的学习

摘要：定义类型这里的魔法效果，是扔出去的魔法效果，魔法释放后的效果在施咒的动作的，如火球术的施咒效果图样是在自身的，却不在这里，由Actor单元里面实现有个m_nCurEffFrame，但是奇怪的是空间移动，是图样是在于自身这些效果，又是由本单元里面实现的。 TMagicType 枚举开头mt mtR 阅读全文

posted @ 2024-05-07 22:29 D7mir 阅读(25) 评论(0) 推荐(0)

原始翎风CLIENT8位 (8) CLUNIT的学习

摘要：这个里面是绘图，有汇编，那个绘画效果的汇编看明白了，实际是先建立了一个颜色的转换索引表，颜色对应下标，数据是转换后的颜色在绘画效果中用函数功能找到混合表面的的指针，锁定它用汇编语言，将混合表面的每一个像素查找转换索引表，转换过去。因为用了MM0寄存器，这是个MMX的指令里面的，它是64位的，所以有阅读全文

posted @ 2024-05-07 22:27 D7mir 阅读(37) 评论(0) 推荐(0)

2023年11月30日

原始翎风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 阅读(40) 评论(0) 推荐(0)

2023年11月28日

原始翎风CLIENT8位 (6) frmMain中的网络消息的处理流程接受消息处理

摘要： frmMain中的网络消息的处理流程接受消息处理 TfrmMain.CSocketRead 接收服务器传来的消息，字符串格式，如果字符串中有*号，去掉* 号，并回传 * 号给服务器没有 * 号的字符串加入到SocStr字符串变量中 Timer1Timer，定时器 10毫秒设置开关，锁定，避阅读全文

posted @ 2023-11-28 22:37 D7mir 阅读(109) 评论(0) 推荐(0)

2023年10月31日

原始翎风CLIENT8位 (5) DWinCtl单元

摘要：原始翎风CLIENT8位 DWinCtl单元DWinCtl单元它注册了组件，可以显示在D7的组件栏上RegisterComponents('MirGame', [TDWinManager, TDControl, TDButton, TDGrid, TDWindow]);组件名MirGame，里面有5 阅读全文

posted @ 2023-10-31 10:14 D7mir 阅读(100) 评论(0) 推荐(0)

2023年10月22日

原始翎风CLIENT8位 (4) frmMain 下的 OnIdle 事件

摘要：原始翎风CLIENT8位frmMain 下的 OnIdle 事件在frmMain的Create 中Application.OnIdle := AppOnIdle; //程序空闲事件的方法 procedure AppOnIdle (Sender: TObject; var Done: Boolea 阅读全文

posted @ 2023-10-22 09:04 D7mir 阅读(55) 评论(0) 推荐(0)

2023年10月21日

原始翎风CLIENT8位 (3) frmMain 下的 CSocket控件

摘要：原始翎风CLIENT8位frmMain 下的 CSocket控件属性：在frmMain的FormCreate中g_ConnectionStep := cnsLogin 设置为登陆方式g_boSendLogin:=Falseg_boServerConnected := FALSE 根据读取的mir. 阅读全文

posted @ 2023-10-21 16:46 D7mir 阅读(47) 评论(0) 推荐(0)

公告