iOS Question Default Device Speak

Hi,
Code: Copy
Sub GetLanguage As String
    Dim NaObj As NativeObject
    Return NaObj.Initialize("NSLocale").RunMethod("preferredLanguages",Array()).RunMethod("objectAtIndex:",Array(0)).AsString
End Sub

Jan
 
Upvote 0
Back
Top