Page 12 of 15
Re: HMG 3.1.4 (Test)
Posted: Wed Jul 10, 2013 1:59 pm
by Rathinagiri
Can you please give a small sample?
Re: HMG 3.1.4 (Test)
Posted: Wed Jul 10, 2013 8:45 pm
by radohabjan
Hello Rathi,
sorry , I coudln't sent a whole project, it's to big.
Here is picture of EDIT EXTEND. I use SI language:
SET LANGUAGE TO SLOVENIAN
REQUEST HB_CODEPAGE_SLWIN
HB_CDPSELECT("SLWIN")
I marked two buttons Delte and Find
Delete Button must be Briši (delete) and Find must be Poišči (find). In the attached file are some strange charachters.
Program is h_edit_ex.prg and lib libeditex.a
br Rado
Re: HMG 3.1.4 (Test)
Posted: Thu Jul 11, 2013 12:12 am
by srvet_claudio
radohabjan wrote:Hello Rathi,
sorry , I coudln't sent a whole project, it's to big.
Here is picture of EDIT EXTEND. I use SI language:
SET LANGUAGE TO SLOVENIAN
REQUEST HB_CODEPAGE_SLWIN
HB_CDPSELECT("SLWIN")
I marked two buttons Delte and Find
Delete Button must be Briši (delete) and Find must be Poišči (find). In the attached file are some strange charachters.
Program is h_edit_ex.prg and lib libeditex.a
br Rado
Hi Rado.
The problem is that when compiling HMG for Unicode all internal messages are in Unicode. When you put a SET CODEPAGE TO, you force HMG to working in ANSI.
Therefore, we must translate the internal messages of HMG from Unicode to ANSI.
Code: Select all
SET LANGUAGE TO SLOVENIAN
REQUEST HB_CODEPAGE_SLWIN
HB_CDPSELECT("SLWIN")
HMG_MESSAGES_UTF8_TO_ANSI("SLWIN")
Code: Select all
FUNCTION HMG_MESSAGES_UTF8_TO_ANSI (cCPID)
LOCAL k, i, nIndex, cUTF8Str, cANSIStr
LOCAL aPos := {128, 129, 130, 131, 132, 133, 134, 136, 137, 331, 371}
FOR k = 1 TO HMG_LEN (aPos)
nIndex := aPos [k]
IF ValType (_HMG_SYSDATA [nIndex]) == "A"
FOR i = 1 TO HMG_LEN (_HMG_SYSDATA [nIndex])
cUTF8Str := _HMG_SYSDATA [nIndex] [i]
cANSIStr := HB_UTF8TOSTR (cUTF8Str, cCPID)
_HMG_SYSDATA [nIndex] [i] := cANSIStr
NEXT
ELSE
cUTF8Str := _HMG_SYSDATA [nIndex]
cANSIStr := HB_UTF8TOSTR (cUTF8Str, cCPID)
_HMG_SYSDATA [nIndex] := cANSIStr
ENDIF
NEXT
RETURN NIL
Best Regards,
Claudio.
Re: HMG 3.1.4 (Test)
Posted: Thu Jul 11, 2013 1:58 pm
by radohabjan
Hello Claudio,
I made simple demo in attached file and still doesn't work.
br Rado
Re: HMG 3.1.4 (Test)
Posted: Fri Jul 12, 2013 1:26 am
by srvet_claudio
radohabjan wrote:Hello Claudio,
I made simple demo in attached file and still doesn't work.
br Rado
Hi Rado,
I fixed the bug, the problem is the HB_UTF8TOSTR() Harbour function that not translate correctly the Slovenian.
Please change the original file C:\hmg.3.1.4\SOURCE\h_init.prg, by the new h_init.prg attachment file and re-build the library.
Best Regards,
Claudio.
Re: HMG 3.1.4 (Test)
Posted: Fri Jul 12, 2013 7:35 am
by radohabjan
Hello Claudio,
now it works. Perfect.
Thanks.
Rado
Re: HMG 3.1.4 (Test)
Posted: Fri Jul 12, 2013 8:54 pm
by radohabjan
Hello friends,
is it possible to put in hmgdoc.htm again CA-Clipper 5.3 documentation. From time to time I'm still use old fashion clipper commands.
br Rado
Re: HMG 3.1.4 (Test)
Posted: Fri Jul 12, 2013 9:02 pm
by danielmaximiliano
radohabjan wrote:Hello friends,
is it possible to put in hmgdoc.htm again CA-Clipper 5.3 documentation. From time to time I'm still use old fashion clipper commands.
br Rado
- reference.png (43.04 KiB) Viewed 12171 times
Re: HMG 3.1.4 (Test)
Posted: Sat Jul 13, 2013 8:07 am
by radohabjan
Thanks Daniel,
I didn't check all subfolders.
br Rado
Re: HMG 3.1.4 (Test)
Posted: Sat Jul 13, 2013 1:00 pm
by quartz565
Hi,
If i edit forms in IDE (Unicode version) the Greek characters are not displayed (ide_edit). But there is no problem with Greek characters in exe Program (exe_prog)
What should I do to fix the problem.
Nikos
- ide_edit.png (35.89 KiB) Viewed 12131 times