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 获取其他进程句柄的几种方法

Delphi 实现从下载链接提取文件名的函数

Delphi 在电脑屏幕上显示图片

Delphi中让图片大小随timage控件大小变化

Delphi 取得任意程序的命令行

Delphi之完美splash方案

Delphi 如何从一张图片中裁剪一部分距形图片另存为文件（使用canvas.copyrect）

Delphi下载官方svn中的示例原码

Delphi 字符串保存utf-8过程

Delphi using windows print spooler to run your file

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

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