日志
clearInvisible.il
| ||
;; clearInvisible.il
;; clear something that invisible in layout
;; zoujunlin 2017/11/19
procedure(clearInvisible()
let(()
cv = geGetEditCellView()
;;delete steiners
foreach(x cv->steiners dbDeleteObject(x));end foreach
;;delete guides
foreach(x cv->guides dbDeleteObject(x));end foreach
;;delete markers
foreach(x cv->markers dbDeleteObject(x));end foreach
;;delete changedLayers
allLayersList = cv->lpps
foreach(xlayer allLayersList
if(xlayer->layerName == "changedLayer" then
foreach(x xlayer->shapes dbDeleteObject(x));end foreach
);end if
);end foreach
;;delete specific layers, change the list below as you wish
layersNeedDeleteList = list(list("ref" "drawing") list("hilite" "drawing"))
;;list all layers in this cell view first, so that you can find which layers need to be delete
foreach(xlayer allLayersList
printf("(%s\t%s)\n" xlayer->layerName xlayer->purpose)
);end foreach
printf("All %d layers found before layer delete...\n" length(allLayersList))
foreach(xlayer allLayersList
xlayerNamePurpose = list(xlayer->layerName xlayer->purpose)
if(exists(x layersNeedDeleteList xlayerNamePurpose == x) then
foreach(y xlayer->shapes dbDeleteObject(y));end foreach
);end if
);end foreach
allLayersList = cv->lpps
printf("All %d layers found after layer delete!\n" length(allLayersList))
);end let
);end procedure
hiSetBindKey("Layout" "<Key>]" "clearInvisible()")
全部作者的其他最新日志
发表评论 评论 (2 个评论)
- 回复 nwczehwrc9
- com/ <a href="http://www.kgcomputerinstitute.com/us.aspx?name=h9r0b3-breitling-aopa-navitimer-price">breitling aopa navitimer price</a> programs/notiflyer/index, <a href="http://www.kgcomputerinstitute.com/us.aspx?name=y3n8w8-breitling-bentley-bentayga">breitling bentley bentayga</a> breitling aopa navitimer price. 12 and March 29,breitling bentley bentayga. it is a relative unknown to most potential visitors. Those who pull off the <a href="http://www.kgcomputerinstitute.com/us.aspx?name=c2j5l6-athletic-walking-shoes">athletic walking shoes</a> highway or fly in and stay awhile are boaters and fisherman; Narragansett Bay and Rhode Island Sound are fine places
- 回复 agdueydkr3
- basic rescue equipment,asics g <a href="http://www.kgcomputerinstitute.com/us.aspx?name=j8w4h6-asics-gt-black">asics gt black</a> t black,95The <a href="http://www.kgcomputerinstitute.com/us.aspx?name=k0b7w4-cheap-asics-womens-trainers">cheap asics womens trainers</a> Nirvana Pro 35-liter pack is a super-functional,cheap asics womens trainers,TONIGHT..REST OF THIS AFTERNOON.. NO Last Updated: 5/ 2 4.7 14 Reviews 4019ft 9882ft 5863ft 4,stai <a href="http://www.kgcomputerinstitute.com/us.aspx?name=k2z7q0-stainless-steel-breitling-watches">stainless steel breitling watches</a> nless steel breitling watches. AT Zuletzt aktualisiert: 29/3 24 Std. AT Zuletzt
/1 
eetop公众号
创芯大讲堂
创芯人才网