搜索结果
查询Tags标签： ChPon，共有 5条记录-
Delphi 经典游戏程序设计40例 的学习 例18 线条光线的威力
unit R18;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, ExtCtrls, StdCtrls;typeTpatDt = record //角色，记录类型Used : Byte;Sban : Byte;Xpos : Integer;Ypos : Integer;Scon : Byte; //计数器，1星星出…
2022/7/25 14:27:49 人评论 次浏览 -
Delphi 经典游戏程序设计40例 的学习 例11 零件贴图中的优先顺序
unit rei11;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, ExtCtrls;type//定义记录 类型，角色管理用TPatDt = recordUsed:Byte; //角色所使用的标记Sban:Byte; // 复合图案的编号Xpos:Integer; …
2022/7/13 1:25:03 人评论 次浏览 -
Delphi 经典游戏程序设计40例 的学习 例10 自动滚动功能与简易零件贴图
unit rei10;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, ExtCtrls;type // 定义精灵 记录类型TpatDt = recordUsed : Byte;Sban : Byte;Xpos : Integer;Ypos : Integer;Smov : Byte;Sadd : Byte;end;TR10 = class(…
2022/2/5 17:42:47 人评论 次浏览 -
Delphi 经典游戏程序设计40例 的学习 例7 星星的诞生与陨落
unit rei4007;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, ExtCtrls;typeTpatDt = recordUsed : Byte; //角色使用的标记Xpos :Integer;Ypos : Integer;Sban : Byte; //复合图案编号Smov : Byte;Slife :…
2022/1/3 22:08:47 人评论 次浏览 -
Delphi 经典游戏程序设计40例 的学习 例7 星星的诞生与陨落
unit rei4007;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, ExtCtrls;typeTpatDt = recordUsed : Byte; //角色使用的标记Xpos :Integer;Ypos : Integer;Sban : Byte; //复合图案编号Smov : Byte;Slife :…
2022/1/3 22:08:47 人评论 次浏览
