Ver Mensaje Individual
  #1  
Antiguo 13-08-2007
Avatar de MaMu
MaMu MaMu is offline
Miembro
 
Registrado: abr 2006
Ubicación: Argentina
Posts: 863
Reputación: 19
MaMu Va por buen camino
Problemas con Preview en Rave

Yo hago un Preview Form, de mi impresion, sin ningun tipo de problemas:

Código Delphi [-]
//El Query se encuentra abierto.
 
var
  NDRStream:  TMemoryStream;
begin
  NDRStream := TMemoryStream.Create;
  try
    RvProject1.open;
    RvProject1.SelectReport(reporte,true);
    RvProject1.SaveToStream(NDRStream);
    RvNDRWriter1.Stream:=NDRStream;
    RvProject1.Execute;
    RvRenderPreview1.Render(NDRStream);
    RvProject1.close;
    dxButton7.Click;
  except
    NDRStream.Free;
  end;
end;

Hasta ahi visualizo perfecto, imprimo perfecto y todo mas que bien. El proble ocurre cuando mi reporte excede de una pagina, y ocupa 2 o mas. Ya que, cuando hago el Preview de cualquier otra pagina, esta se muestra, pero sin el formato en que yo cree el reporte. Para avanzar y retroceder, hago lo siguiente:

Código Delphi [-]
//Avanzar
  RvRenderPreview1.NextPage;
  Label18.Caption:=IntToStr(RvRenderPreview1.CurrentPage)+'/'+IntToStr(RvRenderPreview1.Pages);
 
//Retroceder
  RvRenderPreview1.PrevPage;
  Label18.Caption:=IntToStr(RvRenderPreview1.CurrentPage)+'/'+IntToStr(RvRenderPreview1.Pages);

Lo hace sin problemas, pero el formato del Preview es desastrozo y no me respeta el de la primera hoja, por ejemplo, el tamaño de las letras, cambia.

Como puedo hacer para que me respete el formato? Me olvido de algo?

Saludos y Gracias
__________________
Código Delphi [-]
 
try 
ProgramarMicro(80C52,'Intel',MnHex,True);
except
On Exception do
MicroChip.IsPresent(True);
end;
Responder Con Cita