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)); //66end; 本文共 236 字，大约阅读时间需要 1 分钟。
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)); //66end; 转载于:https://my.oschina.net/hermer/blog/319286