iOS Question [Solved] How to use Chr()?

[aeric]

I am trying to use Chr to send my string to thermal printer using ESC/POS commands. I have been using many Chr() and it works in B4J and B4A. However, B4i ignores Chr and convert the unicode into numbers. How to solve this issue? It also happen when I try to display the strings in a label.

 

[epiCode]

use notation like: CHR(0x0027) instead of CHR(27) and it should work just fine

 

[aeric]

use notation like: CHR(0x0027) instead of CHR(27) and it should work just fine

I have tried but it doesn't work for me.

 

[Star-Dust]

In my BLE printing library for iOs (found here) I use this method to pass strings (or characters)

BLEmanager.WriteData(ServiceName, CharatteristicName,Text.GetBytes("UTF8"))

__________________________________________________
Di perpustakaan saya untuk pencetakan BLE untuk iOs (terdapat di sini) saya menggunakan kaedah ini untuk menghantar rentetan (atau aksara)

BLEmanager.WriteData(ServiceName, CharatteristicName,Text.GetBytes("UTF8"))

 

[Star-Dust]

As for your source, it works correctly on the label

 

[aeric]

As for your source, it works correctly on the label

View attachment 130018

The numbers show that the output is incorrect.

 

[Star-Dust]

The numbers show that the output is incorrect.

I thought you were referring to characters.

 

[Erel]

use notation like: CHR(0x0027) instead of CHR(27) and it should work just fine

Tip:
Chr(0x0027) = Chr(0x27) = Chr(39)

The issue discussed happens because there is no real char type in OBJC. You need to help the compiler:

Dim s As String = "" & Chr(0x27)

 

[aeric]

Tip:
Chr(0x0027) = Chr(0x27) = Chr(39)

The issue discussed happens because there is no real char type in OBJC. You need to help the compiler:

Dim s As String = "" & Chr(0x27)

Thanks Erel. Finally I get it to work! I can now build a B4J Print Server to print receipt for B4i app using bluetooth printer with no AirPrint support!

Public Const eLEFT     As String = "" & Chr(0x1B) & Chr(0x61) & Chr(0x00)      ' ESC a NUL
Public Const eCENTRE   As String = "" & Chr(0x1B) & Chr(0x61) & Chr(0x01)      ' ESC a SOH
Public Const eRIGHT    As String = "" & Chr(0x1B) & Chr(0x61) & Chr(0x02)      ' ESC a STX
Public Const eCLEAR    As String = "" & Chr(0x1B) & Chr(0x40)                  ' ESC @
Public Const eLINEFEED As String = "" & Chr(0x0D) & Chr(0x0A)                  ' CR LF

I am wondering why smart string literal is not working.

Public Const eLEFT        As String = "" & $"${Chr(0x1B)}${Chr(0x61)}${Chr(0x00)}"$    ' ESC a NUL
Public Const eCENTRE      As String = "" & $"${Chr(0x1B)}${Chr(0x61)}${Chr(0x01)}"$    ' ESC a SOH
Public Const eRIGHT       As String = "" & $"${Chr(0x1B)}${Chr(0x61)}${Chr(0x02)}"$    ' ESC a STX
Public Const eCLEAR       As String = "" & $"${Chr(0x1B)}${Chr(0x40)}"$                ' ESC @
Public Const eLINEFEED    As String = "" & $"${Chr(0x0D)}${Chr(0x0A)}"$                ' CR LF