Этот код работает на delphi как надо, и расшифровывается, как надо.
Проверял. Всё дело в том, что расшифровка будет происходить с помощью php скрипта, на сервере.