Mesh Display 

triangledir =  "\\";
trianglwireframetriangle =  Import[triangledir <> "triangle.off",   "PolygonData"];
trianglewireframevertexdata 
   = Import[triangledir <>TXFindBoundaryTriangleLocalconstructor.off", "VertexData"]; 
Graphics3D[ 
  Table[
     GraphicsComplex[trianglewireframevertexdata, 
        Line[Append[trianglwireframetriangle[[i]], trianglwireframetriangle[[i, 1]]]]]
  , {i, 1, Length[trianglwireframetriangle]}
  ]
]

posted @ 2012-07-18 21:24  geometry_  阅读(194)  评论(0)  编辑  收藏  举报