删除费点

 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

 

转载于:https://www.cnblogs.com/CtrlZ/p/4158267.html