Page 1 of 1
Problema Acentos
Posted: Tue Sep 29, 2020 5:58 pm
by antolin
Buenas a todos, hace un siglo que no entro en el foro.
Soy programador aficionado desde hace muuuchos años. Como éste no es mi medio de vida, tengo un FiveWin muy antiguo. Del 2007 con xHarbour. Ya sé que Harbour es mejor, pero me da pereza cambiar pues para lo que hago me basta. Además aún utilizo Verce. Después de tantos años aún no aprendí a compilar sólo...
Pero al grano. Ya sé que el tema de los acentos es muy antiguo y está muy manido pero lo que me ocurre a mi es muy extraño. Cambié de ordenador y volví a instalar todos mis programas como es normal. Pero ahora no me salen los acentos. Ni HB_SETCODEPAGE('ES'), ni HB_SETCODEPAGE('ESWIN'), ni REQUEST HB_LANG_ES, ni nada de nada. Lo más curioso es que el Verse ahora tampoco reconoce los acentos.
He mirado la configuración de mi Windows 10, el idioma, la codificación, todo. Pero no hay manera de que me salgan acentos. Ya no sé que hacer. Tengo que utiliza códigos ASII alternativos, como CHR(128) par la á. Pero eso no es.
Alguna idea.
Gracias de antemano
Re: Problema Acentos
Posted: Tue Sep 29, 2020 6:28 pm
by karinha
Code: Select all
#Include "FiveWin.ch"
/*
REQUEST HB_LANG_PT
REQUEST HB_CODEPAGE_PT850
*/
REQUEST HB_LANG_ES
REQUEST HB_CODEPAGE_ESWIN
ANNOUNCE RDDSYS
REQUEST OrdKeyNo, OrdKeyCount, OrdCreate, OrdKeyGoto // Para ListBox
REQUEST DBFCDX, DBFFPT
STATIC oWnd
FUNCTION Main()
...
RDDSETDEFAULT("DBFCDX")
SET CENTURY ON
SET DATE BRITISH
SET TIME FORMAT TO "HH:MM:SS"
SET EPOCH TO YEAR( DATE() ) - 30
SET SOFTSEEK OFF
SET WRAP ON
SETCANCEL( .F. )
SET CONFIRM OFF
SET DELETED ON
SET _3DLOOK ON
SET UNIQUE OFF
SET ESCAPE OFF
SET EXACT ON // CONTROLA O :=, = e ==
SET EXCLUSIVE OFF
SET MULTIPLE OFF
/*
HB_LANGSELECT( 'PT' ) // Default language is now Portuguese
HB_SETCODEPAGE( "PT850" )
*/
HB_LANGSELECT( 'ES' )
HB_SETCODEPAGE( "ESWIN" )
// Set_MyLang("es_ES")
// LIBS:
\FwH27\lib\FiveHX.Lib +
\FwH27\lib\FiveHC.Lib +
\XHARBOUR\Lib\RddAds.Lib +
\XHARBOUR\lib\hbzip.Lib +
\XHARBOUR\lib\rtl.Lib +
\XHARBOUR\lib\vm.Lib +
\XHARBOUR\lib\gtgui.Lib +
\XHARBOUR\lib\lang.Lib +
\XHARBOUR\lib\macro.Lib +
\XHARBOUR\lib\rdd.Lib +
\XHARBOUR\lib\dbfntx.Lib +
\XHARBOUR\lib\dbfcdx.Lib +
\XHARBOUR\lib\dbfdbt.Lib +
\XHARBOUR\lib\debug.Lib +
\XHARBOUR\lib\common.Lib +
\XHARBOUR\lib\tip.Lib +
\XHARBOUR\lib\pp.Lib +
\XHARBOUR\lib\dbffpt.Lib +
\XHARBOUR\lib\codepage.Lib +
\XHARBOUR\lib\HbSix.Lib +
\XHARBOUR\lib\PcRepos.Lib +
\XHARBOUR\Lib\ct.Lib +
\Bcc55\lib\cw32.Lib +
\Bcc55\lib\psdk\msimg32.Lib +
\Bcc55\lib\psdk\odbc32.Lib +
\Bcc55\lib\psdk\rasapi32.Lib +
\Bcc55\lib\psdk\nddeapi.Lib +
\Bcc55\lib\psdk\iphlpapi.Lib +
\Bcc55\lib\import32.Lib
Saludos.
Re: Problema Acentos
Posted: Tue Sep 29, 2020 7:15 pm
by antolin
Se ve que he tenido que cambiar de xHarbour durante la mudanza porque esas librerías no las tengo.
El caso es que no funciona. Y hasta el verce sale con símbolos raros en ves de letras con acentos.
Re: Problema Acentos
Posted: Tue Sep 29, 2020 7:17 pm
by antolin
Recuerdo que tenía una versión más antigua. pero aun así. nunca tuve ese problema: porque ahora hago:
Code: Select all
REQUEST HB_LANG_ES
HB_LANGSELECT('ES')
HB_SETCODEPAGE('ES')
y debería funcionar. Pero no va y ha cambiado hasta la codificación del Verce
Re: Problema Acentos
Posted: Wed Sep 30, 2020 6:05 pm
by jvtecheto
Antolin:
Yo utilizo esto.
Code: Select all
REQUEST HB_Lang_ES
REQUEST HB_CODEPAGE_ESMWIN
hb_langSelect( "ES" )
hb_cdpSelect( "ESMWIN" )
FWSetLanguage( 2 ) // 1 English, 2 Spanish
Saludos.
Jose
Re: Problema Acentos
Posted: Mon Oct 26, 2020 10:41 am
by antolin
Gracias por la ayuda compis.
Creo que el problema es que mi xharbour es muy antiguo y no se compagina bien con el Windows 10, porque todo lo que hago en un ordenador antiguo de un amigo se ve bien en su ordenador, y todo lo que traigo antiguo se ve mal.
Re: Problema Acentos
Posted: Mon Oct 26, 2020 11:23 am
by antolin
Hola de nuevo
Hay una circunstancia que quizá le ilumine la bombilla a algún compañero: si pongo MENUITEM "Año tal y tal" me sale bien, y si hago cTit := "Año tal y tal", puesto con un SAY en pantalla se ve bien. Pero editado con un GET salen caracteres raros.
Alguna idea?
Muchas gracias
Re: Problema Acentos
Posted: Mon Oct 26, 2020 11:25 am
by antolin
Rectifico, el MENUITEM (al menos) se ve bien en mi ordenador, pero mal en otros..... Curioso.... frustrante....