delphi如何将字符串转换为AScii

delphi如何将字符串转换为AScii比如将enter转换为相应的数字

2025-02-27 12:49:25

推荐回答（4个）

回答1：

采用自定义函数，方法如下：

function strtoascii(var inputAnsi:string): integer;
//字符串转换为ascii值,转换值是一个各单独值相加后的结果
var
  Ansitemp,i,OutPutAnsi :integer;
begin
  OutPutAnsi:=0;
  For i:=0 To Length(inputAnsi) Do
    begin
      Ansitemp := ord(inputAnsi[i]);
      outputansi := OutPutAnsi+Ansitemp;
    end;
  Result:= OutPutAnsi;
end;

回答2：

Ord(ch) ch ->ascii
chr(n) ascii ->char

回答3：

用
ord
函数
Ord('e')；
Ord('n')；
Ord('t')；
Ord('e')；
Ord('r')；

回答4：

用 ord 函数

Ord('e')；
Ord('n')；
Ord('t')；
Ord('e')；
Ord('r')；