Find centralized, trusted content and collaborate around the technologies you use most.
Teams
Q&A for work
Connect and share knowledge within a single location that is structured and easy to search.
我需要在 Delphi 中进行两次操作。
首先是读取目录并将所有文件复制到备份文件夹中。如果任何文件当前正在被写入和/或打开,则绕过该文件。
其次是将文件移动到另一个目录。同样,如果任何文件当前正在被写入和/或打开,则绕过该文件。
我以前使用过文件复制和移动,但我不确定如何检测文件是否正在写入和/或打开。
谢谢。
如果你使用 Windows.pas' CopyFile(PChar(sFrom),PChar(sTo),false),它会在复制失败时返回 false,并GetLastError返回一个错误代码来解释原因。
CopyFile(PChar(sFrom),PChar(sTo),false)
GetLastError