Ver Mensaje Individual
  #15  
Antiguo 26-11-2007
chavi chavi is offline
Miembro
 
Registrado: jun 2003
Ubicación: Santiago
Posts: 13
Reputación: 0
chavi Va por buen camino
No se que hago mal

Esto es lo que hago al pulsar el botón de imprimir desde el Form que llamo a los que quiero unir. Saber que al imprimir uno a uno funciona correctamente desde aqui.
Puse el QrCompositeReport en este Form.

Veis algo que yo no vea?



procedure TFrmPolizas.TBtnImprimirClick(Sender: TObject);
var
Valores: tInifile;
ImprCGPolizas : String;
begin
Valores := TIniFile.Create('DatosGestion.ini');
ImprCGPolizas := Valores.ReadString('Polizas', 'Condiciones_Generales', '0');
Valores.Free;
// Procedimiento para cubrir valores
ImprimirPoliza;
QrCompositeReport.Reports.Clear;
QrCompositeReport.Reports.Add(FrmListPoliza.QRPoliza);
QrCompositeReport.Reports.Add(FrmCondicionesPoliza.QRListado);
QrCompositeReport.Preview;
end;


Gracias por todo

Chavi
Responder Con Cita