Android Code Snippet Remove accents from string

SubName: RemoveAccents

Description: Removes the accents and returns a new string

B4X:
Sub Activity_Create(FirstTime As Boolean)
   Log(RemoveAccents("áóúñéí")) 'prints aounei
End Sub

Sub RemoveAccents(s As String) As String
   Dim normalizer As JavaObject
   normalizer.InitializeStatic("java.text.Normalizer")
   Dim n As String = normalizer.RunMethod("normalize", Array As Object(s, "NFD"))
   Dim sb As StringBuilder
   sb.Initialize
   For i = 0 To n.Length - 1
     If Regex.IsMatch("\p{InCombiningDiacriticalMarks}", n.CharAt(i)) = False  Then
       sb.Append(n.CharAt(i))
     End If
   Next
   Return sb.ToString
End Sub

Tags: string accents

Based on this link: http://stackoverflow.com/questions/5697171/regex-what-is-incombiningdiacriticalmarks
 
Top