---

Hallo!

Es geht um folgendes:

Einige Zeichnungen müssen speziell gekennzeichnet werden. Damit der Konstrukteur dies nicht vergisst, wäre es schön wenn sich beim Plotbefehl ein Fenster öffnen würde indem einfach nur der Hinweis steht:

Stempel einfügen nicht vergessen (wenn erforderlich)!

Gut wäre hier auch ein Button bzw. Hyperlink auf ein Excel-Dokument indem diese Stempel zentral dokumentiert werden.

Wie kann man so etwas realisieren? Bin bei meiner Recherche leider noch nicht fündig geworden 

Danke für eure Ideen!

Karsten.

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

---

(alert "WICHTIG !")

------------------
MfG Proxy

Bitte beachten Sie: Die Verwendung der hier bereitgestellten Signatur geschieht auf Ihre eigene Verantwortung. Diese Signatur wird ohne Gewähr auf Richtigkeit, Vollständigkeit und/oder Funktionalität, sowie ohne Anspruch auf Support zur Verfügung gestellt.

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

---

..eine neue Plotfunktion proggen, die ein Fenster aufpoopen läßt und erst bei OK den Plot ausführt... und die dann mittels Befehl "_UNDEFINE" an Stelle des Originalen Plotbefehls setzen .. oder eine Programmierung mit einem command-reactor...

------------------
  - Thomas -
"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."

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

---

@Proxy: Wie kann ich diesen "alert" denn einbinden? In der .mnu? Danke für die etwas ausführlichere Beschreibung...

@CADmium: Wie proggt man denn eine Plotfunktion? Und an welcher Stelle soll ich _UNDEFINE einfügen?

Tut mir leid, bin quasi jungfräulich auf diesem Gebiet...

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

---

(defun c:_plot()
  (alert "Wichtig")
  (command "_.plot")
)

und zu bflösch bemüh mal die Hilfe

------------------
  - Thomas -
"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."

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

---

Danke CADmium, damit konnte ich schon etwas mehr anfangen. Hier der Text den ich in der Hilfe gefunden habe:

Sie möchten beispielsweise den vorgegebenen BefehlSCHRAFF so überschreiben, daß eine Meldung hinzugefügt und anschließend zum BefehlGSCHRAFF gewechselt wird. Verwenden Sie hierzu die Datei acaddoc.lsp mit den folgenden Angaben:

(defun C:SCHRAFF ( )
  (alert "Wechsel zum Befehl GSCHRAFF!")
  (princ "\nMit ALTSCHRAFF können Sie den ursprünglichen Befehl SCHRAFF verwenden.\n")
  (command "GSCHRAFF")
  (princ)
)
(defun C:ALTSCHRAFF ( )
  (command ".SCHRAFF")
  (princ)
)
(defun-q S::STARTUP ( )
  (command "bflösch" "schraff")
  (princ "\nBefehl SCHRAFF wurde zu GSCHRAFF umdefiniert!\n")
)

Ich habe nun in der acaddoc.lsp folgendes eingefügt:

(defun C:_plot ( )
  (alert "Stempel einfügen nicht vergessen (wenn erforderlich)!")
  (command "_.plot")
  (princ)
)
(defun-q S::STARTUP ( )
  (command "bflösch" "_plot")
  (princ "\nBefehl _plot wurde geändert!\n")
)

Das Beispiel aus der ACAD-Hilfe läuft ohne Probleme, ich habs eingefügt und es passiert alles was passieren soll. Das der alte Plot-Befehl unter anderem Namen noch zu verfügung steht will ich nicht, also hab ich diesen Abschnitt weggelassen.
Die Zeile "Befehl _plot wurde geändert!" zeigt mir ACAD nach dem Start auch an, aber führe ich _plot nun aus ist der Befehl unbekannt. Meiner Meinung nach hab ich das Hilfe-Beispiel 1:1 übersetzt, aber irgendwie scheint da doch was faul zu sein...

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

---

Hallo,
versuchs mal so:

Code:

---

(defun c[Doppelpunkt]plot ()
  (alert "Stempel einfügen nicht vergessen (wenn erforderlich)!")
  (initdia)
  (command "_.plot")
  (princ)
)

---

Grüsse, Henning

[Diese Smilies machen mich noch wahnsinnig]
------------------
VoxelManufaktur Computer-Dienstleistungen für Architekten und Ingenieure

      http://www.voxelman.de

[Diese Nachricht wurde von wronzky am 27. Jun. 2007 editiert.]

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

---

Nachtrag:

Ich habe in meinem Code jetzt die underliner (_) weggelassen. Nun kommt das Popup!!!  Aber es kommt kein Dialogfenster mehr in dem ich Format, Limiten, Fenster, Plotter etc. auswählen kann. Stattdessen findet ein ausführlicher Befehlszeilen-Dialog statt:

Befehl: plot
.plot Detaillierte Plotkonfiguration? [Ja/Nein] <Nein>: Detaillierte
Plotkonfiguration? [Ja/Nein] <Nein>:
Layoutnamen eingeben oder [?] <Modell>:
Namen für Seiteneinrichtung eingeben <>:
Ausgabegerätname eingeben oder [?] <C:\Programme\Acadm 6\plotters\XES8830.pc3>:

usw.

Wie bekomme ich mein Dialogfenster zurück?

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

---

Danke Henning!
Da warst du schon schneller als ich! 
Über (initdia) kommt dann auch das Dialogfeld wieder! Danke!!!

Für alle ne Runde u's...

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

---

(initdia) nicht vergessen...
Diesmal warst Du schneller...
Grüsse, Henning

------------------
VoxelManufaktur Computer-Dienstleistungen für Architekten und Ingenieure

      http://www.voxelman.de

[Diese Nachricht wurde von wronzky am 27. Jun. 2007 editiert.]

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

---

definier dir die Funktion (defun c:_plot() ..) trotzdem zusätzlich und änder auch da die Zuweisung mit bflösch .. nur weil du PLOT als Buttonmakro hinterlegt hast, kann ein anderer trotzdem auch _PLOT drinzustehen haben ...

aber der weg dürfte ja wohl jetzt klar sein
------------------
      - Thomas -
"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."

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

---

Danke für den Tipp CADmium, ich hab das zusätzlich eingefügt. Und es funktioniert immernoch! 

Kann man in das "alert"-Feld auch einen Hyperlink oder Button einbauen? Habe vorhin den besagten Stempel mit einem Hyperlink versehen (war mein erstes mal) aber so richtig zufrieden bin ich damit nicht. Das Symbol beim rüberfahren mit der Maus ist sehr klein und der Aufruf über Markieren > RMT > Hyperlink > Öffnen... ist nicht unbedingt komfortabel. Da wäre es schon besser bei Bedarf direkt über das Popup bzw. alert-Fester das Dokument öffnen zu können... Jemand ne Idee? Könnte ja html-code mit <a href:"...">Zur Excel-Liste</a>einfügen, aber ich glaub nicht das das geht...

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

---

In der Alertbox geht das nicht .. da mußt du dir schon einen eigenen Dialog bemühen ... VBA / Lisp(DCL) oder über die Popup-Methode des WScript.shell-Objectes

------------------
  - Thomas -
"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."

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