Correct way to freeentities/textures

BlitzMax Forums/MiniB3D Module/Correct way to freeentities/textures

KronosUK

(Posted 2009) [#1]

Can someone please show me the correct way to free this entity and then recreate it. As you can see pressing I repeatedly increases the memory allocation which I assume is bad.

In my real world program I am creating a terrain mesh, terrain texture and then recreating it but I can't seem to clear the previous mesh.

Import sidesign.minib3d


Graphics3D 1024,768
camera=CreateCamera()
light=CreateLight()

sphere=CreateSphere()

PositionEntity sphere,0,0,5

While Not KeyHit(KEY_Escape) And Not AppTerminate()
		

If KeyHit(key_I) Then 

FreeEntity sphere
sphere=CreateSphere(32)
EntityColor sphere,Rnd(255),Rnd(255),Rnd(255)
PositionEntity sphere,count,0,5
PointEntity camera,sphere
count=count+1
EndIf

UpdateWorld()
RenderWorld()

Text 0,12, "Memory allocated (MB's)= "+GCMemAlloced()/1048576
Flip
	
Wend

ShowMouse()
End

Edit: Well ..putting the mesh into a type seems to work


Import sidesign.minib3d


Graphics3D 1024,768
camera=CreateCamera()
light=CreateLight()

Local MyMesh:MarkMesh = New MarkMesh
mymesh.mesh=CreateSphere(64)

PositionEntity mymesh.mesh,0,0,5

While Not KeyHit(KEY_Escape) And Not AppTerminate()
		

If KeyDown(key_I) Then 
mymesh.remove

mymesh.mesh=CreateSphere(64)
EntityColor mymesh.mesh,Rnd(255),Rnd(255),Rnd(255)
PositionEntity mymesh.mesh,count,0,5
PointEntity camera,mymesh.mesh
count=count+1
EndIf

UpdateWorld()
RenderWorld()

Text 0,12, "Memory allocated (MB's)= "+GCMemAlloced()/1048576

Flip
	
Wend

ShowMouse()
End

Type MarkMesh

Field Mesh:TMesh

Method remove()

FreeEntity mesh
End Method


End Type

Warner

(Posted 2009) [#2]

Indeed, when not using the types, handles will be converted into integers.
Integer handles should be released with Release, or else it causes a memory leak.
It might be a good practice to use SuperStrict.

KronosUK

(Posted 2009) [#3]

Thanks Warner. That explains the situation clearly.