Platforms to show: All Mac Windows Linux Cross-Platform
FAQ.How to encrypt a file with Blowfish?
Answer: You can use code like this:
Example:
Notes:
Of course you can decrypt same way, just use Decrypt function and of course swap files.
Answer: You can use code like this:
Example:
dim fi as FolderItem = SpecialFolder.Desktop.Child("test.xojo_binary_project")
dim fo as FolderItem = SpecialFolder.Desktop.Child("test.encrypted")
// read input
dim bi as BinaryStream = BinaryStream.Open(fi)
dim si as string = bi.Read(bi.Length)
bi.Close
// encrypt
dim so as string = BlowfishMBS.Encrypt("MyKey",si)
// write output
dim bo as BinaryStream = BinaryStream.Create(fo)
bo.Write so
bo.Close
Links
MBS Xojo Plugins
