随笔分类 -  组装

组装23 人物动画的简单实现 加入声音
摘要：unit SoundUnit; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, DXDraws, DirectX, DXClass, ExtCtrls, DXSounds 阅读全文
posted @ 2025-08-29 23:06 D7mir 阅读(11) 评论(0) 推荐(0)
组装22 人物动画的简单实现 带魔法的多个角色显示，魔法列表
摘要：unit Movies; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls, StdCtrls,DXClass, DXDraws, W 阅读全文
posted @ 2025-08-29 16:14 D7mir 阅读(18) 评论(0) 推荐(0)
组装21 人物动画的简单实现 角色显示卡顿的问题解决
摘要：将用系统内存选择上即可，就不卡顿了，程序CPU占用率从50下降到为0， 其实是个基础性的知识吧，它应该指的是使用显存？但是默认是不使用这个？ 其它的选择也试了下，看起来没有什么变化。 也看了下翎风的源码，是选择用系统内存的。 翎风源码DX控件的选择。 阅读全文
posted @ 2025-08-21 15:56 D7mir 阅读(20) 评论(0) 推荐(0)
组装21 人物动画的简单实现 角色列表多个角色的显示
摘要：unit Movies; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls, StdCtrls, DXDraws, WILIB; ty 阅读全文
posted @ 2025-08-21 11:13 D7mir 阅读(15) 评论(0) 推荐(0)
组装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 阅读(8) 评论(0) 推荐(0)
组装17 人物动画的简单实现 发出小火球的轨迹问题2
摘要：unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls; type TForm1 = class 阅读全文
posted @ 2025-08-11 15:15 D7mir 阅读(14) 评论(0) 推荐(0)
组装18 人物动画的简单实现 发出小火球和小火球到目标后爆裂
摘要：unit Movies; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls, StdCtrls, DXDraws, WILIB; ty 阅读全文
posted @ 2025-08-11 14:55 D7mir 阅读(17) 评论(0) 推荐(0)
组装16 人物动画的简单实现 发出小火球的轨迹问题
摘要：unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Ed 阅读全文
posted @ 2025-08-09 22:24 D7mir 阅读(11) 评论(0) 推荐(0)
组装15 人物动画的简单实现 发出小火球
摘要：unit Movies; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls, StdCtrls, DXDraws, WILIB; ty 阅读全文
posted @ 2025-08-06 16:39 D7mir 阅读(13) 评论(0) 推荐(0)
组装14 人物动画的简单实现 添加施法起手式
摘要：unit Movies; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls, StdCtrls, DXDraws, WILIB; ty 阅读全文
posted @ 2025-07-17 15:29 D7mir 阅读(11) 评论(0) 推荐(0)
组装13 人物动画的简单实现 添加刀光
摘要：unit Movies; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls, StdCtrls, DXDraws, WILIB; ty 阅读全文
posted @ 2025-07-11 20:27 D7mir 阅读(20) 评论(0) 推荐(0)
组装12 人物动画的简单实现 选择不同武器
摘要：unit Movies; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls, StdCtrls, DXDraws, WILIB; ty 阅读全文
posted @ 2025-07-05 23:48 D7mir 阅读(36) 评论(0) 推荐(0)
组装11 人物动画的简单实现 添加武器
摘要：unit Movies; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls, StdCtrls, DXDraws, WILIB; ty 阅读全文
posted @ 2025-07-02 16:06 D7mir 阅读(21) 评论(0) 推荐(0)
组装10 人物动画的简单实现 添加人物发型
摘要：实现原理 建立一个ACTOR类 在PLAY按钮中设置好人物的属性，计算出初始帧数据 RUN 中 计算出当前帧，装载帧图片 DrawChr 进行绘画 unit Movies; interface uses Windows, Messages, SysUtils, Variants, Classes, 阅读全文
posted @ 2025-06-26 22:57 D7mir 阅读(20) 评论(0) 推荐(0)
组装9 WIL初始化的简单认识
摘要：4年12月4日，放了2个月忘的差不多了 继续 改编的WIL 不作为一个控件 拖拽到 编辑页面上 如果要使用，那么要在 主FORM 的CREATE 事件中， 对WIL对象 进行 CREATE 然后 在DX控件初始化事件中 对必要的 WIL属性进行设置 ，然后初始化 也可以在其它事件中对WIL对象创建  阅读全文
posted @ 2024-12-27 16:25 D7mir 阅读(55) 评论(0) 推荐(0)
组装8 地图移动
摘要：8,地图移动， 建立一个SURFACE，大小是18* unitx 19* unity 地图坐标 X,Y 坐标在显示中间 读取这个坐标 18 * 19 范围的地图数据，贴图到SURFACE 上。 问题 1，OBJECT第三层的贴图是UNITX,HEIGHT的大小， 这个HEIGHT的高度需要读取超过1 阅读全文
posted @ 2024-07-07 09:47 D7mir 阅读(32) 评论(0) 推荐(0)
组装7 整张地图的显示
摘要：7.地图地图读到记录数组，根据地图单元记录，进行读取地图单元的图片有3层，发现一个BUG ，DX的SURFACE 大概是建立在157* 48 ，100 * 32 到 280 * 48 这个大小会错误。 需要避开这个范围？ 这个问题折磨了我一个星期，一直以为是我写的WIL问题 各种修改，直到去掉WIL 阅读全文
posted @ 2024-06-30 16:21 D7mir 阅读(42) 评论(0) 推荐(0)