Return the Name of the Current Language module in USE
REQUEST HB_LANG_PT
REQUEST HB_LANG_RO
REQUEST HB_LANG_ES
FUNCTION MAIN()
HB_LANGSELECT('PT') // Default language is now Portuguese
? CDOW(DATE()) //Segunda-feira
? 'Current language is ",HB_LANGNAME() //Portuguese
? 'Old language id selected is ",HB_LANGSELECT() // PT
HB_LANGSELECT('RO') // Default language is now Romanian
? CMONTH(DATE()) // Mai
? 'Old language id selected is ",HB_LANGSELECT() // RO
HB_LANGSELECT('ES') // Default language is now Romanian
? 'Current language is ",HB_LANGNAME() //Spanish
? CMONTH(DATE()) // Mayo
? CDOW(DATE()) // Lunes
Tests
See tests/langapi.prg