var c: Char; b: Byte; begin c := ‘A‘; ShowMessage(c); //A b := 65; ShowMessage(IntToStr(b)); //65 c := Chr(66); ShowMessage(c); //B b := Ord(‘B‘); ShowMessage(IntToStr(b)); //66 end;
Char 如果对应的是AnsiChar（<=2007），就是ASCII码走，如果是WideChar（>2007），就是按Unicode编码顺序走
原文：http://www.cnblogs.com/del88/p/6362935.html