编了一个 模仿Windows XP 下的扫雷游戏的程序,提供源代码给大家共同研究.共同进步嘛.(100分)

H

huansun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-13

• #1

http://www.delphibox.com/softview.php?type=f&softid=166
是源程序下载,不过,记住我在Readme 里说的,用Delphi5编译.因为用Delphi6 编译的结果
会发现界面很是抖动.而可爱的Delphi5 则让人放心.至于原因,我已经发了帖子询问了.
相信很快就会解决的 .
[][]
这已经做了一些升级.自认为在程序的结构方面是很明朗的.

不过,就我所调试的结果告诉发现,有一个Bug
我相信肯定有人能找出来的.
目前先让我一个人来解决,等哪天大家找出来了,我们再一起研究
毕竟说出自己程序中有Bug已经很不舒服了,还要我说出Bug 的内容,那>>>>太为难我了吧..

总之,欢迎下载,欢迎赐教.....

 

C

cqbaobao

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-13

• #2

试用ing....

 

H

huansun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-13

• #3

提出有价值建议和找出任何的 Bug 一定给分。。

谢谢！

 

天

天与地

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-13

• #4

做的太棒了，佩服！
为了赚点分，提一个鸡蛋里挑骨头的bug。语言选择时，当选择“English”时，其它所有的中文都变成
英文了，只有窗口的caption还是中文“扫雷”。知道算不算小bug。
其它我再用用，有好多东西要学。

 

H

huansun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-13

• #5

谢谢 天与地 ！

算！ 接受。

 

天

天与地

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-13

• #6

刚才我跟Windows的做的比较，在英雄榜里，选择“重新计分”，你会把所有的“秒”都给清除掉。
而Windows的不清除。嘿嘿，又一个。

 

披

披星戴月

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-13

• #7

不错！
好象不能自定义宽度，能定义高度，
是bug吗？：）

 

山

山泉

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-13

• #8

程序是不错，佩服
的确delphi6编译后有抖动现象
问题可能在：Frm_Main .Image_BlackGround .Canvas .CopyRect

 

贝

贝贝11

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-13

• #9

挺好！

自定义那怎么回事？

 

披

披星戴月

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-13

• #10

：） 不是bug！，windows的也一样选择高级后再
选择自定义不能自定义宽度，能定义高度！
平时都没发现！：）

 

H

huansun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-13

• #11

的确！ 平时玩扫雷游戏的时候只顾着过关，不去研究他的许多细节和功能
到要编的时候，才发现原来有那么多的细节要考虑，烦啊。 ：）

我公布我原来已经发现了的一大 Bug ：
当你鼠标右键点击雷区后，保持按下状态，拖动到窗体外部松开 ，然后再。。。。
你试试看呢 》》 有没有发现什么。。。
：） 见笑了，不会怪我知道有Bug 还放到网上吧，其实我一直在想着改。
不过，就是一直没什么办法。

我用过 SetCapture 和ReleaseCapture ，用在窗体（Form）上是可以的。不过
用在我的雷区里（雷区用的是一个 TImage 控件）就不可以了，甚是纳闷。。。。

如果你知道，一定不要吝啬哦。

 

H

huansun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-13

• #12

好消息！！
在 noall 的帮助下。我的扫雷游戏在Delphi6 下编译的结果屏幕抖动的问题解决了 。。
{
来自：noall, 时间：2002-8-13 13:10:00, ID：1261109
设置父控件的doublebuffers为true.
}
你如果下载了我的源程序。那只需要在 procedure TFrm_Main.FormCreate 事件里加入
如下代码就可以了
Panel_bottom.DoubleBuffered :=true;
Panel_top.DoubleBuffered:=true;
这下用我们可爱的Delphi6 （现在又发现Delphi6 还是挺可爱的）来编译一次看看，^_^

解决了不是吗？ 不是？不可能的 ：）

 

C

cqbaobao

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-13

• #13

没发现你说的问题啊？

 

H

huansun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-13

• #14

不会啊
用 Delphi6 编译的时候
如果不加那两行代码的话，雷区就会不停地抖动。。

 

C

cqbaobao

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-13

• #15

我是说右键拖动的问题[]

 

H

huansun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-13

• #16

你试试如下的操作。。。

在雷区按下右键（有一方块上插了一个小红旗，或是由旗变为问号等等），保持按下状态
拖动至窗口外部，松开右键 。。。

然后，移动鼠标到窗口内部（此时没有任何键被按下），你找个方块（最好是没有被展开的）
按下鼠标左键试试看。。 ^_^ 不要再说得更清楚了吧 ！

能帮我改改吗 ？

 

Y

yanghai0437

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-13

• #17

kk

 

L

lsj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-13

• #18

那位能把它上传到http://www.playicq.com/啊
我无法登陆网站
先谢谢了！

 

L

lsj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-13

• #19

上面也有一个扫雷

 

C

cqbaobao

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-13

• #20

不会，提前，学习....