View Single Post
 
Old 06-24-2014, 06:03 PM
whatsup whatsup is offline Windows 7 64bit Office 2010 32bit
Competent Performer
 
Join Date: May 2014
Posts: 137
whatsup will become famous soon enough
Default

Thanks, for the explanations

I agree and I'm delighted that your function Mem_ReadHex_Words shows the relation to HexPtr(ObjPtr) clearly now.
On the proof for the release of memory I also agree, though it's more complicated as you showed:
Quote:
If Mem_ReadHex_Words(lng_objPtr, 4) = ObjPtr(Sheet1) then
objwks has not been properly released

If Mem_ReadHex_Words(lng_objPtr, 4) ObjPtr(Sheet1) then
objwks has been properly released
Actually:
If Mem_ReadHex_Words(lng_varPtr, 4) doesn't point anymore to
HexPtr(lng_objPtr, 4)
And
Mem_ReadHex_Words(lng_objPtr, 4) <> Mem_ReadHex_Words(ObjPtr(Sheet1))
should proof that memory has been released. (But that's just for the record, I think you meant the same)


Quote:
The Mem_Read for VarPtr is still set to 4 (it should be set to POINTER_LENGTH in fact).
Yes, I was setting it to 4 knowing the value (for objects) has to be in the range of Long. I didn't intend to test anything else with the tool.

Therefore, all we have to do: Thinking up a routine where reference count fails
Reply With Quote