标题：八卦巨星扑克占卜游戏（最新作品）

1楼

dongd1 发表于：2006/9/9 22:59:00

[这个贴子最后由dongd1在 2006/09/10 10:42am 第 1 次编辑]

用了两天时间作了个占卜游戏，意在发扬易表，相信易表也能做一些小游戏的，呵呵！

RAR文件下载

2楼

家明发表于：2006/9/10 0:36:00

太厉害了嘛,哈哈.收藏珍藏了.谢谢东东.

3楼

yangming 发表于：2006/9/10 8:50:00

谢谢东东版主!呵呵

4楼

ylm 发表于：2006/9/10 19:32:00

谢谢！下载。。。

5楼

czy 发表于：2006/9/10 20:44:00

有创意！谢过。

6楼

rwy 发表于：2006/9/11 23:00:00

下来玩玩看。谢了

7楼

czy 发表于：2006/9/12 1:24:00

刚才没事，仔细看了一下东东的大作，的确不错，想不到易表还能做出这些有意思的东东。

易表在处理图片存在一些欠缺，比如闪动很大，加上多窗口切换更觉得眼花缭乱，刚才有个想法不知妥否。

删除解释表所有列的刷新公式。
删除解释表第二个和第三个窗口。
在解释表的表验证公式上设置：CloseWindow()。
增加一个表达式变量，变量名：%a%。公式：ListFor("占卜","图片",2)。(意在解决函数嵌套问题)
增加一个数值型变量，变量名：%col%
占卜表第四个窗口，开牌按钮公式：
EvalFor(GridName,"占卜","Rand(54)") And SortCol("占卜",1) And EvalFor(GridName,"占卜","Row") And SortCol("序列",1)and Do(395)and ClearGrid("解释")and RecalcGrid("解释")and OpenGrid("解释")and OpenWindow(1,(screenwidth - 819)/2,(screenheight-644)/2) And SetVariable("%col%",1) And Eval("SetCellText(Grid,1,[%col%],"""+Substitute([%a%],"|",""") And SetVariable(""%col%"",[%col%]+1) And SetCellText(Grid,1,[%col%],""")+""")")

通过上述设置后，感觉养眼一些，个人意见仅供参考。

8楼

gaoqr 发表于：2006/9/12 19:52:00

谢谢！

9楼

dongd1 发表于：2006/9/13 16:39:00

下面引用由czy在 2006/09/12 01:24am 发表的内容：
刚才没事，仔细看了一下东东的大作，的确不错，想不到易表还能做出这些有意思的东东。
易表在处理图片存在一些欠缺，比如闪动很大，加上多窗口切换更觉得眼花缭乱，刚才有个想法不知妥否。
删除解释表所有列的刷 ...

谢谢老师指教，窗口切换意在实现动画功能，不过确实不雅闪的利害，我现在出差在外，回去按照老师的方法修改修改！！
谢谢，czy老师！！
呵呵！

10楼

dongd1 发表于：2006/9/15 16:22:00

czy老师真是高明，学生佩服，学习学习，现在把老师改过的文件传上来大家分享！管理员密码：888
RAR文件下载

共13 条记录, 每页显示 10 条, 页签: [1] [2]