Welcome to بیسیک فور ایکس

Register now to gain access to all of our features. Once registered and logged in, you will be able to contribute to this site by submitting your own content or replying to existing content. You'll be able to customize your profile, receive reputation points as a reward for submitting content, while also communicating with other members via your own private inbox, plus much more! This message will be removed once you have signed in.

Sina

فهمیدن زبان گوشی

1 ارسال در این موضوع قرار دارد

با کد زیر زبان گوشی رو می فهمید که من اون رو توی یک لیبل قرار می دم

Sub basic4xgetlanguage as string

Dim basic4x As Reflector

Basic4x.Target = refc.RunStaticMethod("java.util.Locale", "getDefault", Null, Null)

Return basic4x.RunMethod("getDisplayName")
End sub 

'کد پایین رو تو اکتیویتی کریت بزارید'
Label1.text=basic4xgetlanguage

به اشتراک گذاری این ارسال


لینک به ارسال
به اشتراک گذاری در سایت های دیگر