topic-34564

richard-service

Posts: 866

Joined: Tue Oct 16, 2007 08:57 AM

print utf8 word Incorrect
Posted: Thu Sep 07, 2017 11:16 AM

Hi
Please look it. Preview user name not OK.

This is a user name problem

Code (fw): Select all Collapse

::cE_NAMEx := ::Transfor_Data( AllTrim(::cE_NOm) )

::oPrn:CmSay(  1.75,  1  , "編 號：[ " + AllTrim(::cE_NOm)   + " ]" )
::oPrn:CmSay(  1.75,  5  , "姓 名：[ " + AllTrim(::cE_NAMEx) + " ]" )


METHOD Transfor_Data( cData ) CLASS TRpt_EmployeeSalaryDataMsf

LOCAL cTmpData := ""

      cData := AllTrim( cData )

      ::oEmployeeMsfDBx:cQuery := "SELECT * FROM EmployeeMsf WHERE E_NO = '"+cData+"' LIMIT 1 AND COMP_NO ='"+AllTrim(Left(cCP_NO,3))+"' "
      ::oEmployeeMsfDBx:Refresh()

      IF ::oEmployeeMsfDBx:LastRec() <> 0
         cTmpData := FW_UTF8PADCHAR(::oEmployeeMsfDBx:E_NAME, 10)     //=>MsgInfo User name No problem
         RETURN cTmpData
      ELSE
         RETURN cTmpData
      ENDIF

RETURN cTmpData

This is Item name No problem.

Code (fw): Select all Collapse

::oPrn:CmSay( nPrnRow,  0.5, HB_UTF8SUBSTR(::oEmployeeSalaryMsfDB:ITMNM,1,16), , , , )
::oPrn:CmSay( nPrnRow,  7  , Transform( ::oEmployeeSalaryMsfDB:SRYAT,"9,999,999")+" 元", , , , )

Best Regards,

Richard

Harbour 3.2.0dev (r2503251254) => Borland C++ v7.7 32bit

MySQL v8.0

Harbour 3.2.0dev (r2503251254) => Borland C++ v7.7 64bit

nageswaragunupudi

Posts: 10733

Joined: Sun Nov 19, 2006 05:22 AM

Re: print utf8 word Incorrect
Posted: Fri Sep 08, 2017 02:42 PM

does this work?
cTmpData := HB_UTF8LEFT(::oEmployeeMsfDBx:E_NAME, 10)

Regards

G. N. Rao.

Hyderabad, India

richard-service

Posts: 866

Joined: Tue Oct 16, 2007 08:57 AM

Re: print utf8 word Incorrect
Posted: Fri Sep 08, 2017 04:03 PM

nageswaragunupudi wrote:does this work?
cTmpData := HB_UTF8LEFT(::oEmployeeMsfDBx:E_NAME, 10)

Mr.Rao
Not work.

cTmpData := HB_Utf8SubStr( ::oEmployeeMsfDBx:E_NAME, 1, 10 )
cTmpData := HB_UTF8LEFT(::oEmployeeMsfDBx:E_NAME, 10)

Best Regards,

Richard

Harbour 3.2.0dev (r2503251254) => Borland C++ v7.7 32bit

MySQL v8.0

Harbour 3.2.0dev (r2503251254) => Borland C++ v7.7 64bit

nageswaragunupudi

Posts: 10733

Joined: Sun Nov 19, 2006 05:22 AM

Re: print utf8 word Incorrect
Posted: Fri Sep 08, 2017 04:45 PM

Can you please try
? ::oEmployeeMsfDBx:E_NAME
? HB_UTF8LEFT(::oEmployeeMsfDBx:E_NAME, 10)

Regards

G. N. Rao.

Hyderabad, India

richard-service

Posts: 866

Joined: Tue Oct 16, 2007 08:57 AM

Re: print utf8 word Incorrect
Posted: Fri Sep 08, 2017 04:55 PM

nageswaragunupudi wrote:Can you please try
? ::oEmployeeMsfDBx:E_NAME
? HB_UTF8LEFT(::oEmployeeMsfDBx:E_NAME, 10)

Mr.Rao
Yes, it can show, but not work when print.

Best Regards,

Richard

Harbour 3.2.0dev (r2503251254) => Borland C++ v7.7 32bit

MySQL v8.0

Harbour 3.2.0dev (r2503251254) => Borland C++ v7.7 64bit

nageswaragunupudi

Posts: 10733

Joined: Sun Nov 19, 2006 05:22 AM

Re: print utf8 word Incorrect
Posted: Fri Sep 08, 2017 05:07 PM

Now can you please try this?
? "姓名：[ " + ::oEmployeeMsfDBx:E_NAME + " ]"

Regards

G. N. Rao.

Hyderabad, India

richard-service

Posts: 866

Joined: Tue Oct 16, 2007 08:57 AM

Re: print utf8 word Incorrect
Posted: Fri Sep 08, 2017 05:26 PM

nageswaragunupudi wrote:Now can you please try this?
? "姓名：[ " + ::oEmployeeMsfDBx:E_NAME + " ]"

? "姓名："::oEmployeeMsfDBx:E_NAME

Best Regards,

Richard

Harbour 3.2.0dev (r2503251254) => Borland C++ v7.7 32bit

MySQL v8.0

Harbour 3.2.0dev (r2503251254) => Borland C++ v7.7 64bit

nageswaragunupudi

Posts: 10733

Joined: Sun Nov 19, 2006 05:22 AM

Re: print utf8 word Incorrect
Posted: Fri Sep 08, 2017 05:27 PM

That means + is giving problems.
That is adding strings byte wise not character wise

Regards

G. N. Rao.

Hyderabad, India

richard-service

Posts: 866

Joined: Tue Oct 16, 2007 08:57 AM

Re: print utf8 word Incorrect
Posted: Fri Sep 08, 2017 05:32 PM

nageswaragunupudi wrote:That means + is giving problems.
That is adding strings byte wise not character wise

Mr.Rao
Chinese Report must be add some strings below:

列印區間: ::oDB:Date1 +"~"+ ::oDB:Date2
報表製作者: ::oDB:Maker
.......ETC

Any solution for it? or Don't use +

Best Regards,

Richard

Harbour 3.2.0dev (r2503251254) => Borland C++ v7.7 32bit

MySQL v8.0

Harbour 3.2.0dev (r2503251254) => Borland C++ v7.7 64bit

nageswaragunupudi

Posts: 10733

Joined: Sun Nov 19, 2006 05:22 AM

Re: print utf8 word Incorrect
Posted: Fri Sep 08, 2017 06:20 PM

Let me try

Regards

G. N. Rao.

Hyderabad, India

richard-service

Posts: 866

Joined: Tue Oct 16, 2007 08:57 AM

Re: print utf8 word Incorrect
Posted: Tue Sep 12, 2017 04:57 AM

nageswaragunupudi wrote:Let me try

Mr.Rao
I try it below:

Old code, only one line code

Code (fw): Select all Collapse

oPrn:Say( XX, YY , "列印區間："+AllTrim(::cNo1) , oFnt2 )

for Unicode

Code (fw): Select all Collapse

oPrn:Say( XX, YY        , "列印區間："                                 , oFnt2 )
oPrn:Say( XX, YY+210 , AllTrim(HB_UTF8LEFT(::cNo1,50)) , oFnt2 )

Coding load heave......

Best Regards,

Richard

Harbour 3.2.0dev (r2503251254) => Borland C++ v7.7 32bit

MySQL v8.0

Harbour 3.2.0dev (r2503251254) => Borland C++ v7.7 64bit

richard-service

Posts: 866

Joined: Tue Oct 16, 2007 08:57 AM

Re: print utf8 word Incorrect
Posted: Wed Sep 13, 2017 03:47 AM

richard-service wrote:
nageswaragunupudi wrote:Let me try

Mr.Rao
I try it below:

Old code, only one line code
Code (fw): Select all Collapse
oPrn:Say( XX, YY , "列印區間："+AllTrim(::cNo1) , oFnt2 )
for Unicode
Code (fw): Select all Collapse
oPrn:Say( XX, YY        , "列印區間："                                 , oFnt2 )
oPrn:Say( XX, YY+210 , AllTrim(HB_UTF8LEFT(::cNo1,50)) , oFnt2 )
Coding load heave......

Report command syntax not work

Code (fw): Select all Collapse

REPORT oReport                                  ;
   TITLE   Trim(cTitle)                         ,;
                    ""                                   ,;
"列印區間："+ AllTrim(HB_UTF8LEFT(::cNo1, 10)) +" ~ " + AllTrim(HB_UTF8LEFT(::cNo2, 10)) + space(5) + ;
"製表人員："+ AllTrim(HB_UTF8LEFT(_USER_NAME, 20)) + SPACE(3) +;

First work no problem
Second not work

"列印區間："+ AllTrim(HB_UTF8LEFT(::cNo1, 10)) +" ~ " + AllTrim(HB_UTF8LEFT(::cNo2, 10)) + space(5) + ;
"製表人員："+ AllTrim(HB_UTF8LEFT(_USER_NAME, 20)) + SPACE(3) +;

so HB_UTF8xxx() support +"~"+ not work "Chinese word" or "[" + "]" ....

Best Regards,

Richard

Harbour 3.2.0dev (r2503251254) => Borland C++ v7.7 32bit

MySQL v8.0

Harbour 3.2.0dev (r2503251254) => Borland C++ v7.7 64bit

richard-service

Posts: 866

Joined: Tue Oct 16, 2007 08:57 AM

Re: print utf8 word Incorrect
Posted: Fri Oct 27, 2017 07:08 PM

Mr.Rao

Any news for it?
Today, I found problem from TReport

Code (fw): Select all Collapse

REPORT oReport                                  ;
            TITLE   Trim(cTitle)                         ,;
                       ""                                   ,;
                       "列印區間："+ "目前顯示資料" + space(5) + ;
                       "製表人員："+ AllTrim(HB_UTF8LEFT(_USER_NAME, 20)) + SPACE(3)      + ;

"製表人員："+ AllTrim(HB_UTF8LEFT(_USER_NAME, 20))

not work. if I use MsgStop(_USER_NAME), it can show good Chinese text.

Best Regards,

Richard

Harbour 3.2.0dev (r2503251254) => Borland C++ v7.7 32bit

MySQL v8.0

Harbour 3.2.0dev (r2503251254) => Borland C++ v7.7 64bit

richard-service

Posts: 866

Joined: Tue Oct 16, 2007 08:57 AM

Re: Report utf8 word and Export Excel problem
Posted: Mon Oct 30, 2017 03:28 AM

Hi
Today, I test it and find problem.

Best Regards,

Richard

Harbour 3.2.0dev (r2503251254) => Borland C++ v7.7 32bit

MySQL v8.0

Harbour 3.2.0dev (r2503251254) => Borland C++ v7.7 64bit

richard-service

Posts: 866

Joined: Tue Oct 16, 2007 08:57 AM

Re: print utf8 word Incorrect
Posted: Tue Dec 26, 2017 06:33 PM

Hi Mr.Rao and Antonio,

Any news for it?
I just saw fwh1712 not news for it.

Best Regards,

Richard

Harbour 3.2.0dev (r2503251254) => Borland C++ v7.7 32bit

MySQL v8.0

Harbour 3.2.0dev (r2503251254) => Borland C++ v7.7 64bit

FiveTech Support Forums

Continue the discussion