Перевести код из C# в Delphi

 
 private string SecretKeySpec(string text, string keyValue)
        {
            UTF8Encoding UTF8 = new UTF8Encoding();
            AesManaged tdes = new AesManaged();
            tdes.Key = UTF8.GetBytes(keyValue);
            tdes.Mode = CipherMode.ECB;
            tdes.Padding = PaddingMode.PKCS7;
            ICryptoTransform crypt = tdes.CreateEncryptor();
            byte[] plain = Encoding.UTF8.GetBytes(text);
            byte[] cipher = crypt.TransformFinalBlock(plain, 0, plain.Length);
            String encryptedText = Convert.ToBase64String(cipher);
            return encryptedText;
        }
 
 
  byte[] Provider = new byte[32];
            for (int i = 0; i < Provider.Length; i++)
            {
                Provider[i] = (byte)(i + 1);
            }