Xojo Plugin

Obfuscate String

Demonstrates how to obfuscate and unobfuscate a string. Xojo Plugin

Dim success As Boolean
success = False

Dim sb As New Chilkat.StringBuilder

Dim s As String
s = "Hello World!"

success = sb.Append(s)
System.DebugLog(sb.GetAsString())

// Output is "Hello World!";

// Obfuscate the string.
// This is NOT encryption.  It's just a simple obfuscation.
sb.Obfuscate 
System.DebugLog(sb.GetAsString())

// Output is 2GsgGhbSQVyG8Vb9

// -------------------------
// Unobfuscate.
Dim sb2 As New Chilkat.StringBuilder
Dim s2 As String
s2 = "2GsgGhbSQVyG8Vb9"
success = sb2.Append(s2)
sb2.Unobfuscate 

System.DebugLog(sb2.GetAsString())

// Output is "Hello World!";