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