fix: OSMODE=0 in Omniflo-Inserts (Aluprofil/DXF) gegen Hoehen-Umfang-Bug
This commit is contained in:
@@ -589,6 +589,10 @@
|
|||||||
(if (tblsearch "BLOCK" bname)
|
(if (tblsearch "BLOCK" bname)
|
||||||
(setq bname (strcat bname "_" (itoa (fix (* (getvar "CDATE") 1000000)))))
|
(setq bname (strcat bname "_" (itoa (fix (* (getvar "CDATE") 1000000)))))
|
||||||
)
|
)
|
||||||
|
;; Objektfang aus: sonst kann _.INSERT den Einfuegepunkt pt
|
||||||
|
;; auf ein Objekt umfangen (z.B. den Text bei pt) und die
|
||||||
|
;; Hoehe verfaelschen. OSMODE via ssg-start gesichert.
|
||||||
|
(setvar "OSMODE" 0)
|
||||||
(command "_.-BLOCK" bname (list 0.0 0.0 0.0) ss "")
|
(command "_.-BLOCK" bname (list 0.0 0.0 0.0) ss "")
|
||||||
|
|
||||||
;; Block einfuegen (ATTREQ/ATTDIA bereits auf 0)
|
;; Block einfuegen (ATTREQ/ATTDIA bereits auf 0)
|
||||||
@@ -914,6 +918,11 @@
|
|||||||
(setq pt (list (car pt) (cadr pt) (if (caddr pt) (caddr pt) 0.0)))
|
(setq pt (list (car pt) (cadr pt) (if (caddr pt) (caddr pt) 0.0)))
|
||||||
)
|
)
|
||||||
|
|
||||||
|
;; Objektfang aus: sonst kann _.INSERT den (mit expliziter Z-Hoehe
|
||||||
|
;; gesetzten) Einfuegepunkt auf ein Objekt umfangen -> falsche Hoehe
|
||||||
|
;; (gleicher Bugtyp wie beim GF-Z-Versatz). OSMODE via ssg-start
|
||||||
|
;; gesichert, ssg-end stellt es wieder her.
|
||||||
|
(setvar "OSMODE" 0)
|
||||||
;; Block einfuegen mit Drehwinkel aus Dialog
|
;; Block einfuegen mit Drehwinkel aus Dialog
|
||||||
(command "_.INSERT" dxf-pfad pt "" "" angleDeg)
|
(command "_.INSERT" dxf-pfad pt "" "" angleDeg)
|
||||||
;; INSERT vollstaendig abschliessen (Attribut-Prompts beenden)
|
;; INSERT vollstaendig abschliessen (Attribut-Prompts beenden)
|
||||||
|
|||||||
Reference in New Issue
Block a user