在Delphi中编写十六进制字面值的正确方法是什么？

var
  HexValue: Integer;
begin
  HexValue := $1A; // 十六进制 1A 等于十进制 26
end;

var
  IntValue: Integer;
  ShortIntValue: ShortInt;
  LongWordValue: LongWord;
begin
  IntValue := $7FFFFFFF; // 最大的32位整数
  ShortIntValue := $7F; // 最大的8位整数
  LongWordValue := $FFFFFFFF; // 最大的32位无符号整数
end;

uses
  SysUtils;

var
  FloatValue: Double;
begin
  FloatValue := StrToFloat('$3FF0000000000000'); // 表示浮点数 1.0
end;

uses
  SysUtils;

var
  FloatValue: Double;
begin
  try
    FloatValue := StrToFloat('$3FF0000000000000'); // 正确转换为浮点数 1.0
    WriteLn(FloatValue);
  except
    on E: Exception do
      WriteLn('转换错误: ', E.Message);
  end;
end.