iOS Question Default Device Speak

[gerredtor]

Hello,

I need the Default Device Speak of the Iphone for the App

 

[JanPRO]

Hi,

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

Jan