python把浮点数转换成16进制_delphi 浮点数float转换成十六进制字符串的方法（FloatToHex）...

重新书写了float型转为十六进制的delphi程序

Function FloatToHex(Value: single): string;

var

l, i: integer;

HexText,tempHexText,temp: String;

begin

SetLength(HexText, 2 * SizeOf(Value));

BinToHex(pchar(@Value), pchar(@HexText[1]), SizeOf(Value));

l := length(HexText);

for i := (l div 2) downto 1 do

begin

temp:=copy(HexText,(2*i-1),2);

tempHexText := tempHexText + temp;

end;

result := tempHexText;

end;

procedure TForm6.addButtonClick(Sender: TObject);

begin

editHar3.Text := FloatToHex(-12.545); // strtofloat(editHar1.Text)

end;

显示结果为 C148B852，结果正确，-12.545~C148B852

注意添加

uses StrUtils{截取字符串单元};

下面是原文：

我们在研究封包技术时，经常会碰到将浮点数转换成十六进制形式。比如在游戏中人物的座标，经常就用浮点数来表示。怎么将浮点数转换成十六进制字符串形式呢？下面我将写出其在DE