Buscar sin diferenciar mayusculas de minusculas

[[enecumene]]

Hola, intentalo asi de esta manera a ver si te funciona:

Código Delphi [-]
var
consulta,buscar:string;
x:integer;

begin
buscar:=edit2.Text;
//con esta linea busco solo por subcadenas con el % pero alguien sabe que 
//mas puede aser para que no me ocacione problema si busco una nombre 
//que este escrito con MaYuSculAS y MiNUscuLAs  
consulta:='select * from tabla where  Nombre like ''*'+buscar+'*''';
query1.SQL.Clear;
query1.SQL.Add(consulta);
query1.Active:=true;
query1.Open;

end;

Saludos.