delphi 内存申请和释放
2014-09-17 00:30
357 查看
2012-02-22 12:421 内存分配常见函数
GetMem和FreeMem、GetMemory和FreeMemory、New和Dispose、StrAlloc和StrDispose、AllocMem、SysGetMem和SysFreeMem。
2 GetMem和FreeMem、GetMemory和FreeMemory
由于DELPHI的内存管理都知道分配内存的大小,因此在释放内存的时候,只要给指针地址不用给出长度就可以了。另外提倡用GetMemory和FreeMemory来代替GetMem和FreeMem,因为FreeMemory会判断指针是否为空。
3 New和Dispose
New和Dispose是用来管理变体类型内存分配,如变体结构体:
TRecord = record
Text: string;
Value: Integer;
end;
PRecord = ^TRecord;
如果用GetMem和FreeMem、GetMemory和FreeMemory来释放,会造成Text的内存没有释放,造成内存泄漏。如果用Dispose来释放指针,要加上定义信息,否则造成内存泄漏,正确写法Dispose(PRecord(Point))。
4 StrAlloc和StrDispose
这个函数也是一对,他们分配PChar加一个Cardinal长度,因此一定要用StrDispose释放,否则容易造成4字节的内存泄漏。StrAlloc分配的指针可以使用StrBufSize来获得大小。
5 AllocMem
AllocMem是调用GetMem来分配内存,但是它会把内存全部初始化为#0,因此推荐AllocMem代替GetMem和GetMemory。以下写法都是错误的,都会造成字符串没有结尾符。
function SystemPath: string;
begin
SetLength(Result, GetSystemDirectory(nil, 0));
GetSystemDirectory(PChar(Result), Length(Result));
Result := PChar(Result);
end;
function SystemPath: string;
begin
SetLength(Result, GetSystemDirectory(nil, 0));
GetSystemDirectory(PChar(Result), Length(Result));
Result := PChar(Result);
end;
var
SystemPath: PChar;
Len: Cardinal;
begin
Len := GetSystemDirectory(nil, 0);
SystemPath := GetMemory(Len);
GetSystemDirectory(SystemPath, Len)
FreeMem(SystemPath);
end;
6 SysGetMem和SysFreeMem
SysGetMem和SysFreeMem是上面函数的底层实现,申请的内存不通过DELPHI内存管理器管理,一般不直接使用它们。
GetMem和FreeMem、GetMemory和FreeMemory、New和Dispose、StrAlloc和StrDispose、AllocMem、SysGetMem和SysFreeMem。
2 GetMem和FreeMem、GetMemory和FreeMemory
由于DELPHI的内存管理都知道分配内存的大小,因此在释放内存的时候,只要给指针地址不用给出长度就可以了。另外提倡用GetMemory和FreeMemory来代替GetMem和FreeMem,因为FreeMemory会判断指针是否为空。
3 New和Dispose
New和Dispose是用来管理变体类型内存分配,如变体结构体:
TRecord = record
Text: string;
Value: Integer;
end;
PRecord = ^TRecord;
如果用GetMem和FreeMem、GetMemory和FreeMemory来释放,会造成Text的内存没有释放,造成内存泄漏。如果用Dispose来释放指针,要加上定义信息,否则造成内存泄漏,正确写法Dispose(PRecord(Point))。
4 StrAlloc和StrDispose
这个函数也是一对,他们分配PChar加一个Cardinal长度,因此一定要用StrDispose释放,否则容易造成4字节的内存泄漏。StrAlloc分配的指针可以使用StrBufSize来获得大小。
5 AllocMem
AllocMem是调用GetMem来分配内存,但是它会把内存全部初始化为#0,因此推荐AllocMem代替GetMem和GetMemory。以下写法都是错误的,都会造成字符串没有结尾符。
function SystemPath: string;
begin
SetLength(Result, GetSystemDirectory(nil, 0));
GetSystemDirectory(PChar(Result), Length(Result));
Result := PChar(Result);
end;
function SystemPath: string;
begin
SetLength(Result, GetSystemDirectory(nil, 0));
GetSystemDirectory(PChar(Result), Length(Result));
Result := PChar(Result);
end;
var
SystemPath: PChar;
Len: Cardinal;
begin
Len := GetSystemDirectory(nil, 0);
SystemPath := GetMemory(Len);
GetSystemDirectory(SystemPath, Len)
FreeMem(SystemPath);
end;
6 SysGetMem和SysFreeMem
SysGetMem和SysFreeMem是上面函数的底层实现,申请的内存不通过DELPHI内存管理器管理,一般不直接使用它们。
相关文章推荐
- delphi 内存申请和释放
- DELPHI内存详解(7)-内存申请和释放
- Delphi内存管理(Integer、Boolean、Record、枚举等都是在作用域内编译器自动申请内存,出了作用域自动释放;另外,字符串、Variant、动态数组、接口也是由Delphi自动管理)
- 关于在dll中申请内存,外部释放的问题
- /MT、/MD编译选项,以及可能引起在不同堆中申请、释放内存的问题
- 陈正冲老师讲c语言之内存的申请malloc() 和释放free()
- /MT、/MD编译选项,以及可能引起在不同堆中申请、释放内存的问题
- /MT、/MD编译选项,以及可能引起在不同堆中申请、释放内存的问题
- dll的内存申请和释放问题--Debug程序正常而Release程序崩溃
- Delphi分配或释放内存失败的原因
- 小记 iOS 视图控制器的内存申请与释放普遍规则
- C语言使用回调函数解决内存申请和释放的问题
- delphi 精要-读书笔记(内存分配释放)
- delphi 精要-读书笔记(内存分配释放)
- 多维数组的内存动态申请与释放
- sk_buff整理笔记(三、内存申请和释放)
- 动态链表的创建、节点内存空间申请以及释放
- 位数对齐的内存申请释放
- C++旅途 之 申请动态内存和释放
- c语言多级指针用malloc申请内存,释放报错,为什么会这样捏???????