---

Hallo,
ich habe in einem LISP folgende Zeile verwendet:
(command "_.save" "")
In ACADMAP2004 wird der Benutzer aufgefordert, das Überschreiben der Datei mit "_y" zu bestätigen, in ACAD2005 pur wurde die Datei einfach gespeichert.
Wird diese (scheinbar optionale) Abfrage über eine Systemvariable gesteuert?

------------------
viele Grüße

Jörn

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

---

Hallo Jörn,

das kann die Sysvar EXPERT sein.

Falls nicht, kannst du ja mit (getvar "CMDACTIVE") prüfen, ob der gestertete Befehl noch aktiv ist, und dann eben ein (command "_Y") hinetrherschieben, oder eben auch nicht.

Grüße Holger

------------------
Holger Brischke
CAD on demand GmbH                              Autodesk User Group Central Europe
Individuelle Lösungen von Heute auf Morgen.              AUGCE Manager Deutschland

Jackpot on demand - Wir eröffnen den Spätsommer mit einer Verlosung!

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

---

Hallo Holger,
also die Variable EXPERT war es nicht. Ich habe aber noch eine Frage zu Deinem zweiten Vorschlag.
Ich habe die Vorgehensweise mit dem Schieben Befehl ausprobiert (weil ich die betreffende ACADMAP2004 Version hier nicht auf dem Rechner habe):

Code:

---

(defun c:test ( / )
  (command "_.move" (ssget)"" "0,0")
  (if (=(getvar "CMDACTIVE")1)
      (command"100,100")
  )
)

---

Wenn die Variable "CMDACTIVE" = 1 ist, dann wird der zweite Punkt der Verschiebung angegeben.
Aber wie müßte der Wert der Variablen eigentlich innerhalb des Command-Befehls sein. Den Wert 1 habe ich auch, wenn kein Befehl aktiv ist, und in der Hilfe steht folgedes:

  1  Normaler Befehl ist aktiv
  2  Normaler und ein transparenter Befehl sind aktiv
  4  Skript ist aktiv
  8  Dialogfeld ist aktiv
  16  AutoLISP ist aktiv (nur mit einem durch ObjectARX definierten
    Befehl sichtbar)

Ich hoffe, ich habe mich nicht zu unverständlich ausgedrückt.

------------------
viele Grüße

Jörn

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

---

warum nimmst denn nicht den Befehl _QSAVE ?

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

Ing. Anton Fuchs
WWW.FFZELL.AT.TC

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

---

Zitat:

---

Original erstellt von joern bosse:
...
Wenn die Variable "CMDACTIVE" = 1 ist, dann wird der zweite Punkt der Verschiebung angegeben.
Aber wie müßte der Wert der Variablen eigentlich innerhalb des Command-Befehls sein. Den Wert 1 habe ich auch, wenn kein Befehl aktiv ist,...

---

Hallo Jörn,
das kann eigentlich nicht sein. Wenn nichts aktiv ist, dann ist CMDACTIVE=0.
Somit sollte ein (if (/= 0 (getvar "CMDACTIVE"))... funktionieren.

Grüße Holger

------------------
Holger Brischke
CAD on demand GmbH                              Autodesk User Group Central Europe
Individuelle Lösungen von Heute auf Morgen.              AUGCE Manager Deutschland

Jackpot on demand - Wir eröffnen den Spätsommer mit einer Verlosung!

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

---

@fuchsi
warum, naja, ich wußte einfach nicht, daß es den Befehl gibt. Ich werde es mal damit testen.

@holger
ich habe eine leere Zeichnung aufgemacht, es wurden in dem Zuge ein paar LISP-Funktionen geladen, aber es wird keine ausgeführt.
(getvar "CMDACTIVE")=1
Irgendwas ist doch dann bei mir komisch, vielleicht weißt Du ja noch einen Rat.

------------------
viele Grüße

Jörn

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

---

Hi Jörn,
keine Chance mit Sysvar.
Ich habe so etwas ähnliches bei meinem Block-Out Programm.
Da frage ich einfach vorher ab, ob ich 's mit Map zu tun habe und verzweige dann auf eine extra command-Zeile:

Code:

---

(if (findfile "acadmap.arx");_ Acad-Map aktiv!
  ;; Kommandozeile bei Autodesk Map 5
  (command "_.-wblock"
   (strcat PATH "\\" ELEM ".dwg")
   ELEM
   "_n"
  ) ;_ end of command
  ;; Komandozeile ohne Map
  (command "_.-wblock" (strcat PATH "\\" ELEM ".dwg") ELEM)
) ;_ end of if

---

...
Edit:
Wenn Dir das prüfen mit findfile zu unsicher ist; es könnte ja sein, das die Datei da ist, aber nicht geladen; überprüfe einfach ob die acadmap.arx in der Liste die die Lisp-Funktion (arx) zurückgibt vorhanden ist. Dann sollte Map auch aktiv sein.

------------------
Ciao,
Marc

[Diese Nachricht wurde von marc.scherer am 26. Sep. 2005 editiert.]

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

---

Hallo Jörn,

das ist mir noch nicht unter gekommen. ???

Grüße Holger

------------------
Holger Brischke
CAD on demand GmbH                              Autodesk User Group Central Europe
Individuelle Lösungen von Heute auf Morgen.              AUGCE Manager Deutschland

Jackpot on demand - Wir eröffnen den Spätsommer mit einer Verlosung!

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

---

Ja danke erstmal für die vielen Tips,

ich werde heute nachmittag testen können, ob sich Befehl "_.QSAVE" genau so zickig unter ACADMAP verhält. Wenn ja, dann werde ich auf Marc seine Variante zurückgreifen.

@Holger: vielleicht können wir da ja noch in Stuttgart drüber fachsimpeln, warum denn das ist, obwohl es nicht sein darf.

------------------
viele Grüße

Jörn

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

---

<<vielleicht können wir da ja noch in Stuttgart drüber fachsimpeln, warum denn das ist, obwohl es nicht sein darf.
>>

Oh, das wird ein Abendfüllendes Programm - aber gerne doch!

Grüße Holger

------------------
Holger Brischke
CAD on demand GmbH                              Autodesk User Group Central Europe
Individuelle Lösungen von Heute auf Morgen.              AUGCE Manager Deutschland

Jackpot on demand - Wir eröffnen den Spätsommer mit einer Verlosung!

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

---

Hallo Marc,

wie machst Du das? Bei mir kommt trotzdem dieser nervende Dialog, ob ich Objektdaten exportieren möchte???

Zitat:

---

Original erstellt von marc.scherer:

Code:

---

(if (findfile "acadmap.arx");_ Acad-Map aktiv!
  ;; Kommandozeile bei Autodesk Map 5
  (command "_.-wblock"
   (strcat PATH "\\" ELEM ".dwg")
   ELEM
   "_n"
  ) ;_ end of command
  ;; Komandozeile ohne Map
  (command "_.-wblock" (strcat PATH "\\" ELEM ".dwg") ELEM)
) ;_ end of if

---

---

VG, Fred

------------------
Fred Tomke
Dipl.-Ing. (FH) Landespflege

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

---

Zitat:

---

Original erstellt von fred_tomke:
wie machst Du das?

---

Na ja, Sysvar

Code:

---

cmddia

---

muß natürlich auch auf 0 stehen...

------------------
Ciao,
Marc
Mein AG sucht u.a. Architekten und Bauzeichner!
Mein alter AG sucht 'nen CADMIN

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

---

Hm, schon wieder. Peinlich.    
(Habs in letzter Zeit nicht so mit Systemvariablen.)

Aber, dass Du mir das nicht weitererzählst.  

Danke!
VG, Fred

------------------
Fred Tomke
Dipl.-Ing. (FH) Landespflege

[Diese Nachricht wurde von fred_tomke am 12. Mrz. 2007 editiert.]

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