[FIX] Koordinatensysteme Blocknamen vereinheitlicht bzw korrigiert: KSYS_EIN->KS_EIN, KSYS_AUS->KS_AUS

This commit is contained in:
2026-07-28 12:05:09 +02:00
parent c2e3e5ec16
commit 2d6fab2aa9
31 changed files with 13 additions and 9 deletions
+3 -3
View File
@@ -141,9 +141,9 @@
(setq ks-results '())
(setq sub-entities (vlax-invoke block-obj 'Explode))
(foreach sub-obj sub-entities
;; KS-Blocknamen normalisieren: aeltere Bloecke nutzen KS_EIN/KS_AUS,
;; Vario_Kurve-Bloecke KSYS_EIN/KSYS_AUS (inline, damit diese Fallback-
;; Kopie unabhaengig von vf_core.lsp funktioniert).
;; KS-Blocknamen normalisieren: Standard KS_EIN/KS_AUS; historische
;; Bestandsbloecke koennen noch KSYS_EIN/KSYS_AUS fuehren (inline, damit
;; diese Fallback-Kopie unabhaengig von vf_core.lsp funktioniert).
(setq ks-ref
(if (and (not (vlax-erased-p sub-obj))
(= (vla-get-ObjectName sub-obj) "AcDbBlockReference"))