mapkey _lf ~ Command `ProCmdLayer_TreeSearch` ;\
mapkey(continued) ~ Close `main_dlg_cur` `PHTLeft.PHLayerUI.LayerShowBtn`;\
mapkey(continued) ~ Select `layertreequery` `CategoryList`1 `Contains Item Id`;\
mapkey(continued) ~ Open `layertreequery` `CmpMethodRadio`;\
mapkey(continued) ~ Close `layertreequery` `CmpMethodRadio`;\
mapkey(continued) ~ Select `layertreequery` `CmpMethodRadio`1 `>`;\
mapkey(continued) ~ Input `layertreequery` `ValueInput` `0`;\
mapkey(continued) ~ Update `layertreequery` `ValueInput` `0`;\
mapkey(continued) ~ Activate `layertreequery` `AddBtn`;\
mapkey(continued) ~ Activate `layertreequery` `TreeFilterBtn`1 ;\
mapkey(continued) ~ Activate `layertreequery` `SelectAllBtn`;\
mapkey(continued) ~ Activate `layertreequery` `CloseBtn`;\
mapkey(continued) ~ Select `main_dlg_cur` `PHTLeft.PHLayerUI.LayerShowBtn`;\
mapkey(continued) ~ Close `main_dlg_cur` `PHTLeft.PHLayerUI.LayerShowBtn`;\
mapkey(continued) ~ Activate `main_dlg_cur` `DispNonSelOnlyBtn`;\
mapkey(continued) ~ Close `main_dlg_cur` `PHTLeft.PHLayerUI.LayerShowBtn`;\
mapkey(continued) ~ Select `main_dlg_cur` `PHTLeft.PHLayerUI.AssyTree`1 `node0`;\
mapkey(continued) ~ RButtonArm `main_dlg_cur` `PHTLeft.PHLayerUI.AssyTree` `node0`;\
mapkey(continued) ~ Command `ProCmdLayer_SelectLayers` ;\
mapkey(continued) ~ RButtonArm `main_dlg_cur` `PHTLeft.PHLayerUI.AssyTree` `node0`;\
mapkey(continued) ~ Command `ProCmdLayer_DelLay` ;~ FocusIn `UI Message Dialog` `yes`;\
mapkey(continued) ~ Activate `UI Message Dialog` `yes`;\
mapkey(continued) ~ Select `main_dlg_cur` `PHTLeft.PHLayerUI.LayerShowBtn`;\
mapkey(continued) ~ Close `main_dlg_cur` `PHTLeft.PHLayerUI.LayerShowBtn`;\
mapkey(continued) ~ Activate `main_dlg_cur` `DispAllBtn`;\
mapkey(continued) ~ Close `main_dlg_cur` `PHTLeft.PHLayerUI.LayerShowBtn`;
Dieses Mapkey sucht alle Folien, welche Objekte enthalten, filtert diese aus dem Folienbaum raus und löscht die verbliebenen.
Habe es nur kurz an Einzelteil und einer Baugruppe getestet, es scheint wie gewünscht zu funktionieren.
Aber trotzdem ausgiebig testen vor produktivem Einsatz...
Gruß
Arni
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP