fix: SSG_DIM_SWITCH nil-sicher machen und Startmodus in Konsole anzeigen,fix: DXFM_DIM beim MNL-Start immer auf 3D zuruecksetzen (BricsCAD-Registry-Override),Menue neu Laden nötig
This commit is contained in:
@@ -166,7 +166,28 @@
|
||||
(menucmd "P13=+SSG_LIB.POP1")
|
||||
(setvar "DBLCLKEDIT" 1)
|
||||
(princ "\n[SSG_LIB] Alle Module geladen. Menue aktiv.")
|
||||
;; Beim Start immer auf globalen Default 3D zuruecksetzen.
|
||||
;; Hintergrund: AutoLISP-setenv schreibt in die BricsCAD-Profilregistry.
|
||||
;; Ohne diesen Reset wuerde ein alter SSG_DIM_SWITCH-Wert aus der Vorsitzung
|
||||
;; ueber setenv.bat gewinnen - unabhaengig davon, wie BricsCAD gestartet wurde.
|
||||
(setenv "DXFM_DIM" "3D")
|
||||
(princ (strcat "\n[SSG_LIB] Einfuege-Modus: 3D"
|
||||
" (Umschalten global: SSG_DIM_SWITCH im Menue)"))
|
||||
)
|
||||
(princ "\n[SSG_LIB] WARNUNG: DXFM_LISP nicht gesetzt - Befehle nicht verfuegbar.")
|
||||
)
|
||||
|
||||
;; S:STARTUP: wird von BricsCAD nach vollstaendiger Dokument-Initialisierung
|
||||
;; aufgerufen - also NACH allen anderen Lade-Meldungen und Duplikaten.
|
||||
;; defun-q haengt an eine bestehende S:STARTUP-Definition an (kein Ueberschreiben).
|
||||
(defun-q S:STARTUP ()
|
||||
(if (car (atoms-family 1 '("SSG-ILS-DIM-AKTUELL")))
|
||||
(progn
|
||||
(princ (strcat "\n[SSG_LIB] Einfuege-Modus: " (ssg-ils-dim-aktuell)
|
||||
" (Umschalten global: SSG_DIM_SWITCH im Menue)"))
|
||||
(princ)
|
||||
)
|
||||
)
|
||||
)
|
||||
|
||||
(princ)
|
||||
|
||||
Reference in New Issue
Block a user