Cryptographic application in Delphi/Object Pascal