十进制转换了ASCII怎么转换

Posted 2023-05-12

比如十进制129转换成ASCII是多少，又比如253转换后又是什么，谢谢了！
怎么书写啊，就是这样的吗还是合起来写在一块啊？

十进制数129转换成ASCII码（十六进制数）是：

1-----31H
2-----32H
9-----39H

十进制数253转换成ASCII码（十六进制数）是：

2-----32H
5-----35H
3-----33H 参考技术A ascll码是与字符对照的
找到单个字符 将其写一块就对了。
没有转换不转换的问题。
十进制转换十六进制十进制数除以16取余数，
0123456789ABCDEF表示十进制的0123456789 10 11 12 13 14 15 ！
有多种方法的~~GOOD LUCK

进制与ASCII码转换

 

 1   LabeledEdit4.Text := chr(65);   // 用十进制方式赋值:  ASCII码转换为字符 65 -> A
 2   LabeledEdit4.Text := #65;       // 用十进制方式赋值:  ASCII码转换为字符 65 -> A
 3 
 4   LabeledEdit4.Text := #$41;      //用十六进制方式赋值: ASCII码转换为字符 41 -> A
 5   LabeledEdit4.Text := chr($41);  //用十六进制方式赋值: ASCII码转换为字符 41 -> A
 6 
 7   LabeledEdit4.Text := IntToStr(Ord(‘A‘)); //字符转换为十进制ASCII码 A -> 65
 8   LabeledEdit4.Text := IntToStr($A); //十六进制字符转换为十进制ASCII码 A -> 10
 9 end;
10 
11 end.
12 //用Delphi把中文字符转换成ASCII的16进制形式13 Chinese=array[0..1] of char;
14 
15 function TForm1.ChineseToHex(const Value: chinese): string;
16 begin
17   Result:=inttohex(ord(Value[0]),2)+inttohex(ord(Value[1]),2);
18 end;
19 
20 procedure TForm1.Button1Click(Sender: TObject);
21 var
22   s:Chinese;
23 begin
24   s:=‘您好‘;
25   caption:=ChineseToHex(s);
26 end;