file - 创建文本文件以写入/添加几个图像名称

问题描述

我试图获取一个脚本来创建一个可以写入/添加图像名称的文本文件，但该功能 FileID = CreateFileForWriting(filename)不起作用，它表明已被其他进程使用我没有得到这个，这个功能是不是格式不正确或者是什么错了，thx

    Number Totaln
    totaln=countdocumentwindowsoftype(5)
    String filename, text
    Number fileID
    
    if (!SaveasDialog( "save text file as",getapplicationdirectory(2,0) + "Imagename.txt", filename))exit(0)
    
    fileID = CreateFileForWriting(filename)
    
    number i
    for(i = 0; i <totaln; i++)
    {
    image imgSRC
    imgSRC := GetFrontImage()
    string imgname=getname(imgSRC)
    WriteFile(fileID,"imgname")
    Result("imgname")
    }

标签： fileiodm-script

您的代码几乎没有问题，但如果您使用低级 API 进行文件 I/O，则需要确保关闭已打开或创建的文件。

你的脚本没有。因此，它恰好运行 1 次，但在重新运行时会失败（当文件仍被视为打开时）。

要解决它，你需要closefile(fileID)在最后。

（顺便说一句，如果您的脚本在打开文件后但在关闭文件之前退出或抛出，您会遇到同样的问题。）

但是，我强烈建议不要使用低级 API，而是使用文件流对象。它还提供了一个自动文件关闭机制，这样您就不会遇到这个问题。

执行您在脚本中执行的操作将被写为：

    void writeCurrentImageNamesToText()
    {
        number nDoc = CountImageDocuments()
        string filename
        if (!SaveasDialog( "save text file as",getapplicationdirectory(2,0) + "Imagename.txt", filename))   return
        number fileID = CreateFileForWriting(filename)
        object fStream = NewStreamFromFileReference(fileID,1)   // 1 for auto-close file when out of scope
        for( number i = 0; i <nDoc; i++ ){
            
            string name = GetImageDocument(i).ImageDocumentGetName()
            fStream.StreamWriteAsText( 0, name + "\n" ) // 0 = use system encoding for text
        }
    }
    writeCurrentImageNamesToText()

file - 创建文本文件以写入/添加几个图像名称

问题描述

解决方案

推荐阅读