[firebase-br] CASE SENTIVIVE

[eduardo]

oi Bruno

Eu uso assim (Delphi)

function TiraAcento(const T:string):string;
var com, sem:string;
    i, n:Integer;
begin
     com := 'áéíóúâêîôûãõäëïöüàèìòùç';
     sem := 'aeiouaeiouaoaeiouaeiouc';

     com := com+AnsiUpperCase(com);
     sem := sem+AnsiUpperCase(sem);
     Result := T;
     for i := 1 to Length(Result) do
         begin
              n := Pos(Result[i], com);
              if n > 0 then
                 Result[i] := Sem[n];
         end;
end;

um abraço
Eduardo

Bruno Garcia wrote:

>Desculpe-me a ignorância, mas para passar para maiúsculo tudo bem, mas o que
>estão usando para tirar os acentos das palavras???
>  
>