Ver Mensaje Individual
  #2  
Antiguo 08-08-2007
M. FM. M. FM. is offline
Miembro
 
Registrado: ago 2007
Posts: 37
Reputación: 0
M. FM. Va por buen camino
Seguimos...

Bueno, he decidido olvidarme de los eventos del report y ahora estoy intentando definir el orden de las páginas desde Delphi. El nuevo problema que tengo es un "Access violation".

He probado con dos formas distintas.
La primera:

Código:
if RvPageList = nil then
   RvPageList := TRaveComponentList.Create;

RvPageList.Add(RvProject.FindComponent('MiReport.Page1') as TRavePage);
if m_Segunda = '1' then
RvPageList.Add(RvProject.FindComponent('MiReport.Page2') as TRavePage);

RvProject.ProjMan.ActiveReport.PageList := RvPageList;
RvProject.Execute;
RvProject.Close;
Este código me da un error al ejecutar el report.

La segunda:
Código:
RvProject.SelectReport('MiReport', true);
RvPage1 := RvProject.FindComponent('Page1') as TRavePage;
RvPage2 := RvProject.FindComponent('Page2') as TRavePage;
 if m_Segunda = '1' then
    RvPage1.GotoPage := RvPage2;
RvProject.Execute;
RvProject.Close;
De este modo, el error lo tengo en el GotoPage: Exception class EAccessViolation with message 'Access violation at address 0065166F in module 'Ventas.exe'. Write of address 000000A0'.

He probado tanto definiendo los GotoPage en Rave también como sin definirlos, y el resultado es el mismo.

¿Alguna idea?

Gracias,
M.

Última edición por M. FM. fecha: 08-08-2007 a las 13:40:03.
Responder Con Cita