本文整理自网络,侵删。
System.SysUtils.TMarshaller 与 System.TMarshal
TMarshaller(结构) 基于 TMarshal(是有一大堆的 class 方法组成的类) 实现.
TMarshaller 可以对缓存区进行自动(自动释放)安全地管理, TMarshal 也有前者没有的重要方法, 譬如: TMarshal.Copy() 方法.
有了它们, 以后关于内存缓冲区, 字符串转码等操作就更方便了.
--------------------------------------------------------------------------------
{测试}
procedure TForm1.FormCreate(Sender: TObject);
var
M: TMarshaller;
pw: TPtrWrapper;
str: string;
bs: TBytes;
begin
bs := BytesOf('万一的 Delphi 博客');
pw := M.AllocMem(Length(bs));
TMarshal.Copy(bs, 0, pw, Length(bs));
str := TMarshal.ReadStringAsAnsi(pw);
ShowMessage(str);
pw := M.AsUtf8(str);
str := TMarshal.ReadStringAsUtf8(pw, -1);
ShowMessage(str);
end;
--------------------------------------------------------------------------------
相关阅读 >>
Delphi获取jpg、gif、png等格式图片的大小(高度和宽度)
Delphi动态创建tadoquery加access出现'不正常的定义参数对象 提供了不一致或不完整的信息'错误
Delphi xe [dcc32 fatal error] f2039 could not create output file 问题的解决
Delphi winapi: getfocus - 获取当前拥有焦点的窗口的句柄
更多相关阅读请进入《Delphi》频道 >>