删除费点 

 1 disableSceneRedraw()
 2 try
 3 (
 4     for fe in geometry do
 5     (
 6         if fe.Mesh.Numfaces == 0 then
 7         (            
 8             delete fe;
 9         )else()
10     )            
11     for i in geometry do 
12     (    
13         max create mode;
14         select i
15         --subobjectLevel = 1
16         if classof i==Editable_Poly then
17         (
18             i.EditablePoly.deleteIsoVerts()
19         )else
20         (
21             if classof i==Editable_mesh then
22             (
23                 meshop.deleteIsoVerts i;
24             )else()    
25         )
26         --subobjectLevel = 0
27     )
28 )catch()
29 enableSceneRedraw()
30 clearSelection()
View Code

 

posted @ 2014-12-11 18:35  89096000  阅读(95)  评论(0)  编辑  收藏  举报