Char 与 Byte

var

  c: Char;

  b: Byte;

begin

  c := 'A';

  ShowMessage(c); //A

  b := ;

  ShowMessage(IntToStr(b)); //

  c := Chr();

  ShowMessage(c); //B

  b := Ord('B');

  ShowMessage(IntToStr(b)); //

end;

Char 如果对应的是AnsiChar（<=2007），就是ASCII码走，如果是WideChar（>2007），就是按Unicode编码顺序走