Size of memory block

[nco2k]

however, a example by danilo, from german forum:

Code: Select all

Procedure MemorySize(*memory) 
  Shared MemorySize_Shared_PBMemoryHeap 
  !extrn _PB_Memory_Heap                          ; interne PB-Variable in der Memory-Lib 
  !PUSH  dword [_PB_Memory_Heap]                  ; auf Stack: _PB_Memory_Heap 
  !POP   dword [v_MemorySize_Shared_PBMemoryHeap] ; von Stack: MemorySize_Shared_PBMemoryHeap 

  If *memory 
    ProcedureReturn HeapSize_(MemorySize_Shared_PBMemoryHeap,0,*memory) 
  EndIf 
EndProcedure 

a = AllocateMemory(2000) 
Debug MemorySize(a) 

b = AllocateMemory(5000) 
Debug MemorySize(b) 

Debug MemorySize(0)

@Dr.Dri
this should work on win98, i hope... can you test it??

c ya,
nco2k

[Dr. Dri]

no prob with this one ^^

Dri