Gracias, Perfecto. Pero ahora complicándolo un poco más, este otro no me funciona correctamente.
Código Delphi
[-]
ZQbnombre.SQL.text := 'select * from clientes where upper(nombre) like'+QuotedStr('%'+bnombre.Text+'%');
bnombre.text ----- TEdit campo con el texto a buscar pero quiero que lo busque tanto si lo escribo en mayúsculas como en minúsculas sin saber como está metido en la tabla.
Muchas gracias.