主题:  system tool 测试报告

南山东篱摄螂

职务:普通成员
等级:4
金币:10.0
发贴:1840
#12000/12/9 22:19:50
system tool xtra 测试报告
测试环境:操作系统:WINME AW5.2
system tool xtra 是一人可以支持AW和DR和xtra。主要功能有:

创建目录、取得当前目录、系统目录、windows安装目录、删除目录
取得光驱盘符、取得所有盘符、取驱动器的类型、磁盘剩余空间、检测光驱内是否有盘。
读取和设置各种环境变量。
对文件的拷贝、删除、移动、改名、设置属性。和检测文件是不存在。
装入和删除字体
关闭应用程序的窗口
对INI文件的操作
打开其它程序(可以带参数调用)、打开URL和E-mail地址
操作windows的注册表(读、写和创建)
调用windows的对话框,如:目录浏览对话框、打开和保存对话框、还有各种消息框(messagebox)

以上是只是介绍了它的主要功能。
下面是部分功能比较详细的介绍,由于时间关系没能写完全部,有兴趣的朋友可以下载一个回去研究,把全部的功能补写上。
你可以到 www.mediashoppe.com 去下载。(不保证能用多久和用多少!)
也可以到我的网站上下载 http://acphnsdl.at.china.com/download/systool.zip(好像不支持多线程下载!)


tMsGetEnvironmentStrings()
功能:
分别返回环境变量的字符串序列
返回值举例:
TMP=C:\WINDOWS\TEMP
PROMPT=$p$g
winbootdir=C:\WINDOWS
语法:
Authorware Xtra:
Result := GetEnvironmentStrings()


MsGetEnvironmentVariable(VariableName)
功能:
返回指定的环境变量
参数:
变量名
例如
prompt,TMP,TEMP,PATH等
返回值:
字符串
Authorware Xtra:
Result := GetEnvironmentVariable("VariableName")
example:
Result := tMsGetEnvironmentVariable("prompt")
返回环境变量prompt的值


tMsSetEnvironmentVariable()
功能:
设置指定的环境变量
参数
环竟变量名
VariableName    (ex. "TMP").
value (ex. "C:\TEMP")
返回值:
成功返回 1
失败返回 -1
语法和举例:
Result := tMsSetEnvironmentVariable("VariableName", "value")
example:
Result := tMsSetEnvironmentVariable("TMP", "C:\\TEMP")


Result := tMsLaunchURL("URL")
链接到相对应的网址
例子:
Result := tMsLaunchURL("www.5dmedia.com")
Result := tMsLaunchURL("mailto:dongyingmo@yeah.net")


Result := tMsReadIniInteger("filename", "Section", "item", value)
读取ini配制文件的内容中的整数
filename:配制(ini)文件的文件名
section :项名,就是用"[]"括起的东西
item:项目名
value:项目值,缺省值,如果没有这个项目就返回这个值。
例子
Result := tMsReadIniInteger("win.ini", "windows", "KeyboardSpeed", 31)
Result := tMsReadIniString("filename", "Section", "item", "default")
Result := tMsReadIniString(FileLocation^"test.ini", "wade", "test", "")
Result := tMsWriteIniString("filename", "Section", "item", "value")
向 INI 文件写入项目的值,
filename: INI 文件的全路行和文件名,如果不带路径,则写到 windows 的安装目内.
section: INI 文件中的项名,就是用"[]"括起的东西。
item: 项目名
value:项目值,可以是整数和字符串
返回值是成功写入的字符串或整数值
如果要写入的项目或文件不存在则自动创建,如果已有则自动修改。

例子
Result := tMsWriteIniString(FileLocation^"test.ini", "NSDL", "programmer","东影默")
运行结果是:
[NSLD]
programmer=东影默

Result := tMsWriteIniString(FileLocation^"test.ini", "收入", "十一月","3245")
运行结果是:
[收入]
十一月=3245



城市孤星

职务:普通成员
等级:4
金币:10.0
发贴:1785
#22000/12/10 10:03:42
东东兄的速度挺快的吗!我先发些简单的上来!

tMsGetCDDrive()
检测系统光驱的盘符。
例:a=tMsGetCDDrive()

tMsBrowseFolder(windowHandle, "Caption", "Title", "StartFolder")
查看路径。
例:tMsBrowseFolder(WindowHandle, "打开", "文档","d:")
说明:StartFolder如果是当前盘则直接进入当前路径!其它盘符则只能打开跟目录。

tMsToolVer()
显示本插件的版本号。
例:a:=tMsToolVer()

tMsGetCurrentDir()
显示当前路径!
例:a:=tMsGetCurrentDir()

tMsGetDriveList()
显示本计算机所有的驱动器符
例:a=tMsGetDriveList()

tMsMessageBox(windowHandle, "MessageText", "CaptionText", "iButtons", "Icon", DefaultButton)
弹出窗口
例:tMsMessageBox(windowHandle, "警告!本操作将改写数据", "警告框", "iButtons", "Icon", DefaultButton)

tMsLaunchURL("URL")
打开链接
例:tMsLaunchURL("http://10.105.101.11")
说明:跟东东的有点区别!可以用来做超链接

tMsKillWindow(windowHandle, ShowWindow)
退出程序
例:tMsKillWindow(windowHandle, ShowWindow)
说明:还未详细测试

tMsGetWindowsDir()
显示操作系统安装目录
例:a=tMsGetWindowsDir()

tMsGetSystemDir()
显示操作系统的SYSTEM目录
例: a=tMsGetSystemDir()

搞了半天也没什么新意吗!



bear_5d

职务:普通成员
等级:2
金币:1.0
发贴:328
#32000/12/10 10:14:55
老猫,我现在还没有收到呢?55555555555555555555555555555555555555555555555555555555555555555555555555555555555555555555555555555555555555555555555555555555555555555555555555555555555555555555555


我想…… 我做…… 我是…… 我努力,我飞翔……