TQuickRep

[[Caral]]

Hola
Hagamos otra prueba:
Cuando haces el filtro en el adotable el dato es sacado del txt_rfc.Text.

Código Delphi [-]
Filtro : String;
 begin
 AdoTable1.Filtered := False;
 AdoTable1.Filtered := False;
 Filtro := 'rfc = '+txt_rfc.Text; // aqui hace el filtro.
 AdoTable1.Filter := Filtro;
 AdoTable1.Filtered := True;
 AdoTable1.Open;

Bien:
El mismo caso es para el adoquery, solo que ahora vas a colocar el dato directamente en el codigo.
Supongamos que escribiste en el txt_rfc.text (maria, jose o lo que sea).
Eso es lo que vas a colocar en el codigo asi:

Código Delphi [-]
Try
 QuickReport1:=TQuickReport1.Create(self);
 QuickReport1.ADOQuery1.SQL.Text:= 'Select * from cliente where frc = :d1';
 QuickReport1.ADOQuery1.Parameters[0].Value:= 'maria'; // aqui colocas el dato que tendria que estar en el txt_rfc.text
 QuickReport1.ADOQuery1.Open;
 QuickReport1.Preview;
 finally
 QuickReport1.Free;

Por supuesto que ese dato tiene que coincidir con el dato que este en la tabla, de lo contrario no mostrara nada ni dara error.
Veamos que pasa asi.
Saludos

[lisc_dla]

de hecho conectando los QRDBText a el adotable ya no manda error, la cuestión es que no imprime todos los datos solo el primero y el segundo

[[Caral]]

Hola
Si, pero que de la ultima prueba que puse arriba de este ?.
Saludos

[lisc_dla]

probé con el código:

Try
QuickReport1:=TQuickReport1.Create(self);
QuickReport1.ADOQuery1.SQL.Text:= 'Select * from cliente where frc = :d1';
QuickReport1.ADOQuery1.Parameters[0].Value:= 'maria'; // aqui colocas el dato que tendria que estar en el txt_rfc.text
QuickReport1.ADOQuery1.Open;
QuickReport1.Preview;
finally
QuickReport1.Free;

y marca el mismo error, en la misma linea

[[Caral]]

Hola
Por supuesto no maria, verdad.
A ver este:

Código Delphi [-]
Try
 QuickReport1:=TQuickReport1.Create(self);
 QuickReport1.ADOQuery1.SQL.Text:= 'Select * from cliente where frc = ''maria''';
  QuickReport1.ADOQuery1.Open;
 QuickReport1.Preview;
 finally
 QuickReport1.Free;

Saludos

[lisc_dla]

claro que no es maria

probé con el código:


QuickReport2.ADOQuery1.SQL.Text:= 'Select * from cliente where rfc = ''rfc''';

pero no imprime todos los resultado, solo el primero y el segundo

[[Caral]]

Hola
Bueno, me doy.
Me imagino que si imprime solo unos datos el reporte no esta bien.
No entiendo, aveces te da error otras no.
rfc es el nombre de un campo de la tabla, es algun dato dentro de ese campo ?, ne mo suena.
Saludos