|
Bueno, creo que el problema de que no te filtrara nada es por que segun lo que tu has hecho:
dm.qryctginv.Filtered := true;
dm.qryctginv.Filter := 'mi_descri = ' + QuotedStr(txtopc.Text + '%');
estas poniendo la propiedad Filtered a true antes de aplicar el filtro.
La secuencia de codigo seria:
ADOQuery1.Filtered := False;
ADOQuery1.Filter := 'Mensaje LIKE ' + QuotedStr(Edit1.Text + '%');
ADOQuery1.Filtered := True;
A mi asi me ha funcionado
|