---

Hallo Zusammen,

Problem:
der zuletzt benutzte Drucker wird im Dokument gespeichert,
haben sich die Drucker geändert oder ist die Zeichnung von einer
anderen Firma oder Abteilung kommt jedesmal beim öffenen des Druckdialoges eine Fehlermelung " Drucker nicht vorhanden..."
nach dem wegklicken der Meldung kann ich dann schon den gewünschten
Drucker wählen und alles funkioniert,
Wie kann ich aber die lästige Meldung loswerden?
Gibt es eine Systemvariable die den letzten Drucker speichert,
wenn ja könnte ich diese über die startdoc.lsp ja auf "kein" setzen
oder?

Danke und Gruß Wolfgang

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo,
die Ploteinstellungen einschließlich Plotter werden für jedes Layout gesondert gespeichert, deshalb kann es wohl keine sysvar sein.
Drucke doch vor der Dateiweitergabe einmal aus jedem Layout auf dem Plotter "Kein", das sollte das gewünschte Ergebnis bringen.

------------------

gruß
thomas

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Thomas,

das ist schon richtig, wenn ich eine alte Zeichnung öffne die Fehlermeldung wegklicke und dann dern richtigen Plotter wähle die Zeichnung speichere dann kommt die Meldung nichtmehr.
Das was ich verhindern will ist das Erscheinen der Fehlermeldung, daß ich sie durch ein paar Klicks frür zukünfiges öffnen der Zeichnung verhindern kann weiß ich, aber mir ist halt schon das zuviel.
7000 Zeichnungen je Klick 1sec. = 2Stunden
Werden die Zeichnungen von anderen Abteilungen benutzt die andere Drucker haben das gleiche wieder...
Aber da fällt mir ein ich habe im Forum mal was von einem Programm gelesen das einem die immer gleichen Fehlermelungen automatisch weglickt, evtl. werde ich das mal probieren.

Danke und Gruß Wolfgang

[Diese Nachricht wurde von Wolli am 14. März 2003 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Nur sone Idee, aber vieleicht könnte man über pagesetup ein Makro oder Script machen das den "richtigen" Drucker mit Einstellungen wieder einstellt.

------------------
Gruss
Caladia

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo WOlfgang!

Wir benutzen den erstellten Drucker plotter.pc3

Wenn die Zeichnung in eine andere Abteilung kommt, haben wir keine Probleme weil sie ja auch den plotter.pc3 haben.
Somit gibt es keine Fehlermeldung.

Der Drucker plotter.pc3 vewrweist halt in jeder Abteilung auf den Drucker den sie haben.

Grüße,...........Martin

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hi,

vielleicht kannst Du damit etwas anfangen:
(vla-put-ConfigName
  (vla-get-activelayout
    (vla-get-activedocument (vlax-get-acad-object))
  )
  "Kein"
)

------------------
www.cadditions.de

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo CADchup,

einfach in die Startdoc.lsp kopiert und funktioniert einwandfrei.
Wenn Du mir noch was dazulispelst daß das nicht nur im aktuellen Layout läuft sondern in allen dann wäre ich wunschlos glücklich.

Hallo Strauchi,
Dein Vorschlag ist auch gut, wenn ich eine neutrale Bezeichnung für die PC3-Datei gewählt hätte, ich habe leider HP5000TB.pc3 gewählt, wenn die jetzt auf den Xerox weiterleitet dann gibt es ganz schön Verwirrung.

Hallo Caladia,
auch kein schlechter Ansatz, ich lasse bisher das pagesetup beim Öffnen einer Zeichnung automatisch neu reinkopieren, nur darf ich die Einträge darin nicht auf "kein" setzen sonst ist der ganze Komfort weg daß man nur einen Eintrag aus dem pagesetup wählt und alles ( Drucker, Maßstab, Stifzuweisung... ist fertig)

Danke und Gruß Wolfgang

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Wenn man ihn HP5000.pc3 nennt, und dann ist das ein Xerox Drucker ist das natürlich verwirrend.

Deshalb heissen sie eben LASER.PC3 bzw. PLOTTER.PC3,....

Also modellneutrale Namen.

Gruß Martin

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hi,
hier isses:

(defun c:KeinDrucker (/ curtab)
  (setq curtab (getvar "CTAB"))
  (foreach tab (layoutlist)
    (setvar "CTAB" tab)
    (vla-put-ConfigName
      (vla-get-activelayout
(vla-get-activedocument (vlax-get-acad-object))
      )
      "Kein"
    )
  ) ; foreach
  (setvar "CTAB" curtab)
  (princ)
) ; defun

Ich würde das Teil aber nicht autom. loslaufen lassen. Zum Einen, weil's bei mehreren Layouts eine Weile braucht, zum Zweiten, weil es auch dann passiert, wenn Du es mal nicht brauchst.
Vorschlag: Mach Dir einen eigenen Plot-Knopf und trage folgendes Makro ein:
^C^CKeinDrucker;_plot;
Dann werden die Drucker nur vor dem Plotten über diesen Knopf gelöscht.

(Blöde Formatierung)

[Diese Nachricht wurde von CADchup am 17. März 2003 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Servus CADchup,

Dein Lisp funktioniert einwandfrei,
ist es auch möglich statt kein Drucker einen bestimmten Drucker
einzustellen z.B. eine PC3-Datei oder einen Netzwerkdrucker \\Drucker\HP5000TKB

Danke und Gruß Wolfgang

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo,

@cadchup
das klappt ganz prima.
Kann man auch noch die Plotstiltabelle mit einbauen?

Ciao

------------------

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Servus

Hier mein Senf 

Hab mir IconŽs für die Seiteneirichtng erstellt sieh dan ugf so aus

"0,0 ^C^C-plot;j;;HP 1050C.pc3;Standard (610.00 x 3000.00 MM);M;Q;N;Layout;1:1;2997,607;j;Standard.stb;j;N;N;N;N;j;N;^C^C_zoom;a"

Richtige PC3, Paier, Ausrichtung, Maßstab u. STB wierd eingestellt.

Einziger Nachteil bei CTB dateien funkt nicht.

------------------
Wer Rechtschreibfehler findet, darf sie der Analphabetenvereinigung schenken.
Warum einfach, es geht auch Kompliziert.
mfG Bernd P.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

So,

habe das Teil für Wolli und AsSchu angepasst:

;;; setzt Drucker und/oder Plotstiltabelle
;;; Bsp.: (Drucker "\\\\SERVERNAME\\Druckername" "Plotstilname")
;;;
;;; !!! Obacht: Für jeden Backslash müssen in Lisp zwei gemacht werden !!!
;;;
;;; Wenn nur einer der beiden Parameter gesetzt werden soll,
;;; kann der andere mit nil angegeben werden.
;;; Bsp.: (Drucker "\\\\SERVERNAME\\Druckername" nil)
;;; ----------------------------------------------------------------------

(defun Drucker (plotter plotstyle / curtab)
  (setq curtab (getvar "CTAB"))
  (foreach tab (layoutlist)
    (setvar "CTAB" tab)
    (setq actlay (vla-get-activelayout
  (vla-get-activedocument (vlax-get-acad-object))
)
    )
    (if plotter
      (vla-put-ConfigName actlay plotter)
    ) ; if
    (if plotstyle
      (vla-put-StyleSheet actlay plotstyle)
    ) ; if
  ) ; foreach
  (setvar "CTAB" curtab)
  (princ)
) ; defun

Viel Spaß damit,
CADchup

------------------
www.cadditions.de

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Zitat:

---

Original erstellt von AsSchu:
Hallo,

Original erstellt von AsSchu:
Hallo,
das klappt ganz prima
Mit Vorsicht.
wenn man aus Versehen im Modellbereich ist, nicht anwenden, weil dann die Seiteneinrichtung des Layouts zerstört wir

Ciao

---

------------------

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Zitat:

---

Original erstellt von AsSchu:
Mit Vorsicht.
wenn man aus Versehen im Modellbereich ist, nicht anwenden, weil dann die Seiteneinrichtung des Layouts zerstört wird

---

Hi,
die Seiteneinrichtung wird nicht zerstört, sie ändert sich. 
Und das soll sie gefälligst auch, denn mit dem Lisp wird ein anderer Drucker eingestellt der eigene Papiergrößen und somit andere Einstellungen mitbringt.

Gruß
CADchup

------------------
www.cadditions.de

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Zitat:

---

Original erstellt von CADchup:
Hi,
die Seiteneinrichtung wird nicht zerstört, sie ändert sich. 
Und das soll sie gefälligst auch, denn mit dem Lisp wird ein anderer Drucker eingestellt der eigene Papiergrößen und somit andere Einstellungen mitbringt.
Entschuldigung, du hast natürlich Recht. War etwas vorschnell von mir. Habe mich gestern nur darüber geärgert, dass meine Seiteneinrichtung kaputt war, obwohl ich den gleichen Plotter wie zuvor in der lisp definiert habe.

Ciao

---

------------------

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP