采用线程方式拷贝文件(夹)Delphi使用自带的进度条显示进度

时间:2017-09-01 11:37:23
【文件属性】:

文件名称:采用线程方式拷贝文件(夹)Delphi使用自带的进度条显示进度

文件大小:170KB

文件格式:7Z

更新时间:2017-09-01 11:37:23

Delphi

采用线程方式通过进度条显示拷贝文件或者文件夹。由于进度条控件可能为第三方控件,该控件显示进度可以由TCopyThreadEx重新申明进度条为何种进度条(也就是非Delphi自带的默认进度条),申明方法具体参阅基类TThreadEx和TBaseThreadEx那些protected函数申明,只要在TCopyThreadEx重新申明关联新的进度条控件即可。编译环境:Delphi7,本例全部使用Delphi7默认控件。


【文件预览】:
Project1.~dpr
FileCopyEx.pas
ShareMemory.dcu
Project1.exe
Project1.res
Unit1.~dfm
Unit1.dfm
FileCopyEx.dcu
Unit1.ddp
Project1.cfg
ShareMemory.pas
Unit1.pas
ThreadEx.pas
ThreadEx.dcu
Unit1.~ddp
Project1.dpr
Project1.dof
Unit1.~pas
ThreadEx.~pas
Unit1.dcu
FileCopyEx.~pas

网友评论

  • 有点复杂,不适合新手
  • 还可以,但不是我想要的,不能实现同时对一个大文件夹复制到多个不同的地方。
  • 适合新手!!!
  • 本内容介绍了用多线程来做文件复制和进度条的移动,对未接触过多线程的人员有不错的入门帮助。
  • 不错的代码,可以用
  • 下载了个名为“7z“的文件,打不开?
  • 可以运行,有参考价值
  • 适合新手!!
  • 还不错,可以运行
  • 不能直接运行啊
  • 适合新手!!