Delphi 字符串转十六进制
生活随笔
收集整理的這篇文章主要介紹了
Delphi 字符串转十六进制
小編覺得挺不錯的,現在分享給大家,幫大家做個參考.
mark一下。
//字符串轉16進制 function StrToHex(src:string):string; vari: integer;des: string; begindes := '';for i := 1 to Length(src) dobegindes := des + IntToHex(Ord(src[i]),2) + ' ';end;Result := des; end;procedure TForm1.Button2Click(Sender: TObject); vardes:string; begindes := StrToHex(edit1.Text);edit2.Text := des; end;
?
總結
以上是生活随笔為你收集整理的Delphi 字符串转十六进制的全部內容，希望文章能夠幫你解決所遇到的問題。
