Guardar QuickReport en PDF

[PabloTech]

Empezado por MartinS

Hola:

Yo hago lo siguiente: suponiendo que tu Tquickrep se llame conjunto cuando quieres tener una vista preliminar haces

Código Delphi [-]
Conjunto.Preview;

Para imprimir directamente haces

Código Delphi [-]
Conjunto.Print;

y para lo que tu consulta debes hacer:

Código Delphi [-]
Unit QRPDFFilt;
        ...
      
        Procedure TPGenInfoInstit.EmitirInforme
        Begin
        SaveDialog1.FileName := ConsInt.FieldByName('Apellidos').AsString+', '+
                                ConsInt.FieldByName('Nombres').AsString+'.pdf';
        SaveDialog1.Execute();
        Conjunto.ExportToFilter(TQRPDFDocumentFilter.Create(SaveDialog1.FileName+'.pdf') ); 
        end;

Saludos

Anduvo Perfecto... Gracias