Anomaly Befehl CORRISPROP - Lisp Kopierfensterwaage

[x11start]

auf autocad 2010 entspricht der Befehl, funktioniert abnormal .... oder vielleicht nutze ich ihn nicht richtig (!):

Dieser Befehl ist sehr nützlich, um von einer Einheit zu einer anderen, bestimmten Eigenschaften zu kopieren; das Problem entsteht, wenn Sie die Notwendigkeit haben, ein Fenster des Papierraums zu kopieren, mit einer anderen.
die erste nur die Skala kopieren wollen.... und nicht die Schichteinstellung (die in einem Fenster eingefroren und nicht in einem anderen); die natürliche Sache zu tun ist:
- Starten Sie den Befehl Co-Eigentum und wählen Sie das Quellfenster
- Typ "z" (Sets)
- "layer" deaktivieren und ausgewählte "Fenster" verlassen
- Klicken Sie auf das Zielfenster.

die Logik würde sagen, dass das erste Fenster kopiert wird die Skala (d.h. der Zoomfaktor) ... aber die Schichteinstellungen sind nicht kopiert.... stattdessen passiert das Gegenteil!
erneut auf uns klicken... die Skala wird kopiert.
Gibt es jemanden, der mir sagen kann, ob der Befehl nicht gut funktioniert... Oder wenn ich ein Idiot bin? Danke.

 

[PlannerRoad]

der Befehl präsentiert die Anomalie in meinem 2010 autocad. : frisch:

 

[x11start]

Danke plannerroad....

"Mal Common Half gaudio"!

...... ist es nicht, dass es vielleicht eine fromme Seele gibt, die den Befehl in lisp.... "verschrieben" hat, um sie an das Original zu ersetzen?

 

[GP.]

Es sollte funktionieren.

; kopieren Sie die Skala eines Fensters des Papierraums
; zu den anderen Fenstern ausgewählt.
; 07/11/2014 - gian paolo cattaneo

(defun c:csf ( / sc windows)
(vl-load-com)
(setq sc)
(vla-get-customscale)
(vlax-ename->vla-object)
(Auto)
)
)
)
(princ "\nselect die Zielfenster")
(Repeat)
(vla-put-customscale)
(vlax-ename->vla-object)
(Namefenster (Setq n (1- n)))
)
♪
)
)
(princ)
)

 

[x11start]

Vielen Dank!

Es funktioniert großartig!

....meine Ferse von Achilles sind all diese Befehle vla... vlax....

 

[GP.]

Bitte, es war ein Vergnügen. :smile:

 

[x11start]

gp Ich fand noch eine kleine Sache in Ihrer Lispe: es funktioniert nur mit rechteckigen Fenstern und nicht mit polygonalen Fenstern oder durch Auswahl eines Objekts hergestellt. Würden Sie sich bitte darum kümmern? Ich kann meine Hände nicht bekommen.

Vielen Dank!

 

[GP.]

Hier.

; die Skala eines Fensters des Papierraums kopieren;
; zu den anderen Fenstern ausgewählt. ;
; 07/11/2014 - gian paolo cattaneo;
; 25/11/2014 - vers.2 (verwenden Sie polygonale Fenster)

(defun c:csf ( / fs sc n fd windows)
(vl-load-com)
(setq fs (car (entsel "\select source windows ")))))
(falls (eq (cdr) (entget fs))) (lwpolyline)
(Setq fs (cdr (assoc 330))
)
(setq sc (vla-get-customscale (vlax-ename->vla-object fs)))
(princ "\nselect die Zielfenster")
(Repeat)
(Setq fd (Namenfenster (Setq n (1-n))))
(falls (eq (cdr (assoc 0 (entget fd))))
(vla-put-customscale (vlax-ename->vla-object fd) sc)
)
)
(princ)
)

 

[x11start]

Danke! Es funktioniert perfekt!

 

[GP.]

Bitte, ich wusste nicht, dass ein polygonales Fenster wie Lwpolyline war. :smile:

 

[Ingo]

Sie könnten ändern, indem Sie sicherstellen, dass Sie nicht falsch wählen Sie das Ende zwischen Ziel?
aber dass der Befehl für alle vorhandenen Fenster in den Layoutscheinwerfern gilt
Kopieren des Viewport Center-Punktes?
Danke.
in dem Sinne, dass meine Fenster in anderen Layouts sind