Guardar Archivo

[roman]

Yo creo que a ti te hace falta un poco de descanso Tómate un respiro y reexamina el código y la pregunta que haces.

A ver, en ¿qué parte del código usas lo que devuelve el SaveDialog?

En estas dos líneas:

ChDir(ExtractFilePath(Guarda_Pdf.Filename));
Nom := Guarda_Pdf.FileName;

La primera es para cambiarte de directorio y la segunda para crear TQRPDFDocumentFilter quien recibe el nombre del archivo.

Pero estas dos cosas tú ya las tienes sin necesidad del SaveDialog.

Entonces úsalas directamente.

// Saludos