如何使用CopyFileEx实现带进度条的文件复制功能(100分)

我发现CopyFileEx能实现带进度条的文件复制功能，可是到底怎么用呢？<br>我很菜，请各位讲得详细一点。<br>最好有源码。

为什么不用 &nbsp;SHFileOperation 呢？<br><br>看看这里 ： &nbsp;http://www.delphibbs.com/delphibbs/dispq.asp?lid=295419

用BlockRead 也不错啊

怕翻译的不好，就拿过来了。<br>The CopyFile function copies an existing file to a new file.<br>The CopyFileEx function provides two additional capabilities. <br>CopyFileEx can call a specified callback function each time a portion <br>of the copy operation is completed, and CopyFileEx can be canceled <br>during the copy operation.<br>使用这个函数，需要使用回掉函数，能够随时给应用程序提供拷贝进度，同时可以取消。<br>不错的，虽然使用BlockREad也能够做到。

我就是想知道回调函数的用法呀.