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 Spanish
? 'Current language is ",HB_LANGNAME() // Spanish
? CMONTH( DATE() ) // Mayo
? CDOW( DATE() ) // Lunes
RETURN NIL
Tests
See tests/langapi.prg