Delphi IntToHex 查看字符的十六进制值

本文整理自网络，侵删。

 
procedure TForm1.Button1Click(Sender: TObject);
var
  i: Integer;
begin
  Label1.Caption := '';
  for i := 1 to Length(Edit1.Text) do
  begin
    try
      Label1.Caption :=
        Label1.Caption +
        SysUtils.IntToHex(Byte(Edit1.Text[i]),2) + ' ';
    except
      Beep;
    end;
  end;
end;
 

相关阅读 >>

Delphi 如何检测你的电脑日期或时间的变化

Delphi 百度输入提示 Delphi 实现

Delphi opentextfiledialog用法

Delphi xe10 手机端错误提示：detected problems with api compatibility (visit g.co/dev/appcompat for more info

Delphi setlength 内存释放总结

Delphi 向其他程序发送模拟按键

Delphi中执行javascript代码

Delphi更改android亮度

Delphi禁止在android上重复按下按钮

Delphi unigui中如何监听session的开始与结束

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi IntToHex 查看字符的十六进制值