PICTURE "@!" PROBLEM

[E. Bartzokas]

Hi all,
I have this problem with my greek language applications:

Regardless if used in resource dialog, or dialog created by code, if I use this:
REDEFINE GET oget VAR cGet PICTURE "@!" ..... (Upper case)
If I type in latin (english language), everything works fine.
If I shift my keybord to greek, and type something, the displayed characters are not readable.

If I remove the PICTURE "@!" from the above example, and type something in my native language, then it shows just fine! Of course, if I type in lower case either english or greek, the string respects the case.

Anyone can verify and tell me if it happens to other languages (e.g. italian or spanish or whatever), and if you have come with some workaround?

Thanks to all
Kind regards
Evans

[Richard Chidiak]

Hi all,
I have this problem with my greek language applications:

Regardless if used in resource dialog, or dialog created by code, if I use this:
REDEFINE GET oget VAR cGet PICTURE "@!" ..... (Upper case)
If I type in latin (english language), everything works fine.
If I shift my keybord to greek, and type something, the displayed characters are not readable.

If I remove the PICTURE "@!" from the above example, and type something in my native language, then it shows just fine! Of course, if I type in lower case either english or greek, the string respects the case.

Anyone can verify and tell me if it happens to other languages (e.g. italian or spanish or whatever), and if you have come with some workaround?

Thanks to all
Kind regards
Evans

Are you using a oemtoansi conversion ?

[E. Bartzokas]

Are you using a oemtoansi conversion ?

Thanks for the reply my friend!
No I am not using OEMTOANSI...
I load a greek font as follows:
DEFINE FONT ofont NAME "COURIER NEW GREEK" size 0,-12

and use the font in my GET object, e.g.
REDEFINE GET oget VAR cget ID ... of oDlg FONT ofont

It's the picture clause that makes everything change.
Without the picture, I get normal greek letters shown.
If I have PICTURE "@!", I see characters that have nothing to do with the greek language... Most likely, the codepage for the font is changed inside either FWH or XHarbour.

Thanks for the reply and my kindest regards
Evans

[Richard Chidiak]

Are you using a oemtoansi conversion ?

Thanks for the reply my friend!
No I am not using OEMTOANSI...
I load a greek font as follows:
DEFINE FONT ofont NAME "COURIER NEW GREEK" size 0,-12

and use the font in my GET object, e.g.
REDEFINE GET oget VAR cget ID ... of oDlg FONT ofont

It's the picture clause that makes everything change.
Without the picture, I get normal greek letters shown.
If I have PICTURE "@!", I see characters that have nothing to do with the greek language... Most likely, the codepage for the font is changed inside either FWH or XHarbour.

Thanks for the reply and my kindest regards
Evans

Evans

I have a lot of "@!" in my app and as you know it is in french.

I do not have this type of problems. Have you tried another font ?

Are you using a HB_ lang statement ?

Richard

[E. Bartzokas]

Are you using a oemtoansi conversion ?

Thanks for the reply my friend!
No I am not using OEMTOANSI...
I load a greek font as follows:
DEFINE FONT ofont NAME "COURIER NEW GREEK" size 0,-12

and use the font in my GET object, e.g.
REDEFINE GET oget VAR cget ID ... of oDlg FONT ofont

It's the picture clause that makes everything change.
Without the picture, I get normal greek letters shown.
If I have PICTURE "@!", I see characters that have nothing to do with the greek language... Most likely, the codepage for the font is changed inside either FWH or XHarbour.

Thanks for the reply and my kindest regards
Evans

Evans

I have a lot of "@!" in my app and as you know it is in french.

I do not have this type of problems. Have you tried another font ?

Are you using a HB_ lang statement ?

Richard

Richard
Can you please tell me where to find the definitions for my language?
I currently use these, because I couldn't find anything better...

REQUEST HB_LANG_EN // _EN
HB_LANGSELECT('EN') // 'EN'

Request DBFCDX
RDDSETDEFAULT("DBFCDX")

rddInfo( RDDI_MEMOTYPE, DB_MEMO_DBT, "DBFCDX" ) // From XHB NG

Thanks again...
Evans

[Antonio Linares]

Evans,

REQUEST HB_LANG_EL
REQUEST HB_CODEPAGE_ELWIN
HB_LangSelect("EL")
HB_SetCodePage("ELWIN")

[E. Bartzokas]

Evans,

REQUEST HB_LANG_EL
REQUEST HB_CODEPAGE_ELWIN
HB_LangSelect("EL")
HB_SetCodePage("ELWIN")

Hola Antonio,

xBuilder complains about missing external function:
(Unresolved external symbol)
HB_FUN_HB_LANG_EL
Using xBuild Wizzard ver. 4.01 (Jan 24, 2006)

Is there some way I can find these definitions please?

Gracias/saludos
Evans
ps. Getting closer to fixing the problem through your help

[Antonio Linares]

Evans,

They are located at harbour\source\codepage\cpelwin.c but it looks as it has not been included in the libs.

* Harbour Project source code:
* National Collation Support Module ( Greek WIN )
*
* Copyright 2004 Pete Dionisopoulos <pete_westg@yahoo.gr>
* www - http://www.harbour-project.org
* v1.0 2004 Panayotis (Pete) Dionysopoulos <pete_westg@yahoo.gr>