Tema: TQuickRep
Ver Mensaje Individual
  #52  
Antiguo 07-08-2011
Avatar de Caral
[Caral] Caral is offline
Miembro Premium
 
Registrado: ago 2006
Posts: 7.659
Reputación: 25
Caral Va por buen camino
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
__________________
Siempre Novato
Responder Con Cita