老师你好,rhino5能不能写个巨集(或者.rvb什么的)批量删除指定的显示模式??

老师你好,rhino5能不能写个巨集(或者.rvb什么的)批量删除指定的显示模式??

因为tspline和vsr 总是会自动产生显示模式,每次都要手动删除,特别麻烦
谢谢


你这个情况属于不正常的bug
考虑到TS已经停止维护,现在也找不到正版授权方式,因此你的版本很可能就是有问题的

老师你好: 通过巨集删除显示模式,这个巨集怎么写?

Option Explicit

Call Main()
Sub Main()
	Dim modeID, modeName,modeNames
	modeNames = Rhino.ViewDisplayModes(True) '显示名称列表
	For Each modeName In modeNames	'遍历
		If modeName = "tsPreview" Or modeName = "tsShiny"  Then	'找到名字	
			modeID = Rhino.ViewDisplayModeID(modeName)  '获取这个显示模式的ID
			Rhino.DeleteViewDisplayMode(modeID)  '用ID删除这个显示模式
		End If	
	Next
End Sub

这是rvb的写法
注意这是Rhino7测试的,Rhino5的话我这里暂时没法帮你测试。

1 个赞

谢谢老师 :grinning:学习了