How to encode strings with EncdDec library

Question

I have this basic code that should encode a string and then get it back. However, the decoded text is garbage.

procedure TForm5.Button2Click(Sender: TObject)         


        

Answer 1

Quick fix:

ANSI is enough for me since the text resulted after encoding must be as short as possible (easy to send via email). So, I put my ANSI string into a stream and encoded/decoded the stream. It worked!

---

Jesus. Some documentation (at least a single comment line) would have been nice!