Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Impresión
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

 
 
Herramientas Buscar en Tema Desplegado
  #6  
Antiguo 15-12-2005
onlytk onlytk is offline
Miembro
 
Registrado: oct 2005
Posts: 53
Poder: 19
onlytk Va por buen camino
Gracias a todos por responder, ... luego de checkear y analizar el codigo di con el error que estaba en el evento OnNeedData del quickReport, era alli donde ponia los datos de mi quickReport, a ser mostrados en el preview e imprimidos y me olvide de poner el Indice que utilizaba para poner los datos a 0.

Código Delphi [-]
procedure TfrmReportsDist.qrReporteNeedData(Sender: TObject;
  var MoreData: Boolean);
begin
 if IndexItem < strFromTo.Count then
    begin
        qrLabelPuntos.Caption := strFromTo.Strings[IndexItem];
        qrLabelDistancia.Caption := FloatToStr(extDistances[IndexItem]);
        Inc(IndexItem);
        MoreData := True;
    end
    else
    begin
     IndexItem := 0;    // Esta linea no existia y por eso no imprimia
     MoreData := False;
    end;
end;

por la linea IndexItem := 0; Al mostrar el Preview me mostraba normalmente y al querer imprimir como IndexItem se quedaba en un numero alto entonces se pasaba el evento indicando que no se necesitaban mas datos a mostrar.

Disculpen por quitarles el tiempo. Salu2.
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 01:52:35.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi