《Delphi游戏编程导学》全文连载

第2章 “幸运52”模拟游戏

“幸运52”是一个流行的电视综艺节目。本章通过模拟这个游戏，来实现对Delphi的初步应用。本章主要介绍如何应用Delphi的快速开发工具，生成一个基于组件编程的应用程序。本章的重点在于学习Delphi中创建项目的方法，掌握Delphi基于窗体的界面设计方式，理解Delphi基于事件的编程机制。

“幸运52”游戏的核心规则是在给出商品之后，要求用户迅速猜中该商品的价格，在估价的过程中，系统会提示所估价格相对于实际价格是高了还是低了。

游戏的初始界面如图2.1所示。

图2.1 游戏的初始界面

当用户单击“开始游戏”按钮时，应用程序将随机显示一商品的图像和名称，如图2.2所示，图中随机显示的是商品为“索尼随身听EX2000”的效果。

图2.2 选择某商品后的显示效果

在文本框中输入对该商品的估价，比如365，然后单击“确定”按钮，这时应用程序会给出反馈，弹出一个警告对话框，提示你作出的估价“低了低了！”，如图2.3所示。

图2.3 输入估价后的反馈

如果用户输入的估价比商品的实际价格要高，会弹出一个对话框，提示你作出的估价“高了高了！”。在关闭对话框之后，用户可以再次输入对商品的估价，直到猜中商品的实际价格为止，这时系统就会恭喜用户猜对了，效果如图2.4所示。

图2.4 系统恭喜用户估价正确

这个游戏具体的规则如下：

（1）单击“开始游戏”按钮，游戏开始，系统将给出商品信息。

（2）请迅速在文本框中输入您估计的商品价格，然后单击“确定”按钮。

（3）这时系统会提示您的估计是高了还是低了，在弹出的对话框中单击“确定”按钮，再次输入新的估计值，重复上一步。直到估计值正确，这时系统会恭喜您中奖了！

（4）如果用户输入错误的字符，程序将给出错误提示。

下面，我们开始循序渐进地创建这个小游戏。