delphi - 使用 Delphi 查找目录中最旧文件的最快方法

Question

你好

我们有大量远程计算机，可以将视频捕获到磁盘驱动器上。每台摄像机都有自己独特的目录，任何一个磁盘上最多可以有 16 个目录。

我正在尝试查找磁盘上最旧的视频文件，但使用 FindFirst/FindNext比较文件创建日期时间需要永远。

有人知道在目录中查找最旧文件的更有效方法吗？我们从中央 HO 位置远程连接到电脑。

问候，彼得

--更新

谢谢大家的回答。最后我使用了以下内容。

1. 使用 windows.WNetAddConnection2 将驱动器(“w:”)映射到远程计算机
   //使用cmd.exe/c dir在远程计算机上执行dir
   //注意:驱动器号是相对于远程计算机的。 (psexec -w 参数)
2. psexec \\<IPAddress> -i /accepteula -w "c:\windows\system32" cmd.exe "/c dir q:\video /OD /TC /B > q:\dir.txt"
3. //读取“w:\dir.txt”的第一行以获取该目录中最旧的文件。
4. //使用 windows.WNetCancelConnection2 与远程计算机断开连接

Answer 1

您还可以尝试使用 FindExInfoBasic 参数使用 FindFirstFileEx，并在 Windows 7 或 Server 2008 R2 或更高版本上使用 FIND_FIRST_EX_LARGE_FETCH ， should improve performance .