字符串轉化成十六進制輸出StrToHex（Delphi版、C#版）

//注意：Delphi2010以下版本默認的字符編碼是ANSI，VS2010的默認編碼是UTF-8，delphi版字符串事先須經過AnsiToUtf8（）轉碼才能跟C#版得到的十六進制字符串顯示結果一致。

Delphi版：

function StrToHex(AStr: string): string;
var
i : Integer;
ch:char;
begin

  Result:='';
  for i:=1 to length(AStr)  do
  begin
    ch:=AStr[i];
    Result:=Result+IntToHex(Ord(ch),2);
  end;
end;

 

//***************************************************

C#版

   

 public string StrToHex(string str)
    {
        string strResult;
        byte[] buffer = Encoding.GetEncoding("utf-8").GetBytes(str);
        strResult = "";
        foreach (byte b in buffer)
        {
            strResult += b.ToString("X2");//X是16進制大寫格式 
        }
        return strResult;
    }