Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Conexión con bases de datos (https://www.clubdelphi.com/foros/forumdisplay.php?f=2)
-   -   Problema con filtro de tabla (https://www.clubdelphi.com/foros/showthread.php?t=83815)

angelp4492 01-08-2013 16:35:52

Problema con filtro de tabla
 
Hola como estan, estoy intentando filtrar una tabla de la siguiente manera

Código Delphi [-]
Filter:=Consulta+'= '+QuotedStr(sEdit1.Text+'*');


esto puesto en el evento onchange de un tedit, el problema es que me filtra por la primera palabra

por ejemplo si tengo
pepe lopez

si pongo la P me filtra pepe lopez, pero si pongo la L para filtrar por lopez no me lo hace, algun consejo de como hacerlo gracias.

ecfisa 01-08-2013 16:57:04

Hola angelp4492.

¿ Con que gestor de base de datos y que componentes estas trabajando ?

Saludos. :)

angelp4492 01-08-2013 19:13:50

la tabla la he creado en paradox, y tengo un datasource un dbgrid y un Ttable

ecfisa 01-08-2013 19:29:00

Hola angelp4492.

El componente TTable soporta las comparaciones =, <>, >, <, >=, <=, AND, OR y NOT. No podes echar mano de LIKE, de modo que para hacer lo que deseas, vas a tener que usar el evento OnFilterRecord.

Por ejemplo:
Código Delphi [-]
...
procedure TForm1.Edit1Change(Sender: TObject);
begin
  DataSet.Filtered := False;
  DataSet.Filtered := True;
end;

procedure TForm1.DataSetFilterRecord(DataSet: TDataSet; var Accept: Boolean);
begin
  Accept := Pos(Edit1.Text, DataSet.FieldByName('TU_CAMPO').AsString) > 0;
end;
...

Saludos. :)

angelp4492 06-08-2013 19:37:21

Gracias me funcionó perfectamente


La franja horaria es GMT +2. Ahora son las 13:08:38.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi