DBGrid con restricciones

[MLROJO]

Hola,

No nos comentas que componentes estas usando, no obstante suponiendo que usas un ADODataSet o similar.. (ADOQuery, ADOTable, etc..) existe la propiedad Filter que es lo mas parecido o lo que creo que mas se aproxima a lo que buscas, aunque bueno seguramente existan otras formas que desconozco.

Te pongo un ejemplo sacado de la ayuda de delphi:

Código Delphi [-]
with ADODataSet1 do begin

  Filtered := False;
  Filter := 'State = ' + QuotedStr('CA') + ' OR ' +
    'State = ' + QuotedStr('CA');
  Filtered := True;

end;

Espero que te sirva de ayuda, ya nos contarás.

Saludos.

[DOS]

mmm... son Ttable. y se muestran e un DBGrid.

[MLROJO]

Pues el ejemplo que te pongo te serviría para aplicarlo también al TTable.

Pruébalo, a ver si te sirve.

Saludos.

[DOS]

Para serte sincero ni siquiera se donde poner ese codigo.

[MLROJO]

Pones un botón.
Pulsas doble click sobre él (para acceder al evento OnClick)
Pones el código, quedando similar a esto:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
   with Table1 do begin

      Filtered := False;
      Filter := 'Campo = 1';
      Filtered := True;

   end;
end;

Sustituyendo lo que hay entre comas simples en "Campo = 1" por tu expresión.

Esto lo que hace es desactivar el filtro del TTable, indicarle una restricción y activar el filtro nuevamente.

Espero que te quede algo mas claro.

Saludos.

[[Chris]]

Puedes utilizar el evento OnFilter. Este evento te brinda la oportunidad de probar cada uno y todos los registros para determinar si se muestran o no. Lo que estás intentando hacer se le conoce como Client Filter, Filtros del lado Cliente.

Saludos,
Chris

[DOS]

Muchas gracias