Pasar Informe De Rave Report A Pdf

[belpab]

Hola muy buenas:

Os comento a ver si alguien puede ayudarme. Tengo hecho un report en Rave Report al cual llamo desde delphi, hasta ahí todo normal. El problema es que necesito pasar ese listado a un archivo PDF y que eso sea transparante al usuario y despues enviar este archivo por Email. Y ahi es donde tengo el problema, no se como hacer este proceso transparente al usuario.Si alguien pudiera ayudarme le estaria agradecido, llevo varios dias intentando buscar ayuda sobre este tema y la verdad es que no he encontrado mucha ayuda sobre Rave Report y Delphi.. Tengo la version Delphi 2006 y Rave Report BE 6.5 por si os sirve de algo.

Gracias de antemano y un saludo

[belpab]

YA HE CONSEGUIDO GENERAR EL FICHERO EN PDF DE FORMA TRANSPARENTE. POR SI HAY ALGUIEN QUE LE INTERESE COMO OS DEJO EL CODIGO

Código Delphi [-]
  RSpresup.DefaultDest := rdFile;
  RSpresup.DoNativeOutput := false;
  RSpresup.RenderObject := RRPDFPEDIDOS;
  RSpresup.OutputFileName := 'C:\test1.pdf';
  RSpresup.SystemSetups := RSpresup.SystemSetups - [ssAllowSetup];
  RPPresup.Engine :=RSpresup;
  RPPresup.ProjectFile :='TWebCom.rav';
  RPPresup.open;
  RPPresup.SelectReport('PRESUPUESTO',true);
  RPPresup.Execute;
  RPPresup.close;

LO UNICO ES QUE AHORA AL HACER RPPresup.Execute; ME DA EL ERROR DE QUE O PUEDE ESCRIBIR EL FICHERO PORQUE ESTA EN USO POR OTRA APLICACION Y LA VERDAD ES QUE NO SE QUE APLICACION. ALGUIEN ME PUEDE DECIR QUE ME FALTA O SOBRA.

GRACIAS. UN SALUDO

[[kuan-yiu]]

Supongo que es una errata al copiarlo al foro pero en RPPresup.ProjectFile te falta la comilla inicial.

[belpab]

es una error, ya esta corregido

[[kuan-yiu]]

Yo utilizo un sistema similar y cuando me da ese error siempre es debido a que el fichero de salida (en tu caso 'C:\test1.pdf') está abierto o bloqueado. Revisa que no se esté ejecutando el Acrobat.

[belpab]

no, no hay nada abierto relacionado con el PDF. es como si lo crease,porque me lo crea, aunque corrupto, pero no pudiera volcar el contenido del informe en el fichero

[[kuan-yiu]]

Antes de seguir aclara qué estás usando, las versiones y nombre de todo.

[*Caro*]

Hola belpab, lo que yo hago para generar el reporte pdf, es lo siguiente:

Código Delphi [-]
Uses
 SyncObjs
var
  GRaveLock: TCriticalSection; //

.......................................

var
  FilePdf: string;
begin
  RVProject1.ProjectFile := ExtractFilePath(Application.ExeName) + 'Reporte.rav';
  RvSystem1.DoNativeOutput := false;
  RvSystem1.RenderObject := RvRenderPDF1;

  FilePdf := 'Reporte.pdf';

  RvSystem1.OutputFileName := 'C:\' + FilePdf;

  GRaveLock.enter;
  try
    RvProject1.ExecuteReport('Reporte');
  finally
    GRaveLock.leave;
  end;

................................

initialization
  GRaveLock := TCriticalSection.Create;

finalization
  GRaveLock.Free;
end.

y las propiedades que toco en tiempo de diseño son:

RvProject
Engine -> RvSystem1

RvSystem
DefaultDest -> rdFile
SystemOptions -> todo lo pongo a false
SystemSetups->ssAllowSetup->False

RvRenderPdf
UseCompression -> True

lo hago de esa forma y me genera el pdf, espero se entienda porque no soy muy buena para explicar.

Saluditos

[belpab]

Gracias a todos por la ayuda. con el codigo de Caro me ha funcionado perfectamente. Te debo una . Ciaaaaooo