Trying this test program:
The memory goes up 1 time only (the first time) by about 32 kilobytes. After that, it stays put. It appears that the memory is being reused.
Are you sure you are not leaving some memory hanging, like a type within a type, or a media handle (image, sound)?
Type player Field stuff End Type Dim p.player(1000) For iteration = 1 To 5 Print iteration WaitKey ;create all players For x=1 To 100 p(x)=New player p(x)\stuff=1 Next WaitKey ;delete all players For pk.player=Each player Delete pk Next Next
The memory goes up 1 time only (the first time) by about 32 kilobytes. After that, it stays put. It appears that the memory is being reused.
Are you sure you are not leaving some memory hanging, like a type within a type, or a media handle (image, sound)?