Modificacion de informe Rave

[PTW]

He probado el ejemplo que viene en la pagina de nevrona

http://www.nevrona.com/rave/tips/rvtip15.html

de un ejemplo de como acceder a los componentes de Rave desde Delphi, pero a mi no me funciona. Me da un error en tiempo de ejecucion "EAccessViolation....."

¿Como puedo modificar el contenido de una imagen de Rave, desde Delphi?

Muchas gracias

[Julià T.]

del código en cuestión:

Código Delphi [-]
    
  uses
    RVClass, RVProj, RVCsStd;

  var
    MyPage: TRavePage;
    MyText: TRaveText;

  begin
    RaveProject1.Open;
    With RaveProject1.ProjMan do begin
      MyPage := FindRaveComponent('Report5.Page2',nil) as TRavePage;
      MyText := FindRaveComponent('Text3',MyPage) as TRaveText;
      MyText.Text := 'Some Text';
      MyText.Color := clGreen;
    end; { with }
    RaveProject1.ExecuteReport('Report5');
    RaveProject1.Close;
  end;

deberás tenre en cuenta:

1. asignar el RaveProject1 a un fichero con reportes
2. debe existir un reporte 'Report5'
3. debe existir una página 'Page2' en el reporte anterior
4. debe existir un campo de texto 'Text3' en la página anterior

[PTW]

Si, tuve en cuenta todas esas cosas y me sigue saliendo el mismo error

En mi caso. tengo un reporte que se llama "InformeVentaEsc.rav" que contiene una sola pagina.

Por lo tanto mi codigo que da de la siguiente manera

begin
RvProject1.Open;
With RvProject1.ProjMan do begin
MyPage := FindRaveComponent('ImpresionVentaEsc.Page1',nil) as
TRavePage;
MyText := FindRaveComponent('Text3',MyPage) as TRaveText;
MyText.Text := 'Some Text';
MyText.Color := clGreen;
end; { with }
RvProject1.ExecuteReport('ImpresionVentaEsc');
RvProject1.Close;
end;

He creado un Text component al que le he puesto como nombre Text3, pero no me funciona.

¿Fallo en algo?

He visto que, en Rave, cada componente posee unos Eventos OnBeforePrint, OnAfterPrint. OnBeforeReport, OnAfterReport. En el codigo de uno de estos eventos he intentado modificar el valor de una propiedad de un componente Bitmap:

"Bitmap1.image.loadfromfile('c:\datos\foto\foto1.bmp');

pero, al compilarlo, me dice que no sabe lo que es "image".

Alguien me echa un cable??

[PTW]

Tambien lo he intentado mediante

Bitmap1.image:='c:\datos\foto\foto1.bmp';

y me sigue fallando. ¿Como se accede a las propiedades de los componentes en Rave? ¿Igual que en Delphi (NombreObjeto.Propiedad)?


Mi gran problema es que quiero modificar el contenido de una foto de un informe en tiempo de ejecucion. Tras ver que no doy con la tecla para conseguirlo, estoy pensando en intentarlo mediante FastReport ¿Es tan complicado tambien con FastReport?

Salu2

[Julià T.]

prueba el siguiente código, con lo que podras ver donde falla

Código Delphi [-]
begin
  RvProject1.Open;
  With RvProject1.ProjMan do
  begin
    MyPage := FindRaveComponent('ImpresionVentaEsc.Page1',nil) as TRavePage;
    if MyPage <>nil then
    begin
      MyText := FindRaveComponent('Text3',MyPage) as TRaveText;
      if MyText<>nil then
      begin
       MyText.Text := 'Some Text';
       MyText.Color := clGreen;
      end
      else Showmessage('no esxite el campo de texto Text3');
    end
    else Showmessage('no esxite el report ImpresionVentaEsc o la página Page1');

  end; { with }
  try
   RvProject1.ExecuteReport('ImpresionVentaEsc');
  except
   Showmessage('no esxite el report ImpresionVentaEsc');
  end;
  RvProject1.Close;
end;

El componente bitmap del rave tiene una propiedad que se llama FileLink donde puedes utilizar el nombre del fichero 'C:\...'

[PTW]

El mensaje que sale es que no existe "ImpresionVentaEsc o Page1", osea, k el valor de MyPage=NIL

He revisado que exista el nombre del fichero (por si ,por descuido, estaba mal escrito), y esta correcto. Esta ubicado en la misma carpeta donde esta mi aplicacion en Delphi

He visto que el componente Page1, esta dentro de un Report1. he hecho un:

with RVProject1.Projman do

MyReport := FindRaveComponents('ImpresionVentaEsc.Report1,nil) as TRaveReport
if Myreport<>nil then
.....
.....
else showMessage('No existe Report1)

y me dice que "No existe Report1"

¿donde puede estar fallando?

Te agradezco enormemente el interes que estas poniendo en intentar ayuudarme. Muchas gracias

[javiermorales]

Prueba a poner tu reporte en c:\