Cita:
Empezado por sorati
Hola gracias por responder, intente hacerlo de esa manera pero solo me busca por la primera letra por ejemplo ingreso en el edit la letra 'N' y me filtra por ejemplo Nicolas Romero, al hacer lo mismo con la R para que me filtre por el apellido no lo hace.
Saludos
|
Hola sorati.
Entiendo... Para hacer lo que deseas con un
TTable vas a tener que usar el evento
OnFilterRecord de la misma:
Código Delphi
[-]
procedure TForm1.Edit1Change(Sender: TObject);
begin
Table1.Filtered := False;
Table1.Filtered := True;
end;
procedure TForm1.Table1FilterRecord(DataSet: TDataSet; var Accept: Boolean);
begin
Accept := Pos(Edit1.Text, Table1.FieldByName('NOMBREAPELLIDO').AsString) <> 0
end;
Por otro lado, si decidis cambiar por un
TQuery que, al igual que
Nelson considero una opción más flexible, sería:
Código Delphi
[-]
procedure TForm1.Edit1Change(Sender: TObject);
begin
with Query1 do
begin
Close;
SQL.Text := 'SELECT * FROM TU_TABLA WHERE NOMBREAPELLIDO LIKE :PVALUE';
ParamByName('PVALUE').AsString := '%' + Edit1.Text + '%';
Open;
end;
end;
Saludos
