Delphi ASCII与HEX 16进制互转程序.rar

时间:2022-07-30 04:46:53
【文件属性】:
文件名称:Delphi ASCII与HEX 16进制互转程序.rar
文件大小:8KB
文件格式:RAR
更新时间:2022-07-30 04:46:53
Delphi源码-加密解密 Delphi 实现ASCII字符与HEX 16进制字符互转程序,互相转换程序,在运行如图所示的窗口中,左侧是ASCII字符,右侧是HEX进制字符,左侧的ASCII输入完成后,点击中间带箭头的按钮,即可完成互相转换,代码基于Delphi7.0.   MEMO1.Text:='';   S:=memo2.Text;   S:=TrimAll(S);//去空格   for i:=0 to (length(s)DIV 2)-1 do   BEGIN    buf1[i]:=BYTE(strtoint('$' copy(S,i*2 1,2)));    MEMO1.Text:=MEMO1.Text CHR(BUF1[I]);   END;
【文件预览】:
codesc.net
----asctohex()
--------change.dcu(6KB)
--------asctohex.dof(2KB)
--------asctohex.res(876B)
--------change.pas(2KB)
--------change.~dfm(2KB)
--------change.~pas(2KB)
--------change.dfm(3KB)
--------asctohex.cfg(388B)
--------asctohex.dpr(190B)

网友评论

  • 不错的东东,学习了!