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

Delphi实现ASCII字符与HEX16进制字符互转程序，互相转换程序，在运行如图所示的窗口中，左侧是ASCII字符，右侧是HEX进制字符，左侧的ASCII输入完成后，点击中间带箭头的按钮，即可完成互相转换，代码基于Delphi7.0. 　　MEMO1.Text:=''; 　　S:=memo2.Text; 　　S:=TrimAll(S);//去空格 　　fori:=0to(length(s)DIV2)-1do 　　BEGIN 　　buf1[i]:=BYTE(strtoint('$'copy(S,i*21,2))); 　　MEMO1.Text:=MEMO1.Text