Delphi Berlin 10.1创建文件/文件夹OS X.

Question

如何通过delphi在OS X上创建文件/文件夹？ 我试图使用函数

System.SysUtils.FileCreate

并且

System.IOUtils.TDirectory.CreateDirectory

代码：

  if FileCreate('/var/folders/bla.txt') = INVALID_HANDLE_VALUE then
 raise Exception.Create('File already exists');

或

 `TDirectory.CreateDirectory('/var/folders/mydirdelete');`

无论如何，当我运行app时，我得到了

Exception EFileNotFoundException in module blprtl240.dylib at 0053AFAF.
The specified file was not found. 

即使我创建了文件夹。

有任何建议吗？

Answer 1

文档说FileCreate返回 INVALID_HANDLE_VALUE （ -1 ）表示发生了错误，这不仅意味着该文件已存在，例如它可能是许可被拒绝 ......等等。

如果给定路径无效或包含无效字符，则CreateDirectory会引发异常。

请改为尝试：

n_v, n_w = 2, 4
for v in range(n_v):
   for w in range(n_w):
        print('v=', v, 'w=', w)