Delphi 枚举内存堆的实例.rar

时间:2022-07-30 03:23:03
【文件属性】:

文件名称:Delphi 枚举内存堆的实例.rar

文件大小:8KB

文件格式:RAR

更新时间:2022-07-30 03:23:03

Delphi源码-系统相关

Delphi 枚举内存堆的源码,一个简单的Delphi7 Windows相关编程实例,内存堆枚举的例子。源代码如下:ListView1.Items.BeginUpdate;   ListItem:=ListView1.Items.add;   ListItem.Caption:=IntTostr(HeapList.th32HeapId);   Listitem.SubItems.Add(format('$%p',[Pointer(HeapStruct.dwAddress)]));   ListItem.SubItems.add(format('%d字节',[HeapStruct.dwBlockSize]));   case HeapStruct.dwFlags of    LF32_FIXED:    flagStr:='固定块';    LF32_FREE:    flagstr:='空闲块';    LF32_MOVEABLE:    flagstr:='可移动块';   end;


【文件预览】:
srcfans.com
----枚举内存堆()
--------Project1.dof(1KB)
--------Unit1.dcu(7KB)
--------Unit1.dfm(1KB)
--------Project1.cfg(386B)
--------Project1.dpr(188B)
--------Unit1.pas(4KB)
--------Project1.res(876B)
--------Unit1.ddp(51B)

网友评论