文件名称: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)