主题:  Authorware的另类用途

liurulin

职务:普通成员
等级:2
金币:3.0
发贴:339
#12005/2/21 10:18:08
一、用budapi.u32和MInputBox.u32轻松获取文件列表
经常看到有人要打印文件列表,方法很麻烦,其实用AW可以轻松实现
插入一计算图标:
wjj:=baGetFolder("", "请选择文件夹",0,"", 200,200 )
--弹出选择文件对话框 
kzm:=MojoInputBox("请输入你要查找文件的扩展名","",""
--弹出输入框 
liebiao:=baFileList(wjj,"*."^kzm)
--返回你需要的文件类型的列表
AppendExtFile(FileLocation^kzm^"文件列表.txt",liebiao)
--在当前目录创建一文本文件,内容为你所需要的文件类型列表


二、用binapi让有时间限制的共享软件永不过期
以老张的MJSAPI.U32为例(我这个的使用时间限制为2000年8月1日以前)
首先获取当前系统日期:
a:=Year
b:=Month
c:=Day
然后改变当前系统日期:
BNA_SetDate(2000,5,1)
中间你就可以使用有时间限制的软件了!!!如为方便,可直接用winexec等函数调用
最后要加一退出按钮:
BNA_SetDate(a,b,c)
quit()
要把时间改回来哎,我们都是文明人呀!
我用这种方法成功使用磨鉴工作室的MJSAPI.U32、类观察器、屏幕尺至今(这些可都是好东东呀!),没有任何问题^.^。[/size][font=宋体][/font][/b][b][size=5]

编辑历史:[此帖最近一次被 liurulin 编辑过(编辑时间:2005-02-21 10:47:27)]


与人同乐

职务:管理员
等级:6
金币:18.0
发贴:3928
#22005/2/21 10:43:36
不错,奖励金币1枚。不过文明人都要尊重知识产权啊
点编辑帖子图标就可以修改帖子。



liurulin

职务:普通成员
等级:2
金币:3.0
发贴:339
#32005/2/24 9:35:22
我这个只是抛砖引玉,希望大家跟进



阿州

职务:普通成员
等级:2
金币:10.0
发贴:447
#42005/2/24 17:15:28
呵呵 老张气冒烟了



liurulin

职务:普通成员
等级:2
金币:3.0
发贴:339
#52005/2/25 17:54:00
这不算盗版吧,我可没钱赔老张呀



lws2008

职务:普通成员
等级:1
金币:0.0
发贴:6
#62005/3/3 0:57:15