怎样写程序使用triple Des算法加密及解密 ( 积分: 300 )

我需要在delphi 7.0中用triple des 加密，然后用c#.net解密

.net加密算法为：
byte[] sourceArray = new Encryptor(EncryptionAlgorithm.TripleDes).Encrypt(destinationArray, C_XstKey);

怎样写delphi 7.0的加密算法，谢谢！

Delphi下也有一大堆现成的代码啊。
这里就有一个： http://www.delphipages.com/news/detaildocs.cfm?ID=20

上面那个代码可能比较旧，要修改一下才能在Ｄ７下编译，下面这个应该没这个问题：
http://www.cityinthesky.co.uk/cryptography.html

Encryption Algorithms
Blowfish
Cast 128
Cast 256
DES, 3DES
Ice, Thin Ice, Ice2
IDEA
Mars
Misty1
RC2, RC4, RC5, RC6
Rijndael (the new AES)
Serpent
Tea
Twofish

Hash Algorithms
Haval
MD4
MD5
RipeMD-128
RipeMD-160
SHA-1
SHA-256, SHA-384, SHA-512
Tiger

十分感谢！
但是我还是不知道怎样用，是否能够给我一个3DES加密的示例程序，谢谢！