Fwh 23.10 TGet another problem (UNSOLVED)

Re: Fwh 23.10 TGet another problem (UNSOLVED)

Postby Horizon » Mon Feb 19, 2024 9:20 am

nageswaragunupudi wrote: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 )


Without Windows Manifest.
http://www.objekt.com.tr/fwh_test/WithoutManifest.png
http://www.objekt.com.tr/fwh_test/WithoutManifest2.png
With Windows Manifest.
http://www.objekt.com.tr/fwh_test/WithManifest.png
http://www.objekt.com.tr/fwh_test/WithManifest2.png
Last edited by Horizon on Mon Feb 19, 2024 10:42 am, edited 2 times in total.
Regards,

Hakan ONEMLI

Harbour & MSVC 2022 & FWH 23.04
Horizon
 
Posts: 1322
Joined: Fri May 23, 2008 1:33 pm

Re: Fwh 23.10 TGet another problem (UNSOLVED)

Postby nageswaragunupudi » Mon Feb 19, 2024 10:22 am

We can not see the images

Please explain what is the problem
Regards

G. N. Rao.
Hyderabad, India
User avatar
nageswaragunupudi
 
Posts: 10620
Joined: Sun Nov 19, 2006 5:22 am
Location: India

Re: Fwh 23.10 TGet another problem (UNSOLVED)

Postby Horizon » Mon Feb 19, 2024 10:43 am

Regards,

Hakan ONEMLI

Harbour & MSVC 2022 & FWH 23.04
Horizon
 
Posts: 1322
Joined: Fri May 23, 2008 1:33 pm

Re: Fwh 23.10 TGet another problem (UNSOLVED)

Postby karinha » Mon Feb 19, 2024 1:29 pm

Hakan, what is the correct code in Türkiye?

Hakan, ¿cuál es el código correcto en Türkiye?

Code: Select all  Expand view

   Turkish               857            TR857
   Turkish               Windows-1254   TRWIN
 


https://vivaclipper.wordpress.com/2014/01/16/hb_cdpselect/

Gracias, thanks.

Regards, saludos.
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
User avatar
karinha
 
Posts: 7794
Joined: Tue Dec 20, 2005 7:36 pm
Location: São Paulo - Brasil

Re: Fwh 23.10 TGet another problem (UNSOLVED)

Postby Horizon » Mon Feb 19, 2024 1:31 pm

karinha wrote:Hakan, what is the correct code in Türkiye?

Hakan, ¿cuál es el código correcto en Türkiye?

Code: Select all  Expand view

   Turkish               857            TR857
   Turkish               Windows-1254   TRWIN
 


https://vivaclipper.wordpress.com/2014/01/16/hb_cdpselect/

Gracias, thanks.

Regards, saludos.


I use.
Code: Select all  Expand view
Turkish               Windows-1254   TRWIN
Regards,

Hakan ONEMLI

Harbour & MSVC 2022 & FWH 23.04
Horizon
 
Posts: 1322
Joined: Fri May 23, 2008 1:33 pm

Re: Fwh 23.10 TGet another problem (UNSOLVED)

Postby nageswaragunupudi » Mon Feb 19, 2024 1:35 pm

For Turkish, Windows default ANSI codepage is 1254 and OEM codepage is 857.
Harbour TRWIN is cp1254.

But Hakkan's problem is not with codepages or utf8/ANSI/OEM related issues.

His problem is with a Bug in TGet, where TGet hWnd changes from ANSI to Unicode window.
Regards

G. N. Rao.
Hyderabad, India
User avatar
nageswaragunupudi
 
Posts: 10620
Joined: Sun Nov 19, 2006 5:22 am
Location: India

Re: Fwh 23.10 TGet another problem (UNSOLVED)

Postby karinha » Mon Feb 19, 2024 1:44 pm

nageswaragunupudi wrote:For Turkish, Windows default ANSI codepage is 1254 and OEM codepage is 857.
Harbour TRWIN is cp1254.

But Hakkan's problem is not with codepages or utf8/ANSI/OEM related issues.

His problem is with a Bug in TGet, where TGet hWnd changes from ANSI to Unicode window.


I understand master Nages. Very complicated situation.

Entiendo maestro Nages. Situación muy complicada.

Gracias, thanks.

Regards, saludos.
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
User avatar
karinha
 
Posts: 7794
Joined: Tue Dec 20, 2005 7:36 pm
Location: São Paulo - Brasil

Re: Fwh 23.10 TGet another problem (UNSOLVED)

Postby Otto » Mon Feb 19, 2024 2:27 pm

Dear Mr. Rao,
I know it's a bit late now. But wouldn't it be better to use the Edit Controls from the Win32 API instead of the TGet?

Best regards,
Otto
********************************************************************
mod harbour - Vamos a la conquista de la Web
modharbour.org
https://www.facebook.com/groups/modharbour.club
********************************************************************
User avatar
Otto
 
Posts: 6312
Joined: Fri Oct 07, 2005 7:07 pm

Re: Fwh 23.10 TGet another problem (UNSOLVED)

Postby Horizon » Tue Feb 20, 2024 7:48 am

Hi Mr. Rao,

Is there anything I can help with? Is there any feedback you expect from me?
Regards,

Hakan ONEMLI

Harbour & MSVC 2022 & FWH 23.04
Horizon
 
Posts: 1322
Joined: Fri May 23, 2008 1:33 pm

Re: Fwh 23.10 TGet another problem (UNSOLVED)

Postby Antonio Linares » Tue Feb 20, 2024 8:40 am

Otto wrote:Dear Mr. Rao,
I know it's a bit late now. But wouldn't it be better to use the Edit Controls from the Win32 API instead of the TGet?

Best regards,
Otto


Dear Otto,

Class TGet uses a standard Edit control but (Windows) subclassed to have support for Harbour GET's pictures, behaviors, etc
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 42065
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Re: Fwh 23.10 TGet another problem (UNSOLVED)

Postby Otto » Tue Feb 20, 2024 9:20 am

Dear Antonio,
thank you. I thought similar to the RTF control (C:\FWH\source\classes\fget.prg).

@ 0,155 FORMAT GET oFGet1 VAR cTxt OF oWnd;
SIZE 360,40 PIXEL

Best regards,
Otto
********************************************************************
mod harbour - Vamos a la conquista de la Web
modharbour.org
https://www.facebook.com/groups/modharbour.club
********************************************************************
User avatar
Otto
 
Posts: 6312
Joined: Fri Oct 07, 2005 7:07 pm

Re: Fwh 23.10 TGet another problem (UNSOLVED)

Postby nageswaragunupudi » Tue Feb 20, 2024 2:48 pm

Horizon wrote:Hi Mr. Rao,

Is there anything I can help with? Is there any feedback you expect from me?


Will you please make sure you are using the libs we sent you recently?
Please check the sizes
Code: Select all  Expand view
15-02-2024  22:51         4,955,648 fiveH.lib
15-02-2024  22:51           851,968 fiveHC.lib
 

Let us make sure that by an chance your are still linking with old libraries.

I tested here before sending them to you
Regards

G. N. Rao.
Hyderabad, India
User avatar
nageswaragunupudi
 
Posts: 10620
Joined: Sun Nov 19, 2006 5:22 am
Location: India

Re: Fwh 23.10 TGet another problem (UNSOLVED)

Postby Horizon » Tue Feb 20, 2024 6:07 pm

nageswaragunupudi wrote:
Horizon wrote:Hi Mr. Rao,

Is there anything I can help with? Is there any feedback you expect from me?


Will you please make sure you are using the libs we sent you recently?
Please check the sizes
Code: Select all  Expand view
15-02-2024  22:51         4,955,648 fiveH.lib
15-02-2024  22:51           851,968 fiveHC.lib
 

Let us make sure that by an chance your are still linking with old libraries.

I tested here before sending them to you

Hi Mr. Rao,

I have checked the sizes. They are same. Just to be sure, I compiled and ran it again. The result is the same as before.

I would like to remind you that I am using Visual Studio 2022 32 bit and Harbour. I also use Windows manifest.

I can give any remote application's id and password if you want. You can compile it in my computer.
Regards,

Hakan ONEMLI

Harbour & MSVC 2022 & FWH 23.04
Horizon
 
Posts: 1322
Joined: Fri May 23, 2008 1:33 pm

Re: Fwh 23.10 TGet another problem (UNSOLVED)

Postby nageswaragunupudi » Wed Feb 21, 2024 3:23 am

I would like to remind you that I am using Visual Studio 2022 32 bit and Harbour. I also use Windows manifest.


So, you are building with MSVC 32bits, not Borland C
The libs I sent you were for Borland C
Regards

G. N. Rao.
Hyderabad, India
User avatar
nageswaragunupudi
 
Posts: 10620
Joined: Sun Nov 19, 2006 5:22 am
Location: India

Re: Fwh 23.10 TGet another problem (UNSOLVED)

Postby Horizon » Wed Feb 21, 2024 7:20 am

nageswaragunupudi wrote:
I would like to remind you that I am using Visual Studio 2022 32 bit and Harbour. I also use Windows manifest.


So, you are building with MSVC 32bits, not Borland C
The libs I sent you were for Borland C

I am waiting libs for MSVC 32 bit. and Harbour :D
Regards,

Hakan ONEMLI

Harbour & MSVC 2022 & FWH 23.04
Horizon
 
Posts: 1322
Joined: Fri May 23, 2008 1:33 pm

PreviousNext

Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 89 guests