200分帮忙翻译一小段代码，c# to delphi(200)

byte[] encode(string user, string pass) { string enc = "rERzaaagbn96k9We1X0exnJbaUUI7cEPGX5vzyT1484-"; byte[] buser = System.Text.Encoding.Default.GetBytes(user); string mpass = MD5.MD5.Encrypt(pass+enc, 32); byte[] bpass = System.Text.Encoding.Default.GetBytes(mpass); byte[] fl = {Convert.ToByte(user.Length)}; byte[] x1 = {0xAD, 0xB9, 0x32, 0x00, 0x65, 0x01, 0xE9, 0x03, 0x00, 0x00 }; byte[] x2 = { 0x20 }; byte[] x3 = new byte[x1.Length + buser.Length + bpass.Length+2]; x1.CopyTo(x3,0); fl.CopyTo(x3,x1.Length); buser.CopyTo(x3, x1.Length+1); x2.CopyTo(x3, x1.Length + 1+buser.Length); bpass.CopyTo(x3,x1.Length + 1+buser.Length+1); return x3; }

MD5加密解密，网上不是很多吗？你搜一下~~

运用MD5对user和pass进行加密、

核心md5加密，delphi里没有和C#对应的MD5的专用加密方法。如果可以的话从网上下载一段md5的Delphi代码，其他的就简单了。

还是从网上去下个delphi版的md5吧

全部都是答非所问,怎么都认为是MD5加密呢!!!!我已经搞定了,浪费我的分,散了吧.