TMultiGet Unicode problem.(UNSOLVED)

[ertan]

Dear Hakan,

TGet always check
::lUnicode := oWnd:lUnicode variable,

TMultiGet always check
::lUnicode = FW_SetUnicode() variable,

Differences is here. I need more test

Your Tget and tMultiget object's parent is Tfolderex or TGroup or TPanel?

[Horizon]

Hi Ertan

I have send it to your mail. please change hakan.rap hakan.rar and extract it.

Hakan.

[ertan]

Dear Hakan,

Fixed. Please check your e-mail

[ertan]

Dear Hakan,

Fixed. Many thanks to your feedback

[Horizon]

waiting!.....

[ertan]

Dear Hakan,

I start Unicode implementation from TGet for TMultiGet Class a few days ago.

lWideChar, nTextChars, nTextBytes, nCase, lUpperWide etc. many variables,
GetText, SetText, GotFocus, PadText, KeyWChar, KeyWDown, Cut, Copy, Paste etc. many methods,
need integration into in TMultiGet. It will take me a while.

This seems very strange to me for the TMultiGet, which is one of the basic classes.

Either no one uses Unicode, or no one uses TMultiGet with Unicode. Because no problems have been reported for this class with Unicode to date.

[Horizon]

Hi Antonio,

Mr. Ertan and I found the following workaround to resolve the issue for now. I don't think this is a real solution. The keychar method needs further investigation.

Code: Select all | Expand

METHOD LostFocus( hCtlFocus ) CLASS TMultiGet
   ::Super:LostFocus( hCtlFocus )
   if ::bSetGet != nil
	IF !FW_SetUnicode()
      	Eval( ::bSetGet, UTF8toAnsi(::GetText()  ))
      ELSE
	      Eval( ::bSetGet, ::GetText()  )
      ENDIF
   endif
   ...
   ...

[ssbbs]

How about?