Ver Mensaje Individual
  #1  
Antiguo 02-03-2005
[Nbull] Nbull is offline
Miembro Premium
 
Registrado: nov 2004
Ubicación: Valencia-España
Posts: 168
Reputación: 22
Nbull Va por buen camino
Hola Lepe, nada quería decirte que muchas gracias que me ha funcionado muy bien, lo único que en el código que pusiste había que quitar el 'upper' que pusiste delante del campo Nombre, el código funcionando se quedaría así:


Código Delphi [-]
if radiobutton1.checked then begin // Si hemos decidido filtrar por el nombre...
   Form1.Query2.Close();
   // Utilizo quotedStr para ponerle comillas simple a la cadena (en el caso 
//que sea de tipo string  
   Form1.Query2.SQL.Text := 'SELECT * FROM agenda WHERE Nombre Like 
'+quotedStr(uppercase('%'+Edit1.Text+'%'));
   Form1.Query2.Open();
   Form1.Query2.Locate('Nombre',edit1.Text,[lopartialkey, locaseinsensitive]);

Nada Lepe muchas gracias de nuevo y que pases buena tarde.

Un Saludo
Responder Con Cita