Generar un PDF con QReport pero, con restricciones de seguridad
 

Buenas, estoy haciendo que QReport me genere archivos PDF, lo hace bastante bien y no he tenido demasiados problemas en lograrlo. He aquí el código:

Código Delphi [-]
procedure TfrmGestionSumarios.btnEnviarPDFClick(Sender: TObject);
var
  i, m, nro:integer;
  iStr:string;
  direccionExportacion:string;
  aPDF:TQRPDFDocumentFilter;
  csumario:TMDOQuery;
  fecha:TDate;
begin
  if (gSumarios.RowCount > 2) then
  begin
    fecha:=dtFechaSumario.Date;
    aPDF:=nil;
    terminarTransaccion;
    try
      DataModule1.transaccion.StartTransaction;
      consultaSumario(gCodigo_Sucursal, fecha, DataModule1.qSumarios, 'A');
      csumario:=DataModule1.qSumarios;
      direccionExportacion:='C:\SUMARIO_HOY_CASACENTRAL';

      aPDF:=TQRPDFDocumentFilter.Create(direccionExportacion + '.pdf');
      aPDF.SetDocumentInfo('Boletín Oficial', 'Boletín Oficial', 'Sumario', 'Sumario integral');
      with TprnSumarioBoletin.Create(application) do
      begin
        fechaSumario:=dtFechaSumario.date;
        aINI:=archivoINI;
        qSumario:=csumario;

        tiraje:=txtTiraje.Text;
        nroEdicion:=txtNroEdicion.Text;
        fechaImpresion:=Fecha_Servidor;
        Sumario.ExportToFilter(aPDF);
        aPDF.Free;
        Free;
      end; //del with
      DataModule1.transaccion.Commit;
      Application.MessageBox(pchar('Exportación del Sumario a PDF exitosa.'
        + #13#10 + 'No olvide comprimir el archivo antes de enviarlo por Internet.'
        + #13#10 + 'Ubicación: ' + direccionExportacion + '.pdf'),
        'Exportación Sumario a PDF', MB_OK + MB_ICONINFORMATION);
    except
      on e:Exception do
      begin
        aPDF.Free;
        prnSumarioBoletin.Free;
        mErrores(e, '¡Sin exportación!', 'Exportación Sumario a PDF');
      end;
    end; //del try
  end
  else
  begin
     MessageBox(handle,'La Planilla está vacía.', 'Exportación Sumario a PDF',
      MB_OK + MB_ICONERROR);
  end; //del if (grDetPresupOp0.RowCount > 2) ...
end;

Lo que quiero ahora es implementar las medidas de seguridad de los PDF. Es lo que se llama en el cliente PDF "Propiedades del documento --> seguridad"
¿Cómo hago esto en Delphi?
Gracias.

Santiago.

¿Y el componente que estás utilizando(TQRPDFDocumentFilter) no tiene las opciones para hacerlo? ¿Has revisado las propiedades métodos que posee?

Si no las tiene deberás buscar algun otro componente que te permita hacerlo a posteriori; Tal vez en Torry puedas encontrar alguno; Revisa la lista a ver si alguno permite "añadir" la funcionalidad que necesitas.