diff --git a/harbour/ChangeLog b/harbour/ChangeLog index 2fc104a9d1..91f3702932 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -8,6 +8,12 @@ 2002-12-01 23:12 UTC+0100 Foo Bar */ +2004-05-18 16:12 UTC+0300 Chen Kedem + + * doc/en/lang.txt + + Documentation for HB_SETCODEPAGE() + * Some formating + 2004-05-14 16:05 UTC+0100 Ryszard Glab * include/hbexpra.c diff --git a/harbour/doc/en/lang.txt b/harbour/doc/en/lang.txt index 1ab320556a..fde3d4e2e3 100644 --- a/harbour/doc/en/lang.txt +++ b/harbour/doc/en/lang.txt @@ -7,12 +7,63 @@ * www - http://www.harbour-project.org * * Copyright 2000 Luiz Rafael Culik - * Documentation for: HB_LANGSELECT(),HB_LANGNAME() + * Documentation for: HB_LANGNAME(), HB_LANGSELECT() + * + * Copyright 2004 Chen Kedem + * Documentation for: HB_SETCODEPAGE() * * See doc/license.txt for licensing terms. * */ + +/* $DOC$ + * $FUNCNAME$ + * HB_LANGNAME() + * $CATEGORY$ + * Nation + * $ONELINER$ + * Return the name of the current language module in use + * $SYNTAX$ + * HB_LANGNAME() --> cLangName + * $ARGUMENTS$ + * None. + * $RETURNS$ + * Name of the current language in use + * $DESCRIPTION$ + * This function return the current name of the language module in use. + * $EXAMPLES$ + * 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, tests/langmsg.prg + * $STATUS$ + * R + * $COMPLIANCE$ + * This function is a Harbour Extension + * $PLATFORMS$ + * Dos,Win32,OS/2 + * $FILES$ + * Library is rtl, lang + * $SEEALSO$ + * HB_LANGSELECT(),NATIONMSG() + * $END$ + */ + /* $DOC$ * $FUNCNAME$ * HB_LANGSELECT() @@ -21,11 +72,11 @@ * $ONELINER$ * Select a specific nation message module * $SYNTAX$ - * HB_LANGSELECT( ) --> cOldLang + * HB_LANGSELECT( [] ) --> cOldLang * $ARGUMENTS$ - * The ID of the country language module - * The possible values for is below as is defined in the - * Lang library,sorted by language. + * The optional ID of the country language module. + * Possible values for are below as defined in the + * Lang library, sorted by language. * * * Language Codepage @@ -56,7 +107,7 @@ * Italian 437 IT * Korean 949 KO * Polish 852 PL852 - * Polish ISO-8859-1 PLISO + * Polish ISO-8859-2 PLISO * Polish Mozowia PLMAZ * Polish Windows-1250 PLWIN * Portuguese 850 PT @@ -78,14 +129,15 @@ * The old language indentifier * $DESCRIPTION$ * This function set a default language module for date/month names, - * internal warnigs,NatMsg messages and internal errors. When a - * Lang ID is selected all messages will be output as the current lang - * selected until another one is selected or the program ends. + * internal warnigs, NatMsg messages and internal errors. When a + * Lang ID is selected all messages will be output with the current + * language selected until another one is selected or the program ends. + * The default language is English (cLang == "EN"). * $EXAMPLES$ * REQUEST HB_LANG_PT * REQUEST HB_LANG_RO * REQUEST HB_LANG_ES - * FUNCTION MAIN() + * FUNCTION Main() * HB_LANGSELECT( 'PT' ) // Default language is now Portuguese * ? CDOW( DATE() ) // Segunda-feira * ? 'Old language id selected is ", HB_LANGSELECT() // PT @@ -97,7 +149,7 @@ * ? CDOW( DATE() ) // Lunes * RETURN NIL * $TESTS$ - * See tests/langapi.prg + * See tests/langapi.prg, tests/langmsg.prg * $STATUS$ * R * $COMPLIANCE$ @@ -105,55 +157,78 @@ * $PLATFORMS$ * Dos,Win32,OS/2 * $FILES$ - * Libraty is rtl + * Libraty is rtl, lang * $SEEALSO$ - * HB_LANGNAME(),NATIONMSG() + * HB_LANGNAME(),NATIONMSG(),HB_SETCODEPAGE() * $END$ */ /* $DOC$ * $FUNCNAME$ - * HB_LANGNAME() + * HB_SETCODEPAGE() * $CATEGORY$ * Nation * $ONELINER$ - * Return the Name of the Current Language module in USE + * Select the active code page by language ID * $SYNTAX$ - * HB_LANGNAME() --> cLangName + * HB_SETCODEPAGE( [] ) --> cOldLang * $ARGUMENTS$ - * None. + * The optional ID of the country language module. + * Possible values for are below as defined in the + * Codepage library, sorted by language. + * + *
+ * Language Codepage + * + * English 437 EN + * German 850 DE + * German ANSI ANSI DEWIN + * Hungarian 852 HU852 + * Hungarian Windows-1 HUWIN + * Polish 852 PL852 + * Polish ISO-8859-2 PLISO + * Polish Mozowia PLMAZ + * Polish Windows-1250 PLWIN + * Portuguese 850 PT + * Portuguese ISO-8859-1 PTISO + * Russian 866 RU866 + * Russian KOI-8 RUKOI8 + * Russian Windows-1251 RUWIN + * Serbian Windows-1251 SRWIN + * Slovenian 437 SL437 + * Slovenian 852 SL852 + * Slovenian ISO-8859-2 SLISO + * Slovenian Windows-1250 SLWIN + * Spanish 850 ES + * Spanish ANSI ANSI ESWIN + *
* $RETURNS$ - * Name of the Current language in use + * The old language indentifier * $DESCRIPTION$ - * This function return the current name of the language module in use. + * HB_SETCODEPAGE() set the active code page use by Harbour for + * sorting and comparing strings. The default code page use ASCII + * order (cLang == "EN"). * $EXAMPLES$ - * 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 + * REQUEST HB_CODEPAGE_HU852 + * FUNCTION Main() + * LOCAL cTxt := CHR( 71 ) + " > " + CHR( 144 ) + " is" + * ? HB_SETCODEPAGE() // EN + * ? cTxt, CHR( 71 ) > CHR( 144 ) // G > is .F. + * ? HB_SETCODEPAGE( "HU852" ) // EN + * ? cTxt, CHR( 71 ) > CHR( 144 ) // G > is .T. + * ? HB_SETCODEPAGE( "EN" ) // HU852 + * ? cTxt, CHR( 71 ) > CHR( 144 ) // G > is .F. * RETURN NIL - * $TESTS$ - * See tests/langapi.prg * $STATUS$ * R * $COMPLIANCE$ - * This function is a Harbour Extension + * This function is a Harbour Extension. * $PLATFORMS$ * Dos,Win32,OS/2 * $FILES$ - * Library is lang + * Libraty is rtl, codepage * $SEEALSO$ - * HB_LANGSELECT(),NATIONMSG() + * HB_LANGNAME(),HB_LANGSELECT(),NATIONMSG() * $END$ */ +