MyPaintMesh

This code has been declared by its author to be Public Domain code.

MyPaintMesh by FlameDuck

2001

The PaintMesh commands collapses all surface information. This function paints all the surfaces of a mesh individually, which means that surface information is retained.

Function MyPaintMesh(mesh,brush)

For i = 1 To CountSurfaces(mesh)
	surfh=GetSurface(mesh,i)
	PaintSurface surfh,brush
Next

End Function

Comments

None.

Code Archives Forum