R renzhm Unregistered / Unconfirmed GUEST, unregistred user! 2001-10-22 #1 得到一个字符的ASCII：ord(),假设为0a,我用inttohex()把它转换为'0a' 请问：如何再把'0a'用chr()恢复成原来的字符?
R renzhm Unregistered / Unconfirmed GUEST, unregistred user! 2001-10-22 #3 无论代表哪个字符，只是个假设，字符'z'的ASCII为7a,能不能把字符'7a'变回字符'z' 我在研究一种加密算法!
B Brave Unregistered / Unconfirmed GUEST, unregistred user! 2001-10-22 #4 你可以用char（） 注意十六进制数要加$0a等 edit1.text:=char(48); char(48)就是0
X xianjun Unregistered / Unconfirmed GUEST, unregistred user! 2001-10-22 #5 简单问题： Chr(StrToInt('$' + '0a');
W westboy2000 Unregistered / Unconfirmed GUEST, unregistred user! 2001-10-22 #6 //用这个试一下，在edit1里面输入一个字符（任意），在edit2中显示它的ASCII码， //在edit3中根据ASCII码还原。 procedure TForm1.Button1Click(Sender: TObject); begin edit2.Text:=inttostr(ord(edit1.Text[1])); edit3.Text:=chr(strtoint(edit2.Text)); end;
//用这个试一下，在edit1里面输入一个字符（任意），在edit2中显示它的ASCII码， //在edit3中根据ASCII码还原。 procedure TForm1.Button1Click(Sender: TObject); begin edit2.Text:=inttostr(ord(edit1.Text[1])); edit3.Text:=chr(strtoint(edit2.Text)); end;
