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
  #1  
Antiguo 20-09-2011
Avatar de alej.villa
alej.villa alej.villa is offline
Miembro
NULL
 
Registrado: may 2011
Ubicación: Caracas, Venezuela
Posts: 76
Poder: 13
alej.villa Va por buen camino
Exclamation qrmemo problemas con QuickReport

Buenos dias estoy utilizando Delphi 7, manejador de base de datos MS SQL Server 2005,
y quickreport v3.0 la que viene por defecto con delphi 7
Mi problema es el siguiente hago una consulta sql en una tabla llamada
temporal para que me seleccione todos los datos y me los ordene a
conveniencia del usuario, para esto tengo 2 radiobuttons uno para ordenarlo
por numero de cedula y el otro para ordenarlo por lineas, y un boton que lo
llame vista previa que es donde coloco esta consulta SQL segun la
conveniencia del usuario si seleccionan para ordenarlo por cedula es este
codigo
Código SQL [-]
if Apellidos.Checked then       
begin         
dm.qLista.Close;         
dm.qLista.SQL.Clear;         
dm.qLista.SQL.Add('Select * FROM Temporal');         
dm.qLista.SQL.Add('Order by nombres ASC');         
dm.qLista.Open;           
while not dm.qLista.Eof do             
begin                 
qrLista.QRMemo1.Lines.Add(dm.qLista.fieldbyname('cedula').AsString);              
qrLista.QRMemo2.Lines.Add(dm.qLista.fieldbyname('nombres').AsString);              
qrLista.QRMemo3.Lines.Add(dm.qLista.fieldbyname('codigo_linea').AsString);              
qrLista.QRMemo4.Lines.Add(dm.qLista.fieldbyname('posicion').AsString);              
qrLista.QRMemo5.Lines.add(dm.qLista.fieldbyname('grupo').AsString);
 dm.qLista.Next;             
end;       
end;
si seleccionan para ordenarlo por linea es este
Código SQL [-]
if Linea.Checked then       
begin         
dm.qLista.Close;         
dm.qLista.SQL.Clear;         
dm.qLista.SQL.Add('Select * FROM Temporal');         
dm.qLista.SQL.Add('Order by codigo_linea ASC');         
dm.qLista.Open;           
while not dm.qLista.Eof do             
begin               
qrLista.QRMemo1.Lines.Add(dm.qLista.fieldbyname('cedula').AsString);                
qrLista.QRMemo2.Lines.Add(dm.qLista.fieldbyname('nombres').AsString);                
qrLista.QRMemo3.Lines.Add(dm.qLista.fieldbyname('codigo_linea').AsString);                
qrLista.QRMemo4.Lines.Add(dm.qLista.fieldbyname('posicion').AsString);              
qrLista.QRMemo5.Lines.Add(dm.qLista.fieldbyname('grupo').AsString);
 dm.qLista.Next;             
end;       
end;
el problema aparece cuando es mas de 1 hoja que debe imprimir, porque me imprime en la primera hoja todas las cedulas y en la 2da hoja todos los demas datos que serian: nombres, sexo, etc. adjunto un ejemplo para que vean como sale el reporte, gracias de antemano y ojala puedan ayudarme ya que tengo tiempo hechando cabeza con este error pero no logro llegar a la solucion
Imágenes Adjuntas
Tipo de Archivo: pdf lista.pdf (9,4 KB, 16 visitas)
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

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Problema con QRmemo del Quick Report joanajj Impresión 2 04-04-2008 23:43:59
Quickreport, qrmemo autostrech i qrdbtext align bottom rafa_adrim Impresión 1 05-06-2007 16:55:09
Ayuda con QRMemo itsi Impresión 1 03-04-2007 17:09:26
Justificar QrMemo purhé Impresión 0 18-07-2005 22:49:09
Qrmemo davidgaldo Impresión 1 28-04-2004 15:28:08


La franja horaria es GMT +2. Ahora son las 16:26:49.


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