Hi,
I have started to use fwh 25.06. I am using Visual Studio 2022 32 bit and Harbour. I also use Windows manifest. Mr. Rao (RIP) solved the TGet and Turkish character problem explained in the link below.
https://forums.fivetechsupport.com/viewtopic.php?t=43874&start=120
I'm having a character problem similar to the TGet problem I had before, when using the TMultiget class in Fwh 2506 (using the GET command with the MEMO parameter).
I'm NOT using Unicode. I'm using the ANSI character set by using FW_SetUnicode( .F. ) at the beginning of my application. So far, I haven't had any problems with other classes in fwh 25.06
The TMultiGet class always outputs its output variable as Unicode, which creates problems in my application. This problem occurs when I use only Turkish characters, and when I look at my variable with the isUTF8() function, it appears as .T.
Turkish characters.
I was previously using Fwh version 24.02. I had no problems. I know I need to provide an illustrative example to solve the problem, so I prepared the example below but I was not able to capture the behavior in my application.
The example program above does not prove my claims.
1. I have deleted all my obj files and recompiled them. Nothing changed.
2. I used mget.prg from fwh 24.02. Nothing changed.
No matter what I did, I couldn't get the variables I used in the TMultiGet class in my application to be output in ANSI. I would be grateful for your help.
I have started to use fwh 25.06. I am using Visual Studio 2022 32 bit and Harbour. I also use Windows manifest. Mr. Rao (RIP) solved the TGet and Turkish character problem explained in the link below.
https://forums.fivetechsupport.com/viewtopic.php?t=43874&start=120
I'm having a character problem similar to the TGet problem I had before, when using the TMultiget class in Fwh 2506 (using the GET command with the MEMO parameter).
@ 56,10 GET oBG6 VAR XMG_6 OF oDlg PIXEL SIZE 184,60 UPDATE MEMOREQUEST HB_CODEPAGE_UTF8
REQUEST HB_CODEPAGE_UTF16LE
REQUEST HB_CODEPAGE_TRWIN
HB_CDPSELECT( "TRWIN" )
FW_SetUnicode( .F. )
TFont():nDefaultCharSet := 162Turkish characters.
A Character Ascii
1 Äž 208
2 Åž 222
3 Ä° 221
4 ÄŸ 240
5 ÅŸ 254
6 ı 253#include "FiveWin.ch"
request HB_CODEPAGE_UTF8
request HB_CODEPAGE_UTF16LE
REQUEST HB_CODEPAGE_TRWIN
Function Main()
Local oDlg, oFont
Local oGet1
local cVar1 := space(200)
HB_CDPSELECT( "TRWIN" )
FW_SetUnicode( .f. )
TFont():nDefaultCharSet := 162
oFont := TFont():New("Verdana", 0, -11)
DEFINE DIALOG oDlg SIZE 500,150 PIXEL ;
FONT oFont TITLE "Sample" ;
STYLE nOr( WS_OVERLAPPEDWINDOW ) transparent
@ 15,15 get oGet1 var cVar1 MEMO;
size 200,40 of oDlg pixel
@ 60, 15 BUTTON "CHECK" SIZE 40, 10 PIXEL OF oDlg ;
ACTION MsgInfo( ;
"FW_SetUnicode(): " + cValToChar(FW_SetUnicode()) + CRLF + CRLF + ;
"IsUTF8(cVar1): " + cValToChar(IsUTF8(cVar1)) + CRLF + CRLF + ;
"oGet1:lUnicode: " + cValToChar(oGet1:lUnicode) + CRLF + CRLF + ;
"oDlg:lUnicode: " + cValToChar(oDlg:lUnicode) + CRLF + CRLF + ;
"oGet1/TMultiGet(): " + cVar1 + " - " + StrToHex( cVar1, " " ) ;
)
ACTIVATE DIALOG oDlg CENTER
return nil1. I have deleted all my obj files and recompiled them. Nothing changed.
2. I used mget.prg from fwh 24.02. Nothing changed.
No matter what I did, I couldn't get the variables I used in the TMultiGet class in my application to be output in ANSI. I would be grateful for your help.
Regards,
Hakan ONEMLI
Harbour & MSVC 2022 & FWH 23.06
Hakan ONEMLI
Harbour & MSVC 2022 & FWH 23.06
