|
L005- Case指令在Director中的应用
来源：
|
|
|
|
Director中的应用
您知道在Director中如何应用到判断吗 其实很容易 利用If厎then厎应该可以将程式写得不错 但Director中有另一个指令更好用 也蛮适合做判断 它就是 Case
多媒体的设计多半以滑鼠做为交谈的工具 但其实许多设计者忘记了键盘的用处 键盘其实有很大的用处 例如离开程式的功能 我们可以设计一个快速键 利用按键q或Q做为离开程式之用 只要有下列一小段指令就可以达到功能了
On keyDown
if (the key = "q") or (the key = "Q") then
quit
end if
end keyDown
但如果以Case来改写 就可以写成如下的格式
On keyDown
Case (the key) of
"q", "Q" : quit
end case
end keyDown
应用Case的好处是可以将许多类似的功能收集在一起 例如我们可以增加二个按键 "m"与"M"键表示回到主画面 "b"与"B"键表示回到上一页 "n"与"N"键表示跳到下一页 整个程式可以改写为如下
On keyDown
Case (the key) of
"q", "Q" : quit
"m", "M" : go to frame "Main"
"b", "B" : go to marker(-1)
"n", "N" : go to marker(+1)
"q", "Q" : quit
end case
end keyDown
或者如下的格式也可以
On keyDown
Case (the key) of
"q", "Q" : quit
"m", "M" : go to frame "Main"
"b", "B" : go previous
"n", "N" : go next
"q", "Q" : quit
end case
end keyDown
最後加上警告使用者按错键的功能 如下
On keyDown
Case (the key) of
"q", "Q" : quit
"m", "M" : go to frame "Main"
"b", "B" : go previous
"n", "N" : go next
"q", "Q" : quit
otherwise beep
end case
end keyDown
以上的应用不知能否让您感受到Case的好用之处
曾安德 编著
欢迎指教 ante@ms14.hinet.net
更新日期 86.4.24
编辑： | |
| | |
|
