| caocll
34113
|
2008/5/17 7:25:02 |
| 为什么我调试的那些图片都排列在一起呢,好像不是随机排列的 |
| delphizhou
33068
|
2008/2/18 13:03:03 |
| 謝謝了，不錯。 |
| jason10
32358
|
2007/12/21 16:06:23 |
| RES的创建方法,或者是屏蔽的方法说具体点哈,谢谢呢. |
| victorwoo
32357
|
2007/12/21 15:51:18 |
正常的
Recreated～～～～ |
| jason10
32355
|
2007/12/21 14:27:42 |
| 大家好,我想知道我打开源程序时出现如下错误:Cannot find resource file:D:\...\link.res. Recreated." 请指点,谢谢噢. |
| victorwoo
30434
|
2007/7/18 9:19:05 |
楼主，经过大伙儿的改进，能否整理一个相对完善一点的版本：
1.前面提到修改了一个bug
2.DelphiX的地址
3.线程解决MIDI的方法
4.RES的创建方法
谢谢！ |
| sail2000
29945
|
2007/6/12 10:12:03 |
| 播放遊戲聲音絕對的推薦 BASS 庫和 FMOD 庫！！ |
| kongxiangji
29727
|
2007/5/31 11:51:20 |
fhx123 :
你说的播放背景音乐音乐替换的时候程序会卡，这个bug我知道，我也考虑用线程解决，只是一直没有时间再去完善程序，fhx123你解决了，呵呵，还是大家的力量大。 |
| fhx123
29713
|
2007/5/30 12:08:48 |
to kongxiangji
呵呵，背景音乐的问题解决了，创建个线程，在子线程中播放背景音乐，如果不喜欢 TMediaPlayer 可以用MCI指令MCISendString播放MIDI，我试了一下，在不用子线程的情况下，用MCISendString会卡 1 秒钟，不超过 1 秒，明显比 TMediaPlayer 快许多。如果用线程，那不管MCI还是TMediaPlayer，都不会卡。 |
| kongxiangji
29699
|
2007/5/29 19:24:39 |
fhx123:
其实播放的时候也是把MIDI文件释放到本地硬盘了 ，只是找不到能在内存直接播放MIDI的控件，可以改成wav格式的，delphiX带的有，只是wav格式的文件太大了。 |
| fhx123
29697
|
2007/5/29 18:57:46 |
另外还发现一个背景音乐的问题，当一首音乐播放结束后，播放一下个时，会引起卡2-4秒钟的时间，在卡住时，点图是没反应的，我想应该是TMediaPlayer打开MIDI文件时比较慢的原故吧。想想这TMediaPlayer也太烂了吧，才10K左右的文件，就花这么多时间。
我原本以为每次从资源中抽取会慢些，后来我改成直接播放硬盘上的文件，也一样，没什么改善。 |
| fhx123
29696
|
2007/5/29 18:49:56 |
to kongxiangji:
该是我好好谢谢你，这么好的源码，正好让我补补DelphiX，呵呵。
我把源码编译后让GF试一下身手，她反映说图太多太小，眼睛容易疲劳，我正琢磨着给改改，弄少点图，加大图尺寸。 |
| kongxiangji
29695
|
2007/5/29 17:35:21 |
fhx123 说的问题还可以这样解决：
在初始化函数Initialize里初始FocusedSprite数组时把XID,YID,X,Y的初始值都赋为-1。
这种方法要比上面说得好。 |
| kongxiangji
29694
|
2007/5/29 17:27:17 |
fhx123 :
你说的问题我看了代码，确实有这个bug,老兄还真细心，谢谢了
解决方法：
在过程 procedure TForm1.FocusedSprites(AX, AY: integer);里的Continue;前面
加上下面代码
FocusedSprite[1].X := round(X);
FocusedSprite[1].Y := round(Y);
FocusedSprite[1].ID := FSprites[i][j].MonoSprite.ID;
FocusedSprite[1].ImageID := FSprites[i][j].MonoSprite.ImageID;
FocusedSprite[1].XID := i;
FocusedSprite[1].YID := j;
就行了，
原因是第一次点击图形时候没有给数组赋值（其实也赋了，只是和点击同一个图片的特例重合了）。
代码写的比较零乱，让兄弟们看上去费心了。 |
| revenant
29685
|
2007/5/29 11:03:44 |
| 提供一套带控件和资源文件的代码,谢谢了 |
| kongxiangji
29684
|
2007/5/29 8:53:29 |
fhx123 29677 2007-5-29 1:04:01
编译后的程序和原本附的EXE运行都有相同的一个BUG，进入游戏时，第一次点左上角第一个图，显示不正常。对DelphiX不熟悉，看得挺累的
能说详细一点吗？ |
| kongxiangji
29683
|
2007/5/29 8:52:05 |
starsoul 29674 2007-5-28 23:04:28
好像差文件哦,能不能提供完整的?
差的文件文件是MIDI的资源文件，可以屏蔽掉也可以自己做个res的资源文件。 |
| fhx123
29677
|
2007/5/29 1:04:01 |
| 编译后的程序和原本附的EXE运行都有相同的一个BUG，进入游戏时，第一次点左上角第一个图，显示不正常。对DelphiX不熟悉，看得挺累的 |
| starsoul
29674
|
2007/5/28 23:04:28 |
| 好像差文件哦,能不能提供完整的? |
| revenant
29663
|
2007/5/28 14:36:00 |
| 跟踪运行后发现运行完FParentFile := TFileStream.Create(ExtractFilePath(Application.ExeName)+ParamStr(2),fmOpenReadWrite); 提示系统找不到指定路径 |
