delphi – 可以分配一种类型的指针并将其作为不同的类型但是具有

发布时间：2020-12-15 09:30:34 所属栏目：大数据来源：网络整理

导读：可以分配一种类型的指针并将其作为不同的类型但具有相同的大小？我的意思是这样的： procedure TForm1.Button1Click(Sender: TObject);var A:PInt64; // 64bit P:Pointer; B:PDouble; // 64bitbegin New(A); P:=A; B:=P; Dispose(B);end; 假设我只想要8,16,3

可以分配一种类型的指针并将其作为不同的类型但具有相同的大小？我的意思是这样的：

procedure TForm1.Button1Click(Sender: TObject);
var A:PInt64;   // 64bit
    P:Pointer;
    B:PDouble;  // 64bit
begin
  New(A);
  P:=A;
  B:=P;
  Dispose(B);
end;

假设我只想要8,16,32,64位有符号和无符号类型.没关系？

解决方法

如果指向的类型不是托管类型,那么这是安全的.在您的情况下,Int64和Double都不是托管类型,因此这是安全的.

托管类型的示例是String,接口,Variant,匿名过程/方法,包含托管类型的记录等.

在托管类型上使用“新建”和“处理”时,必须初始化并最终确定该对象.在非托管类型上使用New和Dispose时,它等同于调用GetMem和FreeMem.

实际上,您不需要指向的类型具有相同的大小.在调用FreeMem时,不会传递类型的大小.指向的内存具有每个块的元数据,允许它解除分配整个块.

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!