Delphi 十进制转十六进制函数如何实现，不要IntTohex，返回的是string类型，要求返回的是Byte型

type
  TBytes = array of Byte;

function IntToBytes(value: Integer): TBytes;
begin
  SetLength(Result, sizeof(Integer));
  Move(value, Result, sizeof(Integer));
end;

------解决方案--------------------
楼主理解有问题，在计算机任何情况下都是以二进制存储数据的。

------解决方案--------------------
你的这个是要把字符专程十六进制的字符发送，这样你要把每一个Byte转成Hex，给你一个函数参考，这个是把内存块直接转成16进制的文本串，你参考一下：

Delphi(Pascal) code

function DataToHex(Data: PChar; Len: integer): string;
{
  把指定的二进制数据转换成十六进制表示的字符串
}
begin
  SetLength(Result, Len shl 1);
  BinToHex(Data, PChar(Result), Len);
end;