delphi.memory.分配及释放---New/Dispose, GetMem/FreeMem及其它函数的区别与相同

来自:http://www.cnblogs.com/qiusl/p/4028437.html

------------------------------------------------------------------

我估摸着内存分配+释放是个基础函数,有些人可能没注意此类函数或细究,但我觉得还是弄明白的好。

介绍下面内存函数前,先说一下MM的一些过程,如不关心可忽略:

TMemoryManager = record
  GetMem: function(Size: Integer): Pointer;
  FreeMem: function(P: Pointer): Integer;
  ReallocMem: function(P: Pointer; Size: Integer): Pointer;
end;

var
  MemoryManager: TMemoryManager = (
    GetMem: SysGetMem;
    FreeMem: SysFreeMem;
    ReallocMem: SysReallocMem);

以上是D7版本的MM函数,其中变量MemoryManager我称为MM函数,请注意。

D2005-D2007以上版本(不确认哪个版本),MM函数多了AllocMem及RegisterLeak/UnRegisterLeak函数,与本文无关,就不多说了。

第三方MM接管的就是这MM的几个函数,达到外挂目地,而Sys打头的SysGetMem, SysFreeMem, SysReallocMem则为本身系统自带的MM处理。

一:New/Dispose

此两函数,估计学delphi/pascal,就知道:为record/object此类数据进行分配和释放内存块

然后分配与释放是调用的是GetMem/FreeMem函数,与GetMem/FreeMem不同之处是:

New()在GetMem后,进行了initialize(x)操作,即对record/object的数据进行初始化的操作.

initialize函数,在system单元,该函数说白了,即对record/object里面中,含有string,interface, dync array,variant,record,array的字段,进行初始化为0(清空).

这一步很重要,因为GetMem返回的内存块可能重复使用过的,使用过的,表示有值。

有值的情况下,再重新赋值,就表示旧地址对应的数据要先清空,清空随机地址的数据?AV就会出现了...

(不要想着,在GetMem后,进行每字段初始化,容易出错的就是这个,在有以上以字段的情况下,如果需要手动初始化,必须用fillchar,原因如上。)

与之相反的Dispose()亦同,反操作,进行清空:finalize(x)后,再进行FreeMem,以保证record/object中,

string,interface/dyncarray字段,不会因为直接调用FreeMem而泄露(leak)

总结是:

a: New==> GetMem(p, sizeof(TDataType)) + Initialize(p^) ==>AllocMem(sizeof(TDataType));

它与AllocMem区别是:initialize(x)不会对每个字节清0,只针对于某些字段清0.

Dispose == Finalize(p^) + FreeMem(p);

没有可代替的函数,也不能少finalize(p^)这步操作,否则会有leak.

b: record/object的指针类型,最好使用此对函数进行分配及释放。当然你也可以去自维护record/object里面的字段生存期。

c: 如果调用system.Initialize/Finalize,出现提示:

[Hint] Unit1.pas(43): Expression needs no Initialize/Finalize

表示record/object里面的字段,没有包含string,interface,dync array,variant,record,array

即表示不需要调用Initialize或Finalize进行操作。

d: 多说一句:每个warn/hint都有其作用,请勿忽略,说不定小BUG就在其中,请关注它们或干掉它们。

二:GetMem/FreeMem

GetMem/FreeMem是MM的分配与释放内存块函数,多说一些是与之相关的:此两函数,会因为分配或释放失败而抛出异常(exception)

而MM对应的标准分配与释放函数是以返回值形态进行处理的,即失败了,只会返回空值(nil)或非0,而不是异常。

也就是说Get/FreeMem是针对于MM的标准函数进行了异常封装。

异常信息:

GetMem fail => Out of memory.

分配失败,一般只会是进程的可用内存分配完毕,通常在内存泄露的情况下才会发生。

FreeMem fail => Invalid pointer operation

两次FreeMem同地址,第二次就有这invalid pointer异常了。:)

三:GetMemory/FreeMemory

Get/FreeMemory与GetMem/FreeMem基本相同,唯一不相同的是,它直接以MM的对应函数的返回值作为返回,而不进行异常处理。

即:GetMem调用MM.GetMem返回为nil,则有异常,而GetMemory则直接返回nil,交给调用者处理

FreeMem调用MM.FreeMem返回非0(错误释放),则异常,而FreeMemory则直接返回0或非0,给调用者处理。

这点非常有用,在写程序时,可以减少异常,或者在Get/Free出现错误时,写句assert(...),让程序中断下来,检查并调试。

四:SysGetMem/SysFreeMem

SysGetMem/SysFreeMem与GetMemory/FreeMemory基本相同,区别在于,它直接调用MM的实现函数,

则不是经过MM的管理器指针再行跳转。

即说:SysGet/SysFreeMem,它使用的是系统自带的MM分配释放函数,当第三方MM加入后,以上三对函数,

都会由第三方MM接管,但SysGet/SysFreeMem它还是调用的本系统自带的MM函数处理,与第三方MM无关。

五:其它

其它还有些Delphi单元的分配释放函数,不过基本是从以上四对函数扩展出来,就不说明了

当然也有从API扩展出来的分配+释放函数,则不在此列,它与D系统的MM扩展无关。

总结:

New+Dispose与GetMem+FreeMem,是基于VCL异常机制保护的分配+释放函数。

GetMemory+FreeMemory与SysGetMem+SysFreeMem是由调用者自行控制返回,来决定是否返回异常或错误处理。

完。

2014.10.19 by qsl

时间: 2024-10-22 16:31:27

delphi.memory.分配及释放---New/Dispose, GetMem/FreeMem及其它函数的区别与相同的相关文章

delphi.memory.分配及释放---New/Dispose, GetMem/FreeMem及其它函数的区别与相同,内存分配函数

来自:http://www.cnblogs.com/qiusl/p/4028437.html?utm_source=tuicool&utm_medium=referral -------------------------------------------------------------------------------------------------------- 我估摸着内存分配+释放是个基础函数,有些人可能没注意此类函数或细究,但我觉得还是弄明白的好. 介绍下面内存函数前,先说

Delphi的分配及释放---New/Dispose, GetMem/FreeMem及其它函数的区别与相同

转载自:http://www.cnblogs.com/qiusl/p/4028437.html?utm_source=tuicool 我估摸者内存分配+释放是个基础的函数,有些人可能没注意此类函数或细究,但我觉得还是弄明白好. 介绍下面内存函数之前,先说一下MM的一些过程,如不关心课忽略: TMemoryManger = record GetMem: function(Size: Integer): Pointer; FreeMem: function(P: Pointer): Integer;

如何在MD(d)和MT(d)工程间正确分配和释放动态内存

MD(d)和MT(d) MD(d)和MT(d)是windows下VC开发的两个编译选项,表示程序的运行时库编译选项. /MT是"multithread, static version" 意思是多线程静态的版本,定义了它后,编译器把LIBCMT.lib安置到OBJ文件中,让链接器使用LIBCMT.lib 处理外部符号. /MD是"multithread- and DLL-specific version",意思是多线程DLL版本,定义了它后,编译器把MSVCRT.li

Delphi 内存分配 StrAlloc New(转)

源:Delphi 内存分配 StrAlloc New 引自:http://anony3721.blog.163.com/blog/static/5119742010824934164/ 给字符指针(PChar.PWideChar.PAnsiChar)分配内存, 最佳选择是: StrAlloc.StrAlloc 虽然最终也是调用了 GetMem, 但 StrAlloc 会在指针前面添加 Delphi 需要的 4 个管理字节(记录长度).StrAlloc 分配的内存, 用 StrDispose 释放

Delphi 中的自动释放策略

http://www.cnblogs.com/del/archive/2011/12/21/2295794.html Delphi 中的自动释放策略 一.指定 Owner 后, 随 Owner 连带释放: //uses Vcl.StdCtrls, Vcl.ExtCtrls; var   panel: TPanel; procedure TForm1.Button1Click(Sender: TObject); begin   panel := TPanel.Create(Self);   pan

SecureString的实例如何被分配和释放

分析问题 System.Security.SecureString被设计用来保存一些机密的字符串,完成传统字符串所不能做到的工作.传统字符串以明码的形式分配在内存上,一个简单的内存读写软件可以轻易地捕获这些字符串,这在有些机密系统中是不被允许的.读者可能觉得对字符串加密会解决类似的问题,但事实上对字符串加密时字符串已经以明码的方式驻留在内存上很久了,对于该问题唯一的解决办法就是在字符串的获取过程中直接进行加密.SecureString的设计初衷就是解决该类问题. 为了保证它的安全性,Secure

内存管理概述、内存分配与释放、地址映射机制(mm_struct, vm_area_struct)、malloc/free 的实现

http://blog.csdn.net/pi9nc/article/details/23334659 注:本分类下文章大多整理自<深入分析linux内核源代码>一书,另有参考其他一些资料如<linux内核完全剖析>.<linux c 编程一站式学习>等,只是为了更好地理清系统编程和网络编程中的一些概念性问题,并没有深入地阅读分析源码,我也是草草翻过这本书,请有兴趣的朋友自己参考相关资料.此书出版较早,分析的版本为2.4.16,故出现的一些概念可能跟最新版本内核不同.

JAVA模拟内存分配与释放——首次适应算法

前言 首次适应算法(FF,first fit)是内存基于顺序搜索的动态分配分区算法,在分配内存时,从链首开始顺序查找,直至找到一个大小能满足要求的空闲分区为止,然后在按照作业的大小从该分区中划出一块内存空间,分配给请求者,余下的空闲分区仍留在空闲链中.若从链首直至链尾都不能找到一个能满足要求的分区,则表明系统中已没有足够大的内存分配给该进程,内存分配失败,返回. 该算法倾向于优先利用内存中低地址部分的空闲分区,从而保留了高地址部分不断被划分.这为以后到达的大作业分配大的的内存空间创造了条件.其缺

Com组件的内存分配和释放,CredentialProvider SHStrDup 字符串拷贝问题

一.简介 熟悉CredentialProvider的同学应该知道,他为一个Com组件,于是,在这里的内存分配(字符串拷贝)的一系列操作就要按照con的标准来. 二.Com组件的内存分配和释放 COM提供的任务内存分配器,通过IMalloc接口调用.此接口由CoGetMalloc返回.分配内存可以使用IMalloc::Alloc,释放可由IMalloc::Free完成. 为了简化COM库封装了3个API函数来用于内存的分配和释放,如下: void *CoTaskMemAlloc(ULONG cb)