Ver Mensaje Individual
  #1  
Antiguo 13-01-2011
Lenny Lenny is offline
Miembro
 
Registrado: jun 2007
Posts: 161
Reputación: 17
Lenny Va por buen camino
Question Filtro en MySQL

Buenas y gracias de antemano les explico...

Tengo un filtro que trabaja de perlas, utilizo este codigo:

Código Delphi [-]
Var
Valor,Valor1 : String;
begin
     if Edit1.Text = '' then
     begin
     BDATOS.PRODUCTOSTAB.Filtered := False;
     Exit;
     end;
         BDATOS.PRODUCTOSTAB.Locate(ComboBox1.Text, Edit1.Text,[loPartialKey,loCaseInsensitive]);
         valor := Edit1.Text;
         Valor1 := Valor;
         inc(valor1[length(Valor1)]);
         BDatos.PRODUCTOSTAB.Filter := ''+ComboBox1.Text+' >= '+QuotedStr(Valor)+ ' and '+ComboBox1.Text+' < ' +QuotedStr(valor1);
         BDatos.PRODUCTOSTAB.Filtered := true;
          end;

La idea es elegir desde un ComboBox el valor a filtrar, luego en un Edit escrivir el valor a filtrar (en este caso "YT27-0..."), funciona Ok, pero hoy me e puesto a hacer pruebas y cuando filtro por "YT27" todo Ok, pero si coloco "YT27-" se queda todo en blanco, si sigo "YT27-0" el filtro continua como si nada y aparecen los productos correspondientes... que puede ser??? de antemano muchisimas gracias...

PD: Utilizo Delphi 2010, Zeos 7.0.0, MySQL...
Responder Con Cita