Delphi 给结构体指针分配内存,用new(p)，释放用dispose(p)

来自：http://blog.163.com/zhangzhifeng688%40126/blog/static/1652627582010102261748481/

给结构体指针分配内存 但在很多时候, 一些参数是结构指针; 特别是在接受数据时, 一般需要手动分配内存. 如果只使用一个单结构指针, 用 New 分配内存是最合适的, 譬如:
--------------------------------------------------------------------------------

var
p: PPoint; {这是点结构 TPoint 的指针, 系统早定义好的}
begin
New(p);

// p^.X := 1; p^.Y := 2; {或者写成下面这样}
p.X := 1; p.Y := 2;

ShowMessageFmt('%d,%d', [p.X, p.Y]);
Dispose(p);
end;