Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Filtro: ADOQuery, DBGrid y Edit. (https://www.clubdelphi.com/foros/showthread.php?t=87735)

Luis.Lapuente 19-02-2015 02:43:38

Filtro: ADOQuery, DBGrid y Edit.
 
Buena noche ante todo un saludo a todo los integrante del Foro. Tengo un pequeño proyecto el cual estoy trabajando con un ADOConnection, ADOQuery, DataSource y un DBGrid. En el ADOQuery estoy usando este produce:
Código SQL [-]
SELECT dbo.SAPROV.CodProv As RUC, 
       dbo.SAPROV.Descrip As Nombre, 
       dbo.SAACXP.NumeroD As Documento, 
       dbo.SAACXP.[Document] As Descripcion, 
       dbo.SAACXP.MontoNeto As Sub_Total, 
       dbo.SAACXP.MtoTax As Impuesto, 
       dbo.SAACXP.Monto As Total, 
       dbo.saacxp.FechaE as Emitido, 
       fechav as Vence, DATEDIFF ( DAY , dbo.saacxp.FechaE, fechav ) as Restan
FROM   dbo.SAPROV INNER JOIN dbo.SAACXP ON dbo.SAPROV.CodProv = dbo.SAACXP.CodProv
y me funciona muy bien la cosa es que quiero hacer un filtro desde un edit y no logro hacerlo intente con este código:
Código Delphi [-]
 
banco.ADOQueryProveedor.filter:= 'Descrip Like ' + QuotedStr ('%' + edit1.Text + '%'  );
Banco.ADOQueryProveedor.Filtered:= true;
Pero no me funciona, si me pueden ayudar se los agradezco.
Gracias ante mano.

ecfisa 19-02-2015 04:58:00

Hola Luis.Lapuente.

Por favor usa las etiquetas.



Saludos y gracias por tu colaboración :)

ecfisa 19-02-2015 06:56:01

Hola de nuevo.
Cita:

Empezado por Luis.Lapuente (Mensaje 488956)
...quiero hacer un filtro desde un edit y no logro hacerlo intente con este código
banco.ADOQueryProveedor.filter:= 'Descrip Like ' + QuotedStr ('%' + edit1.Text + '%' );
Banco.ADOQueryProveedor.Filtered:= true;
Pero no me funciona, si me pueden ayudar se los agradezco.

Intenta de este modo:
Código Delphi [-]
procedure TForm1.Edit1Change(Sender: TObject);
begin
  with Banco.ADOQueryProveedor do
  begin
    Filtered:= False;
    Filter  := 'DESCRIP LIKE ' + QuotedStr ('%' + Edit1.Text + '%' );
    Filtered:= True;
  end;
end;


Saludos :)


La franja horaria es GMT +2. Ahora son las 18:19:46.

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