Delphi深度拷贝结构体内存

最新推荐文章于 2022-12-21 10:14:56 发布

一彤

最新推荐文章于 2022-12-21 10:14:56 发布

阅读量835

点赞数

分类专栏： Window系统文章标签： delphi

本文链接：https://blog.csdn.net/sbcsdn1/article/details/104283647

版权

Window系统专栏收录该内容

6 篇文章 0 订阅

订阅专栏

//定义结构体
type
    mypoint=record
    x:integer;
    y:integer;
end;

//定义结构体指针
    PMyPoint = ^mypoint;

//声明结构体指针变量
var
_pMyPoint1 : PMyPoint;
_pMyPoint2 : PMyPoint;

//给结构体指针分配内存方式1
_pMyPoint1 := New(PMyPoint);
_pMyPoint2 := New(PMyPoint);

//给结构体指针分配内存方式2
{
New(_pMyPoint1 );
New(_pMyPoint2 );
}

_pMyPoint1.x := 1;
_pMyPoint1.y := 2;

//深度拷贝结构体内存
MoveMemory(_pMyPoint2,_pMyPonit1,SizeOf(mypoint));

大功告成。