ASCII转10进制数(100)

  • 主题发起人 主题发起人 babalamari
  • 开始时间 开始时间
B

babalamari

Unregistered / Unconfirmed
GUEST, unregistred user!
请给个源码实例谢谢~~~~~
 
便如说Memo1.text里输入一段AscII码Button1_ClickMemo2.text=转换完的10进制数
 
直接INTTOSTR不就完了。。。还怎么转?ASCII码本来就是数值型,所谓N进制只是表示方式不同而已,其他的没什么区别
 
var Str: string; I: Integer;begin Str := Memo1.Text; for I := 1 to Length(Str) do Memo2.Text := Memo2.Text + IntToStr(Ord(Str));end;
 
接受答案了.
 
后退
顶部