如何取得一个String型单字符的ASC码？

Question

var
  c:char;
  s:string;
begin
  s:='12345';
  c:=s[1];
  ord(c);
end;

Answer 1

var
  a : string;
  i : Integer;
begin
  a := 'b';
  i := ord(a[1]);
....
  
end;

Answer 2

//^
begin
  Caption := IntToStr(Ord('你好'[1]));
end;

Answer 3

string可以看作是一个DELPHI的特殊的以1为起始下标的字符串数组

Answer 4

Ord('')括号里面加入你要的字符

Answer 5

var
  s : string;
  i,j : Integer;
begin
  s:= 'This is a test';
  for i:=1 to length(s) do
  begin
     j:= ord(s[i]);
     ....
  end;
end;