Mesh Setcolor

[smartmine]

when im migrating my application to 6.5 version i cannot make this piece of code work... the mesh aways appears white, can someone help?

thnx

Code:

Set objMesh = Scene.CreateMeshBuilder(strLayerName)
objMesh.SetPrimitiveType TV_LINELIST
objMesh.SetColor RGBA(1, 0, 0, 1)
objMesh.SetCollisionEnable False
...

[WEst]

try to add this:

Code:

objMesh.SetLightingMode(CONST_TV_LIGHTINGMODE.TV_LIGHTING_MANAGED)

[smartmine]

i did what you said, but nothing happened
i also tried with TV_LIGHTING_NORMAL but nothing happened either

Code:

Set objMesh = Scene.CreateMeshBuilder(strLayerName)
objMesh.SetPrimitiveType TV_LINELIST

objMesh.SetColor RGBA(1, 0, 0, 1)
objMesh.SetLightingMode  CONST_TV_LIGHTINGMODE.TV_LIGHTING_MANAGED
       
objMesh.SetCollisionEnable False

[smartmine]

bump

[Eric]

try setting a material instead of just setcolor

[smartmine]

I changed my code to:

Code:

MaterialFactory.CreateMaterialQuick 1, 0, 0, 1, strMatName
Set objMesh = Scene.CreateMeshBuilder
objMesh.SetPrimitiveType TV_LINELIST
objMesh.SetMaterial GetMat(strMatName)
objMesh.SetCollisionEnable False
.. Add vertexs ...

but the problem continue...  

another suggestion?

[newborn]

using a material wont fix it ! actually, when you use .setcolor, it creates a temp material which is then applyed to the mesh

just a quick checkup, do you have at least one light in your scene?

[SylvainTV]

Maybe a bug, Maybe i don't apply lighting/material for line lists..

[smartmine]

using a material wont fix it ! actually, when you use .setcolor, it creates a temp material which is then applyed to the mesh

just a quick checkup, do you have at least one light in your scene?

Here is my code with one light:

Code:

LightEngine.CreatePointLight Vector(0, 0, 100), 1, 1, 1, 100, "Light1"
LightEngine.EnableLight GetLight("Light1"), True

...

Set objMesh = Scene.CreateMeshBuilder(strName)
objMesh.SetPrimitiveType TV_LINELIST

objMesh.SetColor RGBA(1, 0, 0, 1)
objMesh.SetLightingMode TV_LIGHTING_MANAGED
       
objMesh.SetCollisionEnable False

... Add Vertex...

but still not working... did i miss something?

Maybe a bug, Maybe i don't apply lighting/material for line lists..

SylvainTV how can i confirm that this is a bug? Is there another way to set my TV_LINELIST color?

Thanks

[SylvainTV]

Another way would be to add the color per vertex.

int CTVMesh::AddVertex(float x, float y, float z, float nx, float ny, float nz, float tu1, float tv1, float tu2 , float tv2 , int color)

(see the color here)

However you must have diffuse in the vertex format, before adding a color  :
Mesh.SetMeshformat TV_MESHFORMAT_DIFFUSE + TV_MESHFORMAT_NOLIGHTING

I'm checking the code here to see why a material doesn't work.

[smartmine]

Another way would be to add the color per vertex.

int CTVMesh::AddVertex(float x, float y, float z, float nx, float ny, float nz, float tu1, float tv1, float tu2 , float tv2 , int color)

(see the color here)

However you must have diffuse in the vertex format, before adding a color  :
Mesh.SetMeshformat TV_MESHFORMAT_DIFFUSE + TV_MESHFORMAT_NOLIGHTING

I'm checking the code here to see why a material doesn't work.

It works SylvainTV thanks  

The final code:

Code:

Set objMesh = Scene.CreateMeshBuilder(strName)
objMesh.SetPrimitiveType TV_LINELIST
objMesh.SetMeshFormat TV_MESHFORMAT_DIFFUSE + TV_MESHFORMAT_NOLIGHTING
objMesh.SetCollisionEnable False

... Add vetexes with color (last parameter of AddVertex method) ...

Thanks all

[DanDixon]

This was very helpful. Adding some more info for those searching how to work with Vertex Color (like I did today):

In 6.5 the right mesh format is (where theMesh is a TVMesh):

Code:

theMesh.SetMeshFormat CONST_TV_MESHFORMAT.TV_MESHFORMAT_DIFFUSE + CONST_TV_MESHFORMAT.TV_MESHFORMAT_NOLIGHTING

And don't set a lighting mode or set it to this one:

Code:

theMesh.SetLightingMode(CONST_TV_LIGHTINGMODE.TV_LIGHTING_NONE)

I also was trying to use vertex created by AddFloorGrid. This didn't seem to work. I had to create my plane manually using AddVertex (in this case it's a trianglestrip):

Code:

theMesh.SetPrimitiveType(CONST_TV_PRIMITIVETYPE.TV_TRIANGLESTRIP)
theMesh.AddVertex(-0.5, 0, 0, 0, 1, 0, 0, 0)
theMesh.AddVertex(-0.5, 0, 1, 0, 1, 0, 0, 1)
theMesh.AddVertex(0.5, 0, 0, 0, 1, 0, 1, 0)
theMesh.AddVertex(0.5, 0, 1, 0, 1, 0, 1, 1)

Later I use GetVertex and SetVertex to change the color and just recopy all of the other values.

Code:

Dim NewCol as Interger = TVGlobals.RGBA(1, 0, 0, 1)
theMesh.GetVertex(vertexID, X, Y, Z, nX, nY, nZ, TU1, TV1, TU2, TV2, OldCol)
theMesh.SetVertex(vertexID, X, Y, Z, nX, nY, nZ, TU1, TV1, TU2, TV2, NewCol)