2025年8月15日
组装20 人物动画的简单实现 角色的地图坐标的走跑
摘要： function TActor.Move(step: Integer): Boolean; var prv, curstep, maxstep: Integer; begin Result := False; prv := m_nCurrentFrame; if (m_nCurrentAction 阅读全文
posted @ 2025-08-15 22:20 D7mir 阅读(13) 评论(0) 推荐(0)
组装19 人物动画的简单实现 绘画出网格更直观
摘要： UNITX = 48; UNITY = 32; procedure TForm1.DrawGrid; var i: Integer; begin with DXDrawHuman.Surface.Canvas do begin Pen.Color := clWhite; DXDrawHuman.Su 阅读全文
posted @ 2025-08-15 12:02 D7mir 阅读(5) 评论(0) 推荐(0)