Buscar sin tilde

[marcoszorrilla]

Si se trata de SQL, algo tan cutre como lo que sigue te puede servir:

Código Delphi [-]
   procedure TForm1.Button1Click(Sender: TObject);
   var
   s:String;
   begin
   s:='ábacos ínclitos ubérrimos decía la canción';
   s := StringReplace(s, 'á', 'a', [rfReplaceAll]);
   s := StringReplace(s, 'é', 'e', [rfReplaceAll]);
   s := StringReplace(s, 'í', 'i', [rfReplaceAll]);
   s := StringReplace(s, 'ó', 'o', [rfReplaceAll]);
   
   ShowMessage(s);
   end;

La idea sería buscar por la palabra o frase clave tal y como nos la dan es decir con tildes si las tiene:

Código SQL [-]
   Select * 
   From MiTabla
   Where LoQueSea Like sOld or Like sNew

sOld sería la palabra o frase con acentos
sNew sería la palabra o frase sin acentos.

No he puesto mayúsculas ni acentos circunflejos ni agudos.

La idea final, construir una función que quite toda tilde a cualquier frase o palabra, con lo cual ya tendríamos los 2 patrones a comparar.

Un Saludo.