Ver Mensaje Individual
  #4  
Antiguo 26-06-2010
Avatar de Caral
[Caral] Caral is offline
Miembro Premium
 
Registrado: ago 2006
Posts: 7.659
Reputación: 27
Caral Va por buen camino
Hola
En el evento OnChange del edit.
Código Delphi [-]
procedure TForm1.Edit1Change(Sender: TObject);
var
   Filtro : String;
begin
   If (Edit1.Text <> '') then
   begin
      TUTABLA.Filtered := False;
       Filtro := 'Nombre Like '''+ Edit1.Text + '*'''
      TUTABLA.Filter := Filtro;
      TUTABLA.Filtered := True
   end
   else TUTABLA.Filtered := False;
end;
1- tutabla, ahi tienes que poner el nombre que tiene.
2- filtro es un string
3- Nombre es el nombre del campo que vas a filtrar.
4- Ya que usas un table se hace un filtro, si usas un query se hace una sentencia sql.
Saludos
__________________
Siempre Novato
Responder Con Cita