Size of memory block

Lebostein · Post by **Lebostein** » Fri Feb 18, 2005 8:18 am

Hi,

i will calculate the size of an allocated memory block. I found "GlobalSize()" in API - under Windows 98 the function returns NULL

. Under XP no problems:

Code: Select all

*adress_bas = AllocateMemory(20200)
*adress_api = GlobalAlloc_(#GMEM_FIXED, 20200)

Debug GlobalSize_(*adress_bas) ; = 20200 (under Win98 = 0 !!!)
Debug GlobalSize_(*adress_api) ; = 20200

Debug LocalSize_(*adress_bas) ; = 20200 (under Win98 = 0 !!!)
Debug LocalSize_(*adress_api) ; = 20200

How i can calculate the size of an memory block (created with PB) in a different way?

Post by **Fred** » Fri Feb 18, 2005 1:17 pm

GlobalSize() shouldn't work even on XP.. Here is the right way to do it:

Code: Select all

a = AllocateMemory(1001)

PB_Memory_Heap.l = 0

!extrn _PB_Memory_Heap
!mov eax,[_PB_Memory_Heap]
!mov dword [v_PB_Memory_Heap],eax

Debug PB_Memory_Heap

Debug HeapSize_(PB_Memory_Heap, 0, a)

Lebostein · Post by **Lebostein** » Fri Feb 18, 2005 3:06 pm

Thank you!

Can I use "GetProcessHeap_()" instead of this small ASM-Routine?

Post by **Fred** » Fri Feb 18, 2005 3:20 pm

no, it's not the process heap, but a special one for the memory commands.

Lebostein · Post by **Lebostein** » Fri Feb 25, 2005 11:28 am

Ok! Thanks.

Can you implement this routine in PB alias "MemorySize(*MemoryID)", for example?

Post by **Polo** » Fri Feb 25, 2005 12:09 pm

Yes, this would be a good idea

GedB · Post by **GedB** » Fri Feb 25, 2005 12:54 pm

I'd like this too.

Rescator · Post by **Rescator** » Fri Feb 25, 2005 2:53 pm

That would definetly be great!
And since PureBasic keeps track internaly of the memory allocation sizes anyway,
a simple memory size command should be pretty easy to add (I hope).
It would certainly reduce the amount of variables since you don't have to keep track of the size yourself.

gnozal · Post by **gnozal** » Sat Feb 26, 2005 8:55 am

Me too

BinoX · Post by **BinoX** » Sat Feb 26, 2005 2:56 pm

*Jumps on the wagon*

Yep, me too

nco2k · Post by **nco2k** » Fri Dec 09, 2005 10:23 am

dito.

c ya,
nco2k

Rescator · Post by **Rescator** » Sat Dec 10, 2005 3:15 pm

Hmm odd! GetProcessHeap_() works here, (PB 3.94, WinXP)

i.e:

Code: Select all

Procedure.l MemorySize(*memptr)
 ProcedureReturn HeapSize_(GetProcessHeap_(),#Null,*memptr)
EndProcedure

*mem=AllocateMemory(2002)
If *mem=0
 Debug "ReAlloc Failed"
 End
EndIf

*tmp=ReAllocateMemory(*mem,3003)
If *tmp<>0
 *mem=*tmp
Else
 Debug "ReAlloc Failed"
 End
EndIf

Debug MemorySize(*mem)

Seem to work ok, at least here!

Dr. Dri · Post by **Dr. Dri** » Sat Dec 10, 2005 3:28 pm

doesn't work with win 98 se (PB 3.94)

Dri

Rescator · Post by **Rescator** » Sat Dec 10, 2005 4:03 pm

Hmm! Interesting. some difference in the WinAPI on different windows versions vs PB ?

Post by **Fred** » Sat Dec 10, 2005 4:23 pm

I don't know why it work at all, as it's definitely not the process heap.