我在从我的 Delphi 程序写入 Windows 7 中的映射网络驱动器 (P:) 时遇到了一些问题。例如,当我尝试时ForceDirectories('P:\test\folder')
,我得到一个错误(找不到路径)。
我曾尝试在代码 ( ForceDirectories('\\computername\share\test\folder')
) 中输入 UNC 路径,这很有效。但是,ExpandUNCFileName('P:\')
似乎不起作用;它返回'P:\'。在 Windows XP 上,ExpandUNCFileName('P:\')
返回 UNC 路径。
如何在 Windows 7 上的 Delphi 中获取 UNC 路径,或者写入映射的网络驱动器?
经过进一步调查,好像我在 Windows 中缺少某种初始化。我有另一个使用TcxShellComboBox
(DevExpress 组件)的应用程序(app2)。导航到 P: 在该组合框中,在 app2 中,调用以ExpandUNCFileName
在第一个应用程序中正常工作。与FileExists
P: 下的文件相同,在 app2 中导航到 P: 之前返回 False,在计算机重新启动之后和直到计算机重新启动之前返回 true。