张志峰的博客

水滴石川，积少成多。

导航

Delphi Integer 转成单字节

Posted on 2016-05-18 13:40  ╰★张志峰★╮  阅读(1580)  评论(0)    收藏  举报

整形不能超过256

b:=Byte(StrToInt(n));

var
  s: string;
  b: Byte;
begin
  s := Edit1.Text;
  b := Byte(StrToInt(s));
end;