Qreport, soy novata!!!

[Elizabethdelphi]

Hola a todos aquellos que tienen una buena predisposicion para conmigo y se detienen a leer mis mensajes, y asi me brindan su ayuda...
Bueno voy a tratar de explicarme mejor, el sistemita que estoy tratando de realizar lo estoy codificando en delphi 6, las tablas estan hechas en paradox 7, y si creo que se entrelazan con bde.
Explico que tengo un qreport y los campos que necesito mostrar con los qrdbtext asociados con las propiedades correspondientes a cada campo(que seria el datafield) el en dataset no coloque nada, ya que si coloco una tabla me muestra datos pero no lo que yo necesito y si coloco el query no se en que propiedad ni como codificarlo. Ya que necesito que se muestre el ultimo campo guardado en el form. Chicos espero que puedan entenderme... Muchisimas gracias!!

[[felipe88]]

Empezado por Elizabethdelphi

Hola a todos aquellos que tienen una buena predisposicion para conmigo y se detienen a leer mis mensajes, y asi me brindan su ayuda...
Bueno voy a tratar de explicarme mejor, el sistemita que estoy tratando de realizar lo estoy codificando en delphi 6, las tablas estan hechas en paradox 7, y si creo que se entrelazan con bde.
Explico que tengo un qreport y los campos que necesito mostrar con los qrdbtext asociados con las propiedades correspondientes a cada campo(que seria el datafield) el en dataset no coloque nada, ya que si coloco una tabla me muestra datos pero no lo que yo necesito y si coloco el query no se en que propiedad ni como codificarlo. Ya que necesito que se muestre el ultimo campo guardado en el form. Chicos espero que puedan entenderme... Muchisimas gracias!!

Ese pedacito no me quedo claro, ¿como enlazas al DataField si el DataSet esta vacío?. Si solo necesitas que te muestre el último registro sencillamente lo puedes hacer mediante un query, así lo único que tienes que hacer en el código es abrirlo al mostrar el reporte.


Saludos!

[Elizabethdelphi]

Hola ya he realizado todo lo que me han propuesto... Ahora el problemita que tengo es que selecciono los campos en la propiedad sql del query pero me muestra cualquier campo menos el ultimo que es el que necesito.. Alguien sabe que comando se utiliza cuando pongo el select para que sea el ultimo campo el que me muestre... (A modo de ejemplo digo: Si tengo muchos campos similares en una tabla y quiero que me muestre campos distintos lo que escribo es select distinct, lo que pregunto es si hay algun comando que filtre el ultimo campo guardado. GRACIAS!! )

[Casimiro Noteví]

¿El último campo o el último registro?

[Elizabethdelphi]

el ultimo registro, perdon! jaja

[[Caral]]

Hola

Empezado por Elizabethdelphi

........... lo que pregunto es si hay algun comando que filtre el ultimo campo guardado. GRACIAS!! )

Where
Saludos

[[felipe88]]

Hola,
si usas el componente Query solo añade esto a tu código Delphi:

Código Delphi [-]
TuQuery.Last;

Saludos!

[ctrl_attack]

otra forma tambien, no muy practica y de echo un mala manera de hacerlo, ya que solamente quieres que se imprima lo que se esta mostrando en el form;

aclaro no es la mejor forma de hacerlo asi que por favor no me regañen los maestros.

en el boton imprimir, pondrias que las qrlabels del quickreport fueran iguales a las que tienes en el formulario que llama al reporte es decir

Código Delphi [-]
procedure Tform1.imprimirClick(Sender: TObject);
begin
form2.QRLabel1.Caption:= Label1.Caption;
form2.QRLabel2.Caption:= Label2.Caption;
form2.QuickRep1.Preview;
end;

de esta manera, siempre imprimiras lo que este mostrando el form.

espero te sirva, aunque aclaro que una manera mas limpia es lo que comento felipe88, saludos

[Jab]

Elizabeth, genera una consulta Query y la ordenas descendentemente de tal manera que el primer registro es el más actual. Debe tener al menos un índice para ello, y en la consulta pones al final "ORDER BY ... ASC"

Luego en el Qreport, creas un dato como quieras, un QRBDText por ejemplo y lo enlazas al campo actual, como el registro es el último al que apunta te saldrá solamente un registro y que casualmente es el que necesitas.

Sobre la consulta

QUICKREPORT28.Query1.ACTIVE:=FALSE;
QUICKREPORT28.QUERY1.PARAMBYNAME('TURNO.DNI').ASINTEGER:=2;
QUICKREPORT28.QUERY1.ACTIVE:=TRUE;

Está equivocada, si quieres añadir el dato DNI lo primero es alfanumérico, lo segundo se añade directamente el nombre como lo tengas en la consulta, esto es, si tienes algo así

SELECT * FROM TB WHERE DNI =: DNI

recuerda que el dato se asigna como

QUICKREPORT28.QUERY1.PARAMBYNAME('DNI').ASSTRING:='555359299A' , por ejemplo...


No obstante, te recomiendo que generes la SQL directamente en código sin usar parámetros ya que aumenta el consumo de memoria. Es decir, es mejor generarl el código de esta manera

QUERY1.SQL.Close;
QUERY1.SQL.Unprepare;
QUERY1.SQL.Clear;
QUERY1.SQL.Add('SELECT * FROM ');
etc..
y para hacer la comparativa de WHERE
QUERY1.SQL.ADD('WHERE DNI = '+''''+ datodelDNI+ '''')

De esta manera de compara con la exclusividad del DNI.
Si además ordenas ascendentemente solamente tienes que acudir al primer registro, normalmente ya viene por defecto al ejecutar la Query con Prepare por ejemplo.