JAVAに対応するデルファイMD5暗号化プロセス

//参照デルファイはidHttp、IdHashMessageDigest、IdGlobal、IdHashが来ます

関数ret_mymd5（定数sVaule：文字列）：文字列。
VaRの
mymd5：TIdHashMessageDigest5。
開始
トライ
mymd5を：= TIdHashMessageDigest5.Create。
結果：=（mymd5.AsHex（mymd5.HashValue（sVaule）））;
最後に
mymd5.Free;
終わり;
終わり;

手順TForm1.btn2Click（送信者：TObjectを）;
だっ
SSIGN：文字列;
始まり
SSIGN：= 'abcdrfg';
SSIGN：小文字=（ret_mymd5（AnsiToUtf8（SSIGN）））。
表示するメッセージ（SSIGN）。
以上;