delphi模拟windows文件复制粘贴,根据