Delphi怎么把一个CHAR 转换为 Byte形请高手指点！

Question

如题

Answer 1

直接强制转换
var
cha：char；
begin
cha：='A'
cha：=char（byte（cha）+32）；
end；

Answer 2

procedure TForm1.Button1Click(Sender: TObject);
var
  ch: Char;
  b: Byte;
begin
  ch := 'a';
  b := Byte(ch);
  ShowMessage(IntToStr(b));  // 97
end;

Answer 3

我以前是用C++的，其中C++中定義了BYTE只有0-255是一個無符號的而char是一個有符號的。所以有的時候會要用到轉換一下。本人在這裏還是同意一樓的說法，用的系統函數快。因為才學delphi很多東西都還沒有看到。￥%……#—·%*，總的來說還是要謝謝大家了。