不多解释了
上代码
function Byte2Hex(arrByte:Tbytes):string;
var stream: TMemoryStream;
begin
stream := TMemoryStream.Create;
stream.Write(arrByte[0],Length(arrbyte));
SetLength(Result, stream.Size * 2);
BinToHex(stream.Memory, PChar(Result), stream.Size);
stream.Free;
end;
参数可以改成array of byte 其他不需要改动