Delphi Byte、PByte、TBytes的转换

本文整理自网络，侵删。

 
PByte转TBytes：
    a:PByte;
    b:TBytes;
    b := TBytes(a);

PByte转Byte：其实就是指针操作
    a:PByte;
    b:Byte;
    b := a^;

Byte转PByte：也是指针操作
    a:Byte;
    b:PByte;
    b := @a;
 

 

procedure ByteToBytes(var FData: TBytes; const Bytes: PByte; const BytesLen: Integer);
begin
  SetLength(FData, BytesLen);
  Move(Bytes^, FData[0], BytesLen);
end;


――――――――――――――――

原文链接：https://blog.csdn.net/ozhy111/article/details/102799388
 

相关阅读 >>

Delphi memo1 高亮行的范围

Delphi tstream 详细介绍

Delphi xe5在zip文件中添加某个txt文件并写入文字

Delphi 利用idhttp进行多线程下载

Delphi 金木水火土 生克用法

Delphi posansi

Delphi如何获取句柄?

Delphi 四舍五入保留一位或两位小数

Delphi 从字符串中提取单词、从字符串中提取汉字的函数

Delphi xe5 android程序常用的unit

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

转载请注明出处：木庄网络博客 » Delphi Byte、PByte、TBytes的转换