如何對字串做 MD5 加密.

發文回覆瀏覽次數：1799

推到 Plurk!

推到 Facebook!

尚未結案

suckin
一般會員

發表：13
回覆：26
積分：7
註冊：2003-06-16

發送簡訊給我

#1 引用回覆回覆

發表時間：2004-04-12 13:46:01

IP:61.221.xxx.xxx 未訂閱

在 delphi 8 中, 要把字串加密, 如何實現? 在 C# 中, 使用 byte[] s1 = ConStrArr(strPwd); sPwd = BitConverter.ToString(((HashAlgorithm)CryptoConfig.CreateFromName("MD5")).ComputeHash(s1)); 就可以實現了, 但是在 Delphi8 下, 如何使用 CryptoConfig.CreateFromName("MD5") ?

shieh2700
高階會員

發表：0
回覆：127
積分：100
註冊：2002-06-13

發送簡訊給我

#2 引用回覆回覆

發表時間：2004-04-13 02:18:03

IP:61.216.xxx.xxx 未訂閱

procedure TWebForm1.Button1_Click(sender: System.Object; e: System.EventArgs);
var
  s : array of byte;
  md5 : System.Security.Cryptography.MD5CryptoServiceProvider;
begin
  md5 := System.Security.Cryptography.MD5CryptoServiceProvider.Create;
  s := System.Text.Encoding.Unicode.GetBytes( TextBox1.Text );
  TextBox1.Text := Convert.ToBase64String( md5.ComputeHash(s) );
end;

系統時間：2024-05-04 20:59:05

聯絡我們 | Delphi K.Top討論版

本站聲明

1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！