Android Question How translate Java code to B4A

vecino · Jan 20, 2014

Hello, how you can translate that code?, Mainly "(byte)"

java:
final byte txt_big[] = { 0x1b, 0x21, (byte) 0xb0, '-', '-', '-', '-', '-', 'H', 'e', 'l', 'l', 'o', '-', '-', '-', '-', '-', '-', '\n' };

B4A:
txt_big() = chr(0x1b) & chr(0x21) & ?????

Thanks and regards.

derez · Jan 20, 2014

From the documentation, Keywords :

Array
Creates a single dimension array of the specified type.
The syntax is: Array As type (list of values).
Example:
Dim Days() As String
Days = Array As String("Sunday", "Monday", ...)

In your case:

B4X:

Dim txt_big() as byte
txt_big = Array as byte (0x1b, 0x21, ....)

If you need to translate the string to chars then:

B4X:

Dim txt_big() As Byte
Dim bc As ByteConverter
Dim c() As Byte = bc.StringToBytes("    hello      " ,"UTF8")
txt_big = Array As Byte (0x1b, 0x21,c(0),c(1),c(2)...c(15),10)

As far as I know, "\n" = CRLF and is 10 ascii so put 10 as last item.

Erel · Jan 20, 2014

I like the shorthand syntax:

B4X:

Dim txt_big() As Byte = Array As Byte(...)

Erel · Jan 20, 2014

Ignore my previous answer. Here is another option:

B4X:

Dim s As String = Chr(0x1b) & Chr(0x21) & Chr(0xb0) & "-----Hello------" & Chr(10)
Dim txt_bug() As Byte = s.GetBytes("ASCII")

vecino · Jan 20, 2014

Thank you very much.
I still have much to learn B4A.

Android Question How translate Java code to B4A

vecino

Well-Known Member

derez

Expert

Erel

B4X founder

Erel

B4X founder

vecino

Well-Known Member

Similar Threads

Android Question How translate Java code to B4A

vecino

Well-Known Member

derez

Expert

Erel

B4X founder

Erel

B4X founder

vecino

Well-Known Member

Similar Threads

Privacy & Transparency

Privacy & Transparency