整形不能超过256
b:=Byte(StrToInt(n));
var
s:
string
;
b:
Byte
begin
s := Edit1
.
Text;
b :=
(StrToInt(s));
end
Delphi Integer 转成单字节
原文：http://www.cnblogs.com/zhangzhifeng/p/5504955.html
