Page 7 of 9
Re: Fwh 23.10 TGet another problem (UNSOLVED)
Posted:
Sun Feb 04, 2024 7:19 pm
by Horizon
nageswaragunupudi wrote:Are you using Windows Manifest while testing this sample?
Yes Mr. Rao.
I use theme. I have removed and it says always "ANSI GET" but Turkish characters gone in TGet.
I have added theme your sample and says "UTF8 GET".
- Code: Select all Expand view
1 24 "WindowsXP.Manifest"
Re: Fwh 23.10 TGet another problem (UNSOLVED)
Posted:
Sun Feb 04, 2024 7:28 pm
by nageswaragunupudi
I have added theme your sample and says "UTF8 GET".
Yes.
but Turkish characters gone in TGet.
It is the other way round here
I will get back.
Re: Fwh 23.10 TGet another problem (UNSOLVED)
Posted:
Mon Feb 05, 2024 5:02 am
by nageswaragunupudi
ertan wrote:Mr. Rao,
Your welcome. I'm not use any third party components or activex.
Best regards,
Mr. Ertan
Can we give you some more trouble?
Do you get the same behavior as Mr. Hakkan when you add manifest to my sample? Do you see ANSI GET changing to UTF8 GET?
Re: Fwh 23.10 TGet another problem (UNSOLVED)
Posted:
Mon Feb 05, 2024 6:32 am
by ertan
Hi Mr. Rao,
No. Not changed. Always "ANSI GET"
Best Regards,
Re: Fwh 23.10 TGet another problem (UNSOLVED)
Posted:
Mon Feb 05, 2024 6:45 am
by ertan
Mr. Rao,
With or without manifest always "ANSI GET". But Turkish character not lost, displaying correctly.
I am a good listener and reader.
I can't add screenshot or gif animate attachment. Forum rules? My Message count is less or problem?
Best Regards,
Re: Fwh 23.10 TGet another problem (UNSOLVED)
Posted:
Mon Feb 05, 2024 8:43 am
by Antonio Linares
Dear Ertan,
The best way to post images here on the forums is to open a free account on github, then create a repo (very easy) and upload your images there.
Then use the "Img" button here and copy the image (raw) url fom github
many thanks
Re: Fwh 23.10 TGet another problem (UNSOLVED)
Posted:
Mon Feb 05, 2024 12:10 pm
by karinha
ertan wrote:Mr. Rao,
With or without manifest always "ANSI GET". But Turkish character not lost, displaying correctly.
I am a good listener and reader.
I can't add screenshot or gif animate attachment. Forum rules? My Message count is less or problem?
Best Regards,
https://imgur.com/Regards, saludos.
Re: Fwh 23.10 TGet another problem (UNSOLVED)
Posted:
Mon Feb 05, 2024 7:43 pm
by nageswaragunupudi
Mr. Ertan
Is it possible for you to send these two libs from your fwh\lib folder of FWH2310?
FIVEH.LIB
FIVEHC.LIB
to my email address
nageswaragunupudi [at] gmail [dot] com?
Thanks in advance
Re: Fwh 23.10 TGet another problem (UNSOLVED)
Posted:
Tue Feb 06, 2024 5:43 pm
by Horizon
Hi Mr. Rao,
I have installed fwh 23.10 and the harbour folder on a friend's computer who has Visual Studio 2022 installed.
I have compiled the sample program you sent using buildh32.bat in sample directory.
The results were exactly like on my own computer. In other words, when the theme is installed, "UTF8 GET" is constantly written on the screen.
Re: Fwh 23.10 TGet another problem (UNSOLVED)
Posted:
Wed Feb 07, 2024 3:49 am
by nageswaragunupudi
Mr. Hakan
Please do not spend your time on this.
I am also getting the same problem when I installed FWH2310 and tested.
But Mr. Ertan says it is working well for him. I asked Mr.Ertan to send his libs to me. He will send after this weekend. Please wait till I test and provide you with the correctly working libs.
If necessary I will rebuild the libs for you. Please wait.
Re: Fwh 23.10 TGet another problem (UNSOLVED)
Posted:
Fri Feb 16, 2024 6:32 pm
by Horizon
up
Re: Fwh 23.10 TGet another problem (UNSOLVED)
Posted:
Sun Feb 18, 2024 2:59 pm
by nageswaragunupudi
Can you please get in touch with me on my email address
- Code: Select all Expand view
nageswaragunupudi [at] gmail [dot] com
?
I like to send you FIVEH.LIB and FIVEHC.LIB for your testing.
Re: Fwh 23.10 TGet another problem (UNSOLVED)
Posted:
Sun Feb 18, 2024 3:23 pm
by nageswaragunupudi
Also can you please build and run this program and let us know the results?
- Code: Select all Expand view
#include "fivewin.ch"
function Main()
? HB_CDPUNIID(), GetACP(), GetOEMCP()
return nil
#pragma BEGINDUMP
#include <windows.h>
#include <hbapi.h>
HB_FUNC( GETACP ) { hb_retni( GetACP() ); }
HB_FUNC( GETOEMCP ) { hb_retni( GetOEMCP() ); }
#pragma ENDDUMP
Re: Fwh 23.10 TGet another problem (UNSOLVED)
Posted:
Sun Feb 18, 2024 8:08 pm
by Horizon
nageswaragunupudi wrote:Also can you please build and run this program and let us know the results?
- Code: Select all Expand view
#include "fivewin.ch"
function Main()
? HB_CDPUNIID(), GetACP(), GetOEMCP()
return nil
#pragma BEGINDUMP
#include <windows.h>
#include <hbapi.h>
HB_FUNC( GETACP ) { hb_retni( GetACP() ); }
HB_FUNC( GETOEMCP ) { hb_retni( GetOEMCP() ); }
#pragma ENDDUMP
Hi Mr. Rao,
cp437
1254
857
When I add this lines.
- Code: Select all Expand view
REQUEST HB_CODEPAGE_TRWIN
function Main()
HB_CDPSELECT( "TRWIN" )
cp1254
1254
857
Re: Fwh 23.10 TGet another problem (UNSOLVED)
Posted:
Mon Feb 19, 2024 6:08 am
by nageswaragunupudi
We sent you FiveH.lib and FiveHC.lib.
First please make a safe copy of your present FWH2310 folder
Then replace these two libs in your fwh\lib folder with the libs we sent you now.
Then, please test this program and provide your feedback.
- Code: Select all Expand view
#include "fivewin.ch"
REQUEST HB_CODEPAGE_TRWIN
function Main()
local oDlg, oGet, oFont, nKey := 0
local cText := Space( 10 )
HB_CDPSELECT( "TRWIN" )
FW_SetUnicode( .f. )
SetGetColorFocus()
DEFINE FONT oFont NAME "Segoe UI" SIZE 0,-20 //CHARSET 162 // Use the charset that works for you
DEFINE DIALOG oDlg SIZE 450,300 PIXEL TRUEPIXEL FONT oFont ;
TITLE FWVERSION
@ 40, 40 GET oGet VAR cText SIZE 200,32 PIXEL OF oDlg ON CHANGE ;
( cText := oGet:cText, oDlg:Update() )
oGet:bKeyChar := { |k| nKey := k }
@ 40,300 SAY { || "Key: " + Str( nKey, 3 ) } SIZE 120,30 PIXEL OF oDlg UPDATE
@ 80, 40 SAY { || StrToHex( Trim( cText ), " " ) } SIZE 390,32 PIXEL OF oDlg UPDATE
@ 120, 40 SAY { || ListAsc( cText ) } SIZE 390,70 PIXEL OF oDlg UPDATE
@ 200, 40 SAY { || If( IsWindowUnicode( oGet:hWnd ), "UTF8", "ANSI" ) + ;
" GET" } SIZE 200,32 PIXEL OF oDlg UPDATE
@ 200,310 BUTTON "CHECK" SIZE 100,40 PIXEL OF oDlg ACTION ;
MsgInfo( IsWindowUnicode( oGet:hWnd ) )
odlg:brclicked := { || msginfo( IsWindowUnicode( oGet:hWnd ) ) }
ACTIVATE DIALOG oDlg CENTERED
cText := Trim( cText )
? cText, StrToHex( cText ), IsUtf8( cText )
return nil
static function ListAsc( cText )
local aList := {}
local c
cText := Trim( cText )
for each c in cText
AAdd( aList, ASC( c ) )
next
return FW_ArrayAsList( aList )