Ver Mensaje Individual
  #1  
Antiguo 21-07-2010
Lenny Lenny is offline
Miembro
 
Registrado: jun 2007
Posts: 161
Reputación: 18
Lenny Va por buen camino
Question Filtro no reconoce N° 9!!!

Estimados, esto si que es extraño y por mas vueltas que le doy no logro entender, les explico:

Tengo una base de datos (Delphi 2010, MySQL, Zeos 7.0.0) en la cual guardo un registro denominado RUT (Rol Unico Tributario, Chile), para poder filtrar tengo un ComboBox en le cual uno elije el criterio por el cual filtrar:

Código Delphi [-]
procedure TCLIENTES.Edit1Change(Sender: TObject);
Var
Valor,Valor1 : String;
begin
     if Edit1.text = '' then
     begin
     TABLAS.TCLIENTES.Filtered := false;
     exit;
     end;
         TABLAS.TCLIENTES.Locate(ComboBox1.Text, Edit1.Text,[loPartialKey,loCaseInsensitive]);
         valor := Edit1.Text;
         Valor1 := Valor;
         inc(valor1[length(Valor1)]);
         TABLAS.TCLIENTES.Filter := ''+ComboBox1.Text+' >= '+QuotedStr(Valor)+ ' and '+ComboBox1.Text+' < ' +QuotedStr(valor1);
         TABLAS.TCLIENTES.Filtered := true;
          end;

end.

Funciona de Maravillas!!! pero... NO FILTRA NINGUN REGISTRO QUE COMIENZE CON 9!!! si me pudieran ayudar estaria bastante agradesido, ya que es lo que me falta para terminar este modulo, de antemano gracias.
Responder Con Cita