Ver Mensaje Individual
  #1  
Antiguo 27-12-2012
nmenna10 nmenna10 is offline
Miembro
NULL
 
Registrado: jun 2012
Posts: 19
Reputación: 0
nmenna10 Va por buen camino
Filtro multiple en una base de datos

Hola buen dia amigos, tengo una consultita para hacerles, espero me puedan ayudar...

El problema que tengo es que quiero hacer un filtro multiple en una base de datos, espero me exprese bien...
La base de datos es una base simple en acces, esta hecha para llevar un control de los equipos que entran en reparacion al negocio en el que trabajo, en cada "registro" de la base se pueden ingresar 3 equipos, por lo tanto tengo 3 campos de numero de serie, uno para cada equipo, el problema que tengo es que cuando cargo 3 equipos en el mismo registro, cuando uqiero hacer la busqueda por numero de serie, solo me filtra teniendo en cuenta el primero, los otros dos no me los "checkea" para ver si son los que estoy buscando, entonces muchas veces no me los filtra...

Código Delphi [-]
procedure TForm_Equipos.SpeedButton1Click(Sender: TObject);
Var
 Filtro:string;

begin
 

 DBGrid1.Visible:=true;
  Filtro:='';

  if RMA.Text <> '' then
    Filtro:=  '(RMA like %' + RMA.Text + '%)';

  if Cliente.Text <> '' then
  begin
    if filtro <> '' then filtro:= filtro + ' and ';
    Filtro:= Filtro + '(Cliente Like %' + Cliente.Text + '%)';
  end;

  if edit_numero_serie.Text <> '' then
  begin
    if filtro <> '' then filtro:= filtro + ' and ';
    Filtro:= Filtro + '(numero_serie Like %' + edit_numero_serie.Text + '%)';
  end;

  DataModule1.Table_equipos.Filter:= Filtro;
  DataModule1.Table_equipos.Filtered:= True;
end;


ese seriea el codigo de mi busqueda, espero puedan yudarme, muchisimas graciasss!

Última edición por Casimiro Notevi fecha: 27-12-2012 a las 17:19:13.
Responder Con Cita