Z zqw0117 Unregistered / Unconfirmed GUEST, unregistred user! 2007-05-22 #2 可以直接转换的 var c: Char; i: Byte; begin i := $0A; C := Char(i); ... end;