B4R Question Astream.Write boolean data

[Tayfur]

How can i use for wirte boolean.

dim x as boolean
x=true
Astream.Write(x)

i cant find in byteconverter...

 

[Erel]

Dim x As Boolean = True
Dim b As Byte
If x Then b = 1 Else b = 0
AStream.Write(Array As Byte(b))

 

[Tayfur]

Dim x As Boolean = True
Dim b As Byte
If x Then b = 1 Else b = 0
AStream.Write(Array As Byte(b))

thanks for help