FiveTech Software tech support forums

... nResult := RoInitialize( 0 ) // RO_INIT_SINGLETHREADED
IF nResult != 0
RETURN nResult
ENDIF

// Crear un HSTRING a partir de la cadena Unicode
nResult := WindowsCreateString( cRuntimeClassName, nLength, @pHString )
IF nResult != 0
RoUninitialize()
RETURN nResult
ENDIF

// Llamar a ...

... nResult := RoInitialize( 0 ) // RO_INIT_SINGLETHREADED
IF nResult != 0
RETURN nResult
ENDIF

// Crear un HSTRING a partir de la cadena Unicode
nResult := WindowsCreateString( cRuntimeClassName, nLength, @pHString )
IF nResult != 0
RoUninitialize()
RETURN nResult
ENDIF

// Llamar a ...

... methods to open, close, clear, and manipulate the clipboard's contents, including text, bitmaps, metafiles, and files. The class also supports Unicode text and provides methods to check if the clipboard is empty or contains specific types of data.

### Class Overview

- **Class Name ...

Dear nageswaragunupudi,

As below is the sample of my Unicode Program with GET cannot enter THAI character if variable = nil at first

#include "FiveWin.ch"
function Main
local oWnd
public cFont0,oFont0,cName,oName
FW_SetUnicode( .T. )
HB_SETCODEPAGE( "UTF8" )
cFont0="Tahoma"

*cName = space ...

Dear nageswaragunupudi,

Sorry for my fault, In case Unicode class MENU display incorrect , I found that I can assign FONT to this class to correct the font

I found some part of my Unicode program have to store space() to variable before take the value from database to variable ,
If not, GET command ...

Dear nageswaragunupudi,

for my regular ANSI Program
? GetOEMCP(), GetACP(), HB_CDPSELECT() = 874,874,EN

for my Unicode Program
? GetOEMCP(), GetACP(), HB_CDPSELECT() = 874,874,UTF8

Thank you very much for your support
in case you want to contract direst, my e-mail is surasak@asic-net.com

... problem with FW24,

for example :

- at the first time when run the program it take 5 to10 seconds before program start

- When I try to use unicode by function FW_SetUnicode( .T. ) + HB_SETCODEPAGE( "UTF8" ) and change my code to UTF8,
I found class MENU display incorrect , I test by use ...

It may be problem from unicode character

Yes, you are right.
These combinations are being treated as 2-byte utf8 characters.

We are looking into how to resolve the issue for you.
Please give us a little time.

... when I enter some of 2 THAI character font for example chr(202)+chr(161) , chr(203)+chr(162) , chr(202)+chr(164) etc. , It may be problem from unicode character,

We have done some tests and found this problem. Is this the problem you are reporting?
https://imagizer.imageshack.com/v2/xq70/924 ...

Dear K.Surasak,

Please let me see your sample code. I'm Thai. If you use Fw_setunicode(.T.), you must save your prg file as Encoding : UTF-8.
If you ANSI, don't use FW_SetUnicode(.F.) function.

Surasak wrote:My program is ANSI not Unicode. but some THAI characters is display like Unicode.

My program is ANSI not Unicode. but some THAI characters is display like Unicode.

... BCC7.70) , I found the Font display incorrect when I enter some of 2 THAI character font for example chr(202)+chr(161) , chr(203)+chr(162) , chr(202)+chr(164) etc. , It may be problem from unicode character, I try to use command FW_SetUnicode( .F. ) but nothing change. How can I solve this problem.

... txt (simple English)
2) MyÄÅÆFile.txt (WU ANSI codepage 1252)
3) MyДЕЖFile.txt (Russian ANSI codepage 1251)
4) MyమనవFile.txt (UTF8 codepage of any Unicode language, in this case, Telugu)

I propose 2 approaches to copy these 4 matching files into the destination folder.
function CopyX()
WaitRun ...

... smb smbs smtp smtps telnet tftp
Features: alt-svc AsynchDNS HSTS HTTPS-proxy IDN IPv6 Kerberos Largefile libz NTLM SPNEGO SSL SSPI threadsafe Unicode UnixSockets

Y ahora siguiendo las indicaciones de Paquito he creado nif.xml para probar la validez del nif porque me ha aparecido muy ...

... lShaded: SHADED, SHADOW > ] ;
[ <lBox: BOX > ] ;
[ <lRaised: RAISED > ] ;
[ <adj: ADJUST> ] ;
[ <lTrans: TRANSPARENT>];
[ <uni: UNICODE, ANSI> ] ;
[ <lVCenter: VCENTER> ] ;
[ CARGO <uCargo> ] ;
=> ;
[ <oSay> := ] TSay():New( <nRow>, <nCol>, <{cText}>,;
[<oWnd>], [<cPict ...