Delphi调用WINDOWS的拷贝命令(拷贝 -> 复制)带动画的窗口正在复制用什么 API 函数

Question

   有谁用API函数实现该功能的，请告知我呀！
   为何不用Delphi来实现这个功能呢？

Answer 1

好象没有这个API，做个窗口，在上面放一个ANIMATE控件不就成了。

Answer 2

//这个函数拿去用，已经过测试，没问题
//AFileSrc：源文件(可以是一个或几个文件、或是通配符、或是目录名),
//AFileDes：目标文件或目录名
function ShellCopyFile(const AFileSrc, AFileDes: string): boolean;
var
  fo: TSHFILEOPSTRUCT;
begin
  FillChar(fo, SizeOf(fo), 0);
  with fo do
  begin
    Wnd := 0;
    wFunc := FO_COPY;
    pFrom := PChar(AFileSrc);
    pTo := PChar(AFileDes);
    fFlags := FOF_ALLOWUNDO;
  end;
  Result := (SHFileOperation(fo) = 0);
end;

Answer 3

忘了告诉你，需要 uses ShellAPI

Answer 4

谢谢zengyufeng
你的函数非常好用，原先我用ShellExecute()执行copy命令老不认带空格的目录和网络目录文件你的很好用谢谢高手。
我正在自己写一套办公自动化系统，有机会能交流交流吗？
我的Email：[email protected]
能与你交个朋友吗？
  我现在又遇到一个难题 就是想知道能否查找局域网上的某个机器是否在网上用什么函数
因我现在手头没有API函数的书所以有劳了，另外我想问一个是否可以运用象windows查找风上邻居的方法来得知网上用户是否已经在网上， 有类似的函数吗？
最好可以知道现有的网络用户表的函数
非常感谢！

Answer 5

想问一个是否可以运用象windows查找风上邻居的方法来得知网上用户是否已经在网上， 有类似的函数,这样的函数我有一个现成的程序,还可以根据计算机名称直接判断该计算机在不在网络上.我正在筹建一个OICQ上的Delphi联盟,我的号码:28922314,加我为好友或者告诉我你的号码,密码delphi联盟.