● 怎样复制文件 - 荔园在线 | 深圳大学学生论坛,荔园晨风BBS,深大在线网站

荔园之美，在春之萌芽，在夏之绽放，在秋之收获，在冬之沉淀

发信人: hellrock (地狱乐队I~地狱之王), 信区: Multimedia
标  题: 怎样复制文件
发信站: BBS 荔园晨风站 (Mon Dec 18 17:18:58 2000), 转信

发信人: hellrock (地狱乐队I~地狱之王), 信区: MultiMedia
标  题: 怎样复制文件
发信站: BBS汕头大学郁金香站 (Sun Dec 17 06:00:03 2000), 转信

怎样复制文件？
    有好些个方法，下边给出具有代表性的两种：
1.    后台复制
从Winapi.U32或Winapi.UCD中载入函数CopyFile，函数说明如下：
CopyFile( LPCSTR lpExistingFileName, LPCSTR lpNewFileName, BOOL bFailIfExist
s )
参数一LPCSTR lpExistingFileName：源文件名（包含具体路径），
参数二LPCSTR lpNewFileName：目标文件名（包含具体路径），
参数三BOOL bFailIfExists：如果目标文件已存在，是否覆盖；取值为0（覆盖）或1（
不复制文件）。
由于这种方式进行的是后台复制，我们看不到动态的复制过程；而且，是否覆盖原有
文件，只能在程序中预先设定，用户不能自主选择决定。如果你需要动态的展示复制过
程，并不是非得绞尽脑汁自己编程去实现进度计数器以及复制文件时象征文件的纸片从
一个文件夹飞到另一个文件夹的动画，直接调用Windows系统的复制功能就可以了。请试
一试下边的方法。
2. 动态的展示复制过程
使用Scripting Xtras 自定义函数包Tmstools.x32，可以调用Windows系统的复制功能、
从而动态的展示复制过程（作品发布时，必须将Scripting Xtras 自定义函数包Tmstoo
ls.x32以及Tms_tool.dll发布到作品主文件所在目录下的Xtras子目录中）。如果你手头
上没有Tmstools.x32以及Tms_tool.dll，可以单击带下划线的超链接，立即下载其试用
版。将Tmstools.x32以及Tms_tool.dll复制到Authorware所在目录的Xtras子目录中，启
动Authorware，你会发现函数列表框里增加了一类Xtra tmsTools函数。
这里，我们只需用到其中一个函数——tMsCopyFile，说明如下：
tMsCopyFile(windowHandle, Source, Destination, Visible, Confirmation)
参数一windowHandle：即Authorware作品窗口的句柄。
参数二Source：源文件名（包含具体路径）。
参数三Destination：目标文件名（包含具体路径）或目标文件路径。
参数四Visible：动态复制过程窗口是否可见，取值为0（不可见）或1（可见）。
参数五Confirmation：如果目标文件已存在，覆盖之前是否提示用户确认或取消覆盖,取
值为0（不提示）或1（提示）。
下边的代码，是一个展示动态复制过程的文件复制例子：
Visible:=1
Source:="f:\\folder\\ Source.exe"
Destination:="i:\\"
Confirmation:=1
tMsCopyFile(WindowHandle, Source, Destination, Visible, Confirmation)

?
--
魔岩设计工作室-Rock Studio*[0

※ 来源:·BBS 荔园晨风站 bbs.szu.edu.cn·[FROM: bbs.stu.edu.cn]

荔园在线首页友情链接：深圳大学深大招生荔园晨风BBS S-Term软件网络书店