-
Delphi纸牌游戏动画特效
一个基于Delphi编写的纸牌游戏动画特效,并不是一个完整的游戏,而是生成的纸牌动态效果,和图像处理有关的一个Delphi范例,如演示截图所示,生成的动画 效果还是挺不错的,或许可作为某方面的借鉴。部分代码如下:
FCardId:Cardinal ; //扑克的编号,0-51为各花色的1-K,52为大王,53小王
FFaceUp:bool; //是否正面朝上
procedure SetCardId(id:Cardinal);//设置扑克牌的编号
procedure SetFaceUp(Flag:Bool); //设置是否正面朝上
function GetValue:integer; //得到扑克牌的点数
function GetSuit:TCardSuit; //得到扑克牌的花色
procedure Paint; override; //画扑克牌的程序
constructor Create(AOwner:TComponent);overload;override; //构造函数
constructor Create(AOwner:TComponent;Id:Cardinal);overload;
procedure SetCard(Suit:TCardSuit;Value:Cardinal); //设置扑克牌的编号
property CardId:Cardinal read FCardId write SetCardId; //扑克牌编号
property FaceUp:bool read FFaceUp write SetFaceUp default False; //正面朝上
property Value:integer read GetValue; //扑克的点数,只读
property Suit:TCardSuit read GetSuit; //扑克的花色,只读
- 2022-01-26 05:07:33下载
- 积分:1
-
cellular_automata_test1
利用matlab编写的元胞自动机模拟火灾人员疏散(Simulation of evacuation of fire personnel by cellular automata compiled by MATLAB)
- 2021-04-20 10:58:51下载
- 积分:1
-
ADI的ADSP
ADI的ADSP-BF561下实现MP4/MP2codec的关键算法。-ADI
- 2022-02-11 10:56:14下载
- 积分:1
-
Struts11
一个不错的网上购物系统的源代码 (a good online shopping system source code a good online shopping system source code)
- 2006-07-09 11:20:34下载
- 积分:1
-
Slides-lecture-5.pdf
说明: Advanced Digital Communications (EQ2411)
- 2019-04-18 20:42:08下载
- 积分:1
-
源代码及class文件
说明: 游戏的过程应该是一部分棋子“主动”去翻转,另一部分可以通过其周围的棋子来“被动”翻转。而每一个棋子的状态逻辑值根据引言可知只有翻转和不翻转两种状态(不必考虑多次翻转的情况),因此可以用0和1来表示。一次翻转操作相当于五个相关单元的逻辑值取反。(The process of the game should be one part of the chess pieces "active" to flip, and the other part can be "passive" to flip through the chess pieces around them. According to the introduction, the logical value of the state of each chess piece can be expressed as 0 and 1, because there are only two states: flip and non-flip (without considering the situation of multiple flips). A flip operation is equivalent to the logical value reversal of five related units.)
- 2020-06-17 17:00:02下载
- 积分:1
-
公司网站小程序
说明: 各种公司小程序,优化办公,非常有用,让办公时间节省很多(Company Website Small Procedures)
- 2019-04-28 11:31:35下载
- 积分:1
-
统计R语言
James_et_al-2013 an_introduction_to_statistical_learning_with_applications_in_R(James_et_al-2013-an_introduction_to_statistical_learning_with_applications_in_R)
- 2019-03-16 23:51:47下载
- 积分:1
-
队列VI
说明: labview中队列的应用,两个VI如何用队列进行数据共享。(Application of queue in Labview)
- 2020-05-26 21:27:05下载
- 积分:1
-
PhysRevLett.74.2981
Regular Patterns of Cracks Formed by Directional Drying of a Collodial Suspension
- 2019-01-19 14:22:05下载
- 积分:1