Xbase++

Appending Strings to BinData

Demonstrates appending strings to a BinData.. Xbase++

LOCAL oBinData1
LOCAL oBinData2

oBinData1 := CreateObject("Chilkat.BinData")

//  Append a string using a 1-byte per char encoding
oBinData1:AppendString("This is a test", "windows-1252")
? oBinData1:GetEncoded("hex")
//  The bytes contained within the binData1 (in hex) are: 54,68,69,73,20,69, ...

oBinData2 := CreateObject("Chilkat.BinData")

//  Append a string using a 2-byte per char encoding
oBinData2:AppendString("This is a test", "utf-16")
? oBinData2:GetEncoded("hex")
//  The bytes contained within the binData2 (in hex) are: 54,00,68,00,69,00,73,00,20,00,69,00, ...

oBinData1:destroy()
oBinData2:destroy()