检测目录是否是Delphi中的联结

Question

我一直在谷歌搜索这个我可能有一些脑云，因为它不起作用。

我需要检测文件夹是否是一个联结，这样我的递归文件搜索就不会进入无限循环。

我可以使用像

这样的简单函数

IsJunction(attr: dword): boolean; 

其中attr是来自TWin32FindData的dwFileAttributes;

我似乎无法让它发挥作用。谢谢！

Answer 1

dwFileAttributes的{​​{1}}没有该信息，您必须查看TWin32FindData字段。请参阅documentation。

dwReserved0

Answer 2

您还可以尝试使用JCL（JEDI代码库）JclNTFS单元 它有一些处理交叉点的方法，例如：
NtfsIsFolderMountPoint / NtfsGetJunctionPointDestination。