Call either GetLanguageIDs(var Lang, FallbackLang: string) (in unit GetText) or LazGetLanguageIDs(var Lang, FallbackLang: string) (in unit LazUTF8); the latter is an extension of the first one to work also in Darwin.