使用Gnostice PDFToolkit VCL批量签名PDF仅首个成功后续报错求助

你的代码中导致第二份PDF签名失败的核心问题是第一次循环时销毁了gtPDFDocumento对象，后续循环中访问空指针，同时还有其他潜在问题，具体分析如下：

核心错误点 #

• 在第一次循环的try块末尾执行了FreeAndNil(gtPDFDocumento);，这会彻底销毁gtPDFDocumento对象，使其变为空指针。第二次循环时调用gtPDFDocumento->LoadFromFile会触发空指针访问错误，直接进入catch块。
• 冗余操作：FileListBox1->Selected[i] = true;对PDF签名逻辑没有实际作用，可以移除。
• 文件名拼接风险："firmado."+FileListBox1->Items->Strings[i]如果原文件包含路径（如C:\files\doc.pdf），会生成无效路径（firmado.C:\files\doc.pdf），导致保存失败。

修复后的代码示例 #

for(int i=0; i<FileListBox1->Items->Count; i++){
    String originalPath = FileListBox1->Items->Strings[i];
    if(FileExists(originalPath)){
        try{
            // 每次循环重新创建gtPDFDocumento对象
            gtPDFDocumento = new TgtPDFDocumento(this);
            
            gtPDFDocumento->LoadFromFile(originalPath);
            gtPDFDocumento->AddSignature("firma.pfx", "pass", Now(), "texto", "Toledo", "925.28.39.50", 2 , "Firma Digital IACLM", gtRect(365, 935, 760, 990), LDisplayOptions, c, FT);
            
            // 生成合法的输出路径：在原文件所在目录下给文件名添加前缀
            String outputPath = ExtractFilePath(originalPath) + "firmado_" + ExtractFileName(originalPath);
            gtPDFDocumento->SaveToFile(outputPath);

            // 销毁当前对象，避免内存泄漏
            FreeAndNil(gtPDFDocumento);
        }
        catch(Exception *e){
            ShowMessage("Ha ocurrido el error: "+e->Message+", avise a infórmatica.");
            ShowMessage("Error. No se ha podido firmar la liquidación, hable con informática.");
            // 若对象已创建，销毁后再返回
            if(gtPDFDocumento) FreeAndNil(gtPDFDocumento);
            return;
        }
    }
    else{
        ShowMessage("Error. No se encuentra el PDF, hable con informática.");
        return;
    }
}

替代优化方案（复用对象） #

如果gtPDFDocumento是全局/窗体级对象，可复用避免重复创建销毁，只需每次循环前重置状态：

// 循环外初始化一次对象
gtPDFDocumento = new TgtPDFDocumento(this);

for(int i=0; i<FileListBox1->Items->Count; i++){
    String originalPath = FileListBox1->Items->Strings[i];
    if(FileExists(originalPath)){
        try{
            gtPDFDocumento->Reset(); // 重置文档状态，清除上一次内容
            gtPDFDocumento->LoadFromFile(originalPath);
            // ... 签名、保存逻辑同前 ...
        }
        catch(Exception *e){
            // ... 错误处理 ...
            return;
        }
    }
    // ... 其他逻辑 ...
}

// 程序结束时统一销毁对象
FreeAndNil(gtPDFDocumento);

额外注意事项 #

• 确保firma.pfx文件路径正确，每次签名时能正常读取；若存在文件锁定问题，可检查组件是否自动释放文件句柄。
• 若LDisplayOptions、c、FT等变量是单次初始化的全局变量，需确认其状态不会在多次签名间被破坏。

内容的提问来源于stack exchange，提问作者Fco. Javier Bermejo Cogolludo