如何用易语言的进度条显示文件复制进度？

微信公开课小程序热门讨论「如何用易语言的进度条显示文件复制进度？」最新回复-注意所需控件有一个通用对话框dll命令dll命令：.版本2.DLL命令CopyFileExA,整数型,,CopyFileExA.参数lpExistingFileName,文本型.参数lpNewFileName,文本型.参数lpProgressRoutine,子程序指针.参数lpData,,传址.参数pbCancel.参数dwCopyFlags.DLL命令PathFindFileNameA,文本型,Shlwapi.dll,PathFindFileNameA.参数pPath,文本型代码：代码：.版本2.支持库shell.程序集窗口程序集1.子程序_按钮1_被单击.局部变量文件名,文本型文件名＝编辑框1.内容文件名＝PathFindFileNameA(文件名)详细信息请查阅MSDNwinntonly.如果真(编辑框1.内容≠“”且编辑框2.内容≠“”)CopyFileExA(编辑框1.内容,选择(取文本右边(编辑框2.内容,1)＝“\”,编辑框2.内容,编辑框2.内容＋“\”)＋文件名,&CopyProgressRoutine,0,0,1).如果真结束.子程序CopyProgressRoutine,整数型.参数TotalFileSize,长整数型.参数TotalBytesTransferred,长整数型.参数StreamSize,长整数型.参数StreamBytesTransferred,长整数型.参数dwStreamNumber,整数型.参数dwCallbackReason,整数型.参数hSourceFile,整数型.参数hDestinationFile,整数型.参数lpData,整数型进度条1.位置＝TotalBytesTransferred÷TotalFileSize×100若想百分比更精确，请转换成小数再除标签1.标题＝到文本(进度条1.位置)＋“%”处理事件()返回(0)返回0则继续复制.子程序_按钮2_被单击.如果真(通用对话框1.打开())编辑框1.内容＝通用对话框1.文件名.如果真结束.子程序_按钮3_被单击.局部变量目录,文本型目录＝浏览文件夹(“选择文件夹”,).如果真(目录≠“”)编辑框2.内容＝目录.如果真结束你可以直接复制代码到易语言调试。
注意所需控件有一个通用对话框dll命令dll命令：---------------.版本2.DLL命令CopyFileExA,整数型,,CopyFileExA.参数lpExistingFileName,文本型.参数lpNewFileName,文本型.参数lpProgressRoutine,子程序指针.参数lpData,,传址.参数pbCancel.参数dwCopyFlags.DLL命令PathFindFileNameA,文本型,Shlwapi.dll,PathFindFileNameA.参数pPath,文本型--------------------------------代码：--------------------------------代码：----------------------.版本2.支持库shell.程序集窗口程序集1.子程序_按钮1_被单击.局部变量文件名,文本型文件名＝编辑框1.内容文件名＝PathFindFileNameA(文件名)详细信息请查阅MSDNwinntonly.如果真(编辑框1.内容≠“”且编辑框2.内容≠“”)CopyFileExA(编辑框1.内容,选择(取文本右边(编辑框2.内容,1)＝“”,编辑框2.内容,编辑框2.内容＋“”)＋文件名,&CopyProgressRoutine,0,0,1).如果真结束.子程序CopyProgressRoutine,整数型.参数TotalFileSize,长整数型.参数TotalBytesTransferred,长整数型.参数StreamSize,长整数型.参数StreamBytesTransferred,长整数型.参数dwStreamNumber,整数型.参数dwCallbackReason,整数型.参数hSourceFile,整数型.参数hDestinationFile,整数型.参数lpData,整数型进度条1.位置＝TotalBytesTransferred÷TotalFileSize×100 若想百分比更精确，请转换成小数再除标签1.标题＝到文本(进度条1.位置)＋“%”处理事件()返回(0) 返回0则继续复制.子程序_按钮2_被单击.如果真(通用对话框1.打开())编辑框1.内容＝通用对话框1.文件名.如果真结束.子程序_按钮3_被单击.局部变量目录,文本型目录＝浏览文件夹(“选择文件夹”,).如果真(目录≠“”)编辑框2.内容＝目录.如果真结束你可以直接复制代码到易语言调试。 更多有关「如何用易语言的进度条显示文件复制进度？」的疑问请扫码关注微信公开课+小程序！了解更多