荔园在线
荔园之美，在春之萌芽，在夏之绽放，在秋之收获，在冬之沉淀
[回到开始]
[上一篇][下一篇]
发信人: hawkwolves (十一狼), 信区: Multimedia
标 题: 几个常用的变数与函数
发信站: BBS 荔园晨风站 (Sun Nov 12 03:04:44 2000), 转信
V001 - 几个常用的变数与函数
Random
number:=Random(min, max, units)
在min与max两个数值之间 产生一个乱数 其单位为units所指定的位数
Random(1, 10, 1)表示从1到10之间 产生一个整数的乱数
Random(1, 5, 0.1)表示从1到5之间 产生一个含一位小数的乱数
MouseDown
MouseDown
如果使用者按滑鼠的左方按键 此变数值为真
SoundPlaying
SoundPlaying
本变数值为真表示目前系统正在播放声音 否则为假
MoviePlaying
MoviePlaying
本变数值为真表示目前正在播映数位影片 它可以用於同步的控制 当影片正在播
映时 若设定此变数给一个声音对话方块中的Start Playing When TRUE栏位 表
示当影片开始播映时 就同时播放声音 结果就变成影片的配乐 可以省去重新编
辑影片的时间
Movable
Movable@"Icon Title"
当指定图示中的图形可以被移动 则本变数值为真 其最主要的用法是设定图形是
否可以移动 若设定其值为假 则无法移动图形 否则皆可以移动图形
FullDate
FullDate
完整的日期的名称 依照使用者所设定地区的格式为准
FullTime
FullTime
现在的时间 可以是12小时制或是24小时制显示 依照使用者於Windows
Control Panel的设定 以12小时制(4:55:56)或24小时制(16:55:56)显示时间
Quit
Quit(options)
依照 options 来跳离执行的动作 选项有下列三种
数字 结果
0 跳到程式管理员之下如果它是被主程式所乎叫 则会回到主程式中
1 跳到程式管理员之下
2 跳到 DOS 之下
EntryText
EntryText@"Icon Title"
在文字输入式交谈中 使用者所输入的字 在进入交谈时 变数就会马上被更新
而且每经过一个回应也会更新它的值
PresetEntry
PresetEntry
若在进入交谈之前 先给这个变数一个字串值 本变数之值会自动出现在使用者回
应的文字输入区域之内 使用者可以输入其它的文字即可 或者也可以修改
PresetEntry的文字 以输入日期为例 我们可以在进入交谈之前 先设定
PresetEntry的值为“民国 年 月 日” 所以使用者只要填入数字即可
IconTitle
string := IconTitle(IconID)
查询某个图示编号IconID所相对应的图示名称 如果直接在同一图示上使用此变数
则可以不需要引数 而变数的内容表示此图示的名称
GetLine
string := GetLine(string, n)
string := GetLine(string, n, m)
取得字串中第n行的字串 加入m引数表示取得第n行到第m行中间的字串 引数
delim则表示此字元为新的隔行字元（一般的隔行字元为Return）
DeleteLine
string := DeleteLine(string, n)
string := DeleteLine(string, n, m)
string := DeleteLine(string, n, m, delim)
删除原字串之第n行子字串 若加入m引数 则表示将原字串删除第n到m行 引数
delim则表示此字元为新的隔行字元（一般的隔行字元为 Return）
InsertLine
string := InsertLine(string, n, newstring)
string := InsertLine(string, n, newstring,delim)
将新字串插入原字串第n行之後 如果n为0 则新字串成为第一行 引数 delim则
表示此字元为新的隔行字元（一般的隔行字元为 Return）
GetWord
string := GetWord(n, string)
取得字串中第n个字 一般来说英文字以空白做为间隔 如果找不到则传回空白字
串
GetNumber
number := GetNumber(n, string)
字串中若含有数值 此变数表示取得字串中第n个数字的数值 如果找不到则传回
来的值为0
LineCount
number := LineCount(string)
number := LineCount(string, delim)
指定字串中的行数 但不包含最後的空白行 引数delim则表示此字元为新的隔行
字元 一般以Return为隔行字元 利用此函数delim功能 可指定特殊字元为隔行
字元 如TAB或逗点
ReadExtFile
string := ReadExtFile(filename)
读取指定的档案filename所有文字内容 并存成一个字串放在string变数中 但是
档案的内容 必须以 ASCII 的格式建立
WriteExtFile
WriteExtFile(filename, string)
number := WriteExtFile(filename, string)
将string写到filename文字档案中 但是与AppendExtFile 不太相同的是它会将原
来的文字覆盖 所以在使用WriteExtFile函数时 请特别注意 同样的 如果此文
字档案不存在 则系统会自动产生档案
AppendExtFile
AppendExtFile(filename, string)
number := AppendExtFile(filename, string)
将string加在文字档案的最後面 此函数与WriteExtFile不太相同 因为
WriteExtFile会产生档案 而AppendExtFile不会产生新档案 它只是找到档案
然後在档案最後将字串加上
如果找不到此档案名称 则系统会自动产生此档案 这是个很特殊的功能 如果想
要为新的使用者产生档案 直接使用这个功能即可
RecordLocation
RecordLocation
Authorware在执行的过程中会记录下一些系统的状态 此变数即表示系统记录
Record的路径位置 当使用者使用跳跃的功能时 A3W允许记录原来的状态 这个
记录的位置就是RecordLocation的位置 这个目录在安装A3W时 就会自动产生
FileLocation
FileLocation
指出目前执行中档案的路径位置 在引号中的字串特别要注意的地方是反斜线的写
法 在此地一定要多加上一个反斜线 因为这个符号在引号中有特殊的意义
SearchPath
SearchPath
指定外部搜寻档案的路径 在File Setup指令的对话方块之中 有个栏位含有搜寻
路径的位置 如果在栏位中输入搜寻路径後 SearchPath变数中的值就会与它相同
就是说变数的值即为栏位中的字串
Eval
result := Eval(expression)
result := Eval(expression, decimal)
result := Eval(expression, decimal,separator)
函数将会审视表示式expression 然後将结果值放置到result中 result将为一个
表示式 若表示式有任何的问题时 系统变数EvalStatus与EvalMessage将会存放
此值 若想要在表示式中放置指定值的式子时 请使用EvalAssign函数 後面的二
个引数decimal与separator可用来指定小数位的分隔字元与位数
EvalAssign
result := EvalAssign(expression)
result := EvalAssign(expression, decimal)
result := EvalAssign(expression, decimal, separator)
此函数与Eval大致相同 只是它主要用来做指定值之用
Test
Test(condition, true expression, false expression)
这个指令与if...then有异曲同工之妙 condition为判断式 若此判断式为真 则
执行true expression中的表示式或指令 否则执行false expression之中的表示
式或指令
UpperCase
string := UpperCase(string)
将字串中所有的小写字元改为大写字元
LowerCase
string := LowerCase(string)
将字串中所有的大写字元改成为小写字元
Capitalize
String := Capitalize(string)
String := Capitalize(string,1)
将指定字串中全部或第一个字母改为大写文字
Restart
Restart()
重新执行本程式
Checked
Checked@"Icon Title"
图示之中含有按钮时 若此按钮的状态为设定按钮中四种状态之一的结果时 本变
数的值将为真
JumpFile JumpFileReturn
JumpFile("filename")
JumpFile("filename", "variable1, ...")
JumpFile("filename","variable1,...","directory")
JumpFileReturn("filename")
JumpFileReturn("filename", "variable1, ...")
JumpFileReturn("filename","variable1,...", "directory")
表示呼叫 A3W 的程式 JumpFileReturn虽然也是呼叫另外一个程式 但是系统会
记得原呼叫的程式为何 当使用者离开被呼叫的程式时 就会回到原来的程式上继
续执行
如果想要与Quit函数配合使用 记得将Quit函数的参数设定为0
第二个引数主要是给程式中间传递之用 可以指定那几个变数需要传给被呼叫的程
式使用 这些变数就可以从原始的程式带到被呼叫的程式上
想要设定变数的名称时 有一个简便的方法 如果这些变数的名称都类似 则可以
配合万用字元 * 使用 所有符合的变数都会传到新的程式中
最後一个引数是设定记录record的目录 系统内定的目录为 Windows\A3w_data
可以改变这个目录 如果程式应用在网路上 使用者非常众多 这个引数就有必要
存在 因为您可以指定每一个使用者一个目录 这个目会储存此位使用者所使用程
式的过程 也就是记录档案会写在这个目录之中 如此当使用者开机时 就会读到
自己的记录档案
JumpOut JumpOutReturn
JumpOut("program")
JumpOut("program", "document")
JumpOutReturn("program")
JumpOutReturn("program", "document")
这二个函数的功能与JumpFile相似 但是它们所呼叫的不是A3W程式 而是任何其
它的程式 在program中所填入的就是这个程式的名称与路径位置
第二个引数document则是传给新程式的文件 如果您所呼叫的是一个Word程式 就
可以传给它一个文字档案 如此当Word开启後 也会同时开启这个文字档案 当呼
叫程式出现错误时 可以查询IOStatus IOMessage看看到底错误在何处
Round
number := Round(x, decimals)
以decimals来指定小数位数 然後将值以四舍五入的方式传回新的值
INT
number := INT(x)
将x去掉小数之後传回其整数值
Pi
Pi
圆周率 3.1415926536...
Return
Return
代表键盘上的Return字元
Tab
Tab
代表键盘上的Tab字元
ChoiceNumber
ChoiceNumber@"Icon Title"
回应交谈图示的图示代号 图示之编号从左而右由1开始计算
PressKey
PressKey("keyname")
本函数执行之後就好像使用者按了keyname之键一样
Key
Key
使用者所按的键名（包含功能键与数字键）
KeyNum
KeyNum
使用者所按的按键数值 Key代表的是字串 而KeyNum则为数值型式
PathPosition
PathPosition@"Icon Title"
若图示中的图形有指定的移动路径 则本变数值为图形所在路径上的位置
AllSelected
AllSelected@"Icon Title"
当决策图示中所有的子图示全部被选过後 本变数即为真 否则为假
PathCount
PathCount@"Icon Title"
决策图示中的子图示数目
PathSelected
PathSelected@"Icon Title"
决策图示中所分歧到子图示的位置（上一次所选到的位置） 位置以数目字表示
从左而右从数目字1算起
RepCount
RepCount@"Icon Title"
决策图示重覆执行的次数
SelectedEver
SelectedEver@"Icon Title"
如果变数中的图示曾被选到过 则变数为真
ClickX ClickY
ClickX
ClickY
ClickX为使用者按下滑鼠左键时 游标所在的萤幕横座标 ClickY表示使用者按下
滑鼠左键时 游标所在的萤幕纵座标
Initialize
Initialize()
Initialize(variable1,..., variable10)
将指定的所有变数回覆到其原来的初值 若使用指定变数 最多一次只可以使用
10个变数
曾安德 编著
--
┏━┳━┳━┳━┳━┳━┳━┳━┓
┃当┃你┃你┃你┃去┃我┃我┃我┃ My e-mail: 11_wolf@163.net
┃了┃跟┃也┃没┃做┃手┃要┃不┃ My oicq: 40356
┃小┃在┃没┃有┃老┃敲┃把┃再┃
┃尼┃身┃有┃讲┃和┃木┃你┃烦┃
┃姑┃后┃哭┃话┃尚┃鱼┃忘┃恼┃
※ 来源:·BBS 荔园晨风站 bbs.szu.edu.cn·[FROM: bbs.szptt.net.cn]
[回到开始]
[上一篇][下一篇]
荔园在线首页 友情链接：深圳大学 深大招生 荔园晨风BBS S-Term软件 网络书店