splain | better implicit errors for scala | Plugin library

I need to implement a testing function which checks compile-time error information for the "splain" plugin, part of this function needs to convert a codeblock into a string, e.g.:

Please refer to my earlier question: Delphi 7 - Encrypt with DEC, and decrypt with PHP OpenSSL

My Delphi 7 client app (ICS components) is sending base64 encoded data as a parameter in a HTTP POST request, to a PHP web service, where it is being decoded with base64_decode function. However, the resulting decoded string in PHP is not the same string that was originally encoded in Delphi. The Delphi base64 encoding function that I'm using is from the DEC (DEC v5.2) library.

Sample code implementation for sending data from Delphi to PHP (and receiving a response) is below:

Delphi side:

Using: Delphi 7, DEC v5.2

Please refer to this question: Delphi 7 - DCPCrypt - TDCP_rijndael - DecryptString - How to make it work?

From @AmigoJack's excellent answer, I have the Delphi Decrypt function working fine. Based on that, I am now trying to implement the Encrypt function but have been unsuccessful so far. What is happening is that the encryption is done in Delphi, and the string when decrypted in PHP is producing a different string than what was encrypted, implying that something is wrong in the Delphi code.

This is the code: