Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   SQL (https://www.clubdelphi.com/foros/forumdisplay.php?f=6)
-   -   Como imprimo un solo registro con QuickReport (https://www.clubdelphi.com/foros/showthread.php?t=81533)

giulichajari 22-11-2012 19:22:12

Como imprimo un solo registro con QuickReport
 
Bueno estoy reealizando un QuickReport en c++ builder, pero necesito imprimir la factura a un alumno de que ha pagado el mes, pero tengo una tabla donde registro el dni del alumno para relacionar con la tabla alumnos, y los datos del mes y el importe.
El tema es que si hago un reporte con QRDBtext me van a aparecer todos los datos de la tabla de cuotas, debo hacer un select o que? muchas gracias

kapcomx 22-11-2012 19:40:49

consulta
 
Amigo nunca he trabajado c++ builder pero lo que hago en delphi es 1. relacionar el quick report a una query (consulta)
antes de llamar hago un query que me devuelva el registro correspondiente al alumno indicado. luego mando llamar el reporte
asi solo veo el registro o registros resultantes de la consulta.

Saludos :cool:

giulichajari 22-11-2012 19:59:29

Ahora entiendo
 
Seria algo asi.
Código SQL [-]
Query2->Close();
Query2->Text="SELECT * from Cuota where DNI LIKE "
      +QuotedStr("%"+ AluPago->Edit2->Text+"%");";

Query2->Open();

La sintaxis es parecida, me falta asignar al quickreport los datos del query

kapcomx 22-11-2012 20:02:44

asi es compañero, Suerte...:cool:

giulichajari 22-11-2012 20:12:03

No puedo convertir a Integer el QRDBText
 
Form2->QRDBText3==AluPago->Table2->FieldByName("Codmes")->AsInteger;
Form2->QRDBText1==AluPago->Table2->FieldByName("DNI")->AsInteger;
Form2->QRDBText2==AluPago->Table2->FieldByName("Importe")->AsInteger;

No me acepta. Gracias por pasar.

kapcomx 22-11-2012 22:56:10

no entiendo bien
 
Código Delphi [-]
Form2->QRDBText1==AluPago->Table2->FieldByName("DNI")->AsInteger;
Form2->QRDBText2==AluPago->Table2->FieldByName("Importe")->AsInteger;

quieres colocar el contenido de un campo en un qrdbtext

y si en el fieldbyname(importe")->asinteger; usas fieldbyname(importe")->asstring;

Saludos...:cool:


La franja horaria es GMT +2. Ahora son las 12:46:05.

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