bug in build form files

Started by HUNK Allan, November 09, 2008, 03:05:36 AM

Previous topic - Next topic

HUNK Allan

That is all I wanted in Chinese
Is a simple form in the document appear anywhere as long as the Chinese characters after the compiler can lead to failure

Sample:
'------------------------------------------------------------------------------------------------------------------------
Function FORM1_COMMAND1_BN_CLICKED (ControlIndex As Long, hWndForm As Dword, hWndControl As Dword, idButtonControl As Long) As Long
Local mystring As String

'???????' As long as the Chinese characters appear after the compiler can lead to failure
mystring="???????"    ' As long as the Chinese characters appear after the compiler can lead to failure
MsgBox mystring

End Function


Error Number =454

way ? Unicode??
You upgrade version of Chinese characters can hope for support



TechSupport

Hi Allan,

FireFly does not support unicode characters. FireFly 3 will not support unicode characters either. Sorry.


HUNK Allan

#2
I use a conversion methods

local udstr as string

udstr = Chr$(&HB0,&HA1) & Chr$(&HB0,&HA1) & Chr$(&H20,&H71) & Chr$(&HCE,&HD2) & Chr$(&HCA,&HC7) & Chr$(&HD6,&HD0) & Chr$(&HCE,&HC4) & Chr$(&H2E,&H2E) & Chr$(&HB0,&HA2) & Chr$(&H7A,&H21)


MsgBox udstr

I hope that the version 3.0 release as soon as possible.
Use this method it is not very satisfactory,
Despite being able to use this way to solve this problem!



In order to facilitate the preparation of the code,
I wrote a small tool for conversion.

If the program automatically shut down, you may have to close the FireFily
He did not find FireFly, will turn off automatically after 10 seconds,
The procedure for the FireFly 2.91 version.

But easily lead to long lines of code,
Will fail to compile,
"_" With more lines on it.

Function FORM1_COMMAND1_BN_CLICKED (ControlIndex As Long, hWndForm As Dword, hWndControl As Dword, idButtonControl As Long) As Long
Local test ,test2 ,test3 As String
test=Chr$(&HD5,&HE2) & Chr$(&HB8,&HF6) & Chr$(&HCA,&HC7) & Chr$(&HD6,&HD0) & Chr$(&HCE,&HC4) & Chr$(&HC4,&HDA) _
& Chr$(&HC8,&HDD) & Chr$(&H20,&HC4) & Chr$(&HE3,&HD2) & Chr$(&HB2,&HBF) & Chr$(&HC9,&HD2) _
& Chr$(&HD4,&HD3) & Chr$(&HC3,&HC6) & Chr$(&HE4,&HCB) & Chr$(&HFB,&H75) & Chr$(&H6E,&H69) _
& Chr$(&H63,&H6F) & Chr$(&H64,&H65) & Chr$(&HD7,&HD6) & Chr$(&HB7,&HFB)
test2=Chr$(&HB5,&HB1) & Chr$(&HC8,&HBB) & Chr$(&HD2,&HB2) & Chr$(&HBF,&HC9) & Chr$(&HD2,&HD4) & Chr$(&HB4,&HF8) & Chr$(&H31,&H32) & Chr$(&H33,&H41) & Chr$(&H62,&H63)
test3=Chr$(&HD5,&HE2) & Chr$(&HB8,&HF6) & Chr$(&HB7,&HBD) & Chr$(&HB7,&HA8) & Chr$(&HCA,&HC7) & Chr$(&HB8,&HF6) & Chr$(&HB9,&HFD) & Chr$(&HB6,&HC9)

MsgBox   test & "-.-" & Chr$(&HD5,&HE2) & Chr$(&HB8,&HF6) & Chr$(&HCA,&HC7) & Chr$(&HD6,&HD0) & Chr$(&HCE,&HC4) & Chr$(&HC4,&HDA) & Chr$(&HC8,&HDD) + "-.-"+ test2 , ,test3
End Function