使用CopyFile功能时出错

Question

您好我CopyFile在Delphi 5中使用该函数.但该文件未被复制到目标.我也无法看到错误.了解CopyFile失败原因的最佳方法是什么？

if CopyFile(source, dest, false) then
  ShowMessage('Success')
else
  ShowMessage('Error');

我总是得到显示错误.:(

Answer 1

如果函数失败,您可以获取扩展错误信息,调用 GetLastError 方法或使用RaiseLastOSError方法.

检查此样本

  try
    If copyFile(source , dest,false) then
     ShowMessage('Success')
    else
     RaiseLastOSError;
  except  on E: Exception do
     showMessage(Format('Error executing copyFile %s',[E.Message]));
  end;