---

Hallo zusammen

Ich füge über ein Menü mit
[bblock(B3A1)]^c^cmeinfüg B3A1 0,0;;;;;;;;;;
Blöcke ein, die mit Attributen versehen sind.
Am Ende werden die Attributwerte abgefragt.
Dateinamen :                      :
Planart :                      :
Zeichnungsname :

Wie kann ich einem Attribut eine Systemvariable übergeben z.B.
$(getvar,dwgname) ?
einfach an der Stelle einfügen geht nicht
[bblock(B3A1)]^c^cmeinfüg B3A1 0,0;;;;;;;;$(getvar,dwgname);;

Über getvar findet man in Forum 1000 Beiträge,
jedoch nichts im Zusammenhang mit Attributseingaben.

Version ACAD2000

Danke für eure Hilfe!

------------------
----------------
Mit freundlichen Grüßen
MatthiasB

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

---

und wenn du ATTDIA auf 0 stellst? .... aber dann musst du alle Attribute in der Befehlszeile übergeben, aber vielleicht ist diese Möglichkeit mit anschließendem Zurücksetzen von ATTDIA auf 1 und einem (command"_attedit" (entlast)) gar nicht so verkehrt?

------------------
  - 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

---

Hallo zusammen

Der Hinweis auf ATTDIA 0 hat mich schon mal weiter gebracht,
ich habe die Zuordnung von Systemvariablen zu den Attributen nun hinbekommen.
Habe aber immer noch das Problem, den DATEIPREFIX auszublenden.
Auf der Befehlszeilenebene alles prima, aber im menu.mnu geht einfach nichts.
Ich seh vor lauter $-Zeichen und Klammern schon Sternchen.
Was ist bei Version 2 und 3 falsch?
Hat jemand eine Idee?

Version 1
(getvar "DWGNAME")
Erzeugt eine Ausgabe in der Befehlszeile  ---> Zeichnung1.dwg

[bblock(B3A1)]^C^C(COMMAND"_ATTDIA"0);meinfüg B3A1 0,0;;;;;$M=$(getvar,DWGNAME);;;
Erzeugt eine Ausgabe im menu.mnu ---> Zeichnung1.dwg

Version 2
(cadr(fnsplitl(getvar "DWGNAME")))
Erzeugt eine Ausgabe in der Befehlszeile  ---> Zeichnung1

[bblock(B3A1)]^C^C(COMMAND"_ATTDIA"0);meinfüg B3A1 0,0;;;;;$M=$(cadr($(fnsplitl($(getvar,DWGNAME)))));;;
Erzeugt eine Ausgabe im menu.mnu ---> ))??

Version 3
(substr (getvar "dwgname") 1 (- (strlen (getvar "dwgname")) 4)))
Erzeugt eine Ausgabe in der Befehlszeile  ---> Zeichnung1

[bblock(B3A1)]^C^C(COMMAND"_ATTDIA"0);meinfüg B3A1 0,0;;;;;$M=$(substr,($(getvar,dwgname),1,($(-($(strlen($(getvar,dwgname))),4)))));;;
Erzeugt eine leere Ausgabe im menu.mnu

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

EDIT:

ja, wer lesen kann ist klar im Vorteil.

Die Sytemvariable TEXTEVAL steuert die Übergabe von Variableninhalten in Abfragefelder durch das Ausrufezeichen vor der Variablen.
So geht es ...

[bblock(B3A1)]^C^C(SETQ Zname (cadr(fnsplitl(getvar "DWGNAME"))));(COMMAND"_ATTDIA"0);setvar TEXTEVAL 1;meinfüg B3A1 0,0;;;;;;$M=!Zname;;;setvar TEXTEVAL 0;_ATTDIA 1;

----------------
Mit freundlichen Grüßen
MatthiasB

[Diese Nachricht wurde von MatthiasB-CAD am 22. Jun. 2008 editiert.]

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

---

Schon einmal damit probiert?

Code:

---

%<\AcVar Filename \f "%fn7">%

---

------------------
Roland Feletic
PAUSER ZT-GMBH

Acad 2009-deutsch, Express Tools
3ds Max 2008
WinXP-Professional
HP Workstation xw4400, 3GB
Quadro FX1500

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

---

Oder vielleicht

Code:

---

%<\AcVar dwgname>%

---

------------------
Roland Feletic
PAUSER ZT-GMBH

Acad 2009-deutsch, Express Tools
3ds Max 2008
WinXP-Professional
HP Workstation xw4400, 3GB
Quadro FX1500

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

---

 

Zitat:

---

Original erstellt von RoSiNiNo:
Schon einmal damit probiert?

Code:

---

%<\AcVar Filename \f "%fn7">%

---

---

IMHO keine Chance in ACAD2000 ( wie im ersten Post aufgezeigt..)Schriftfelder gab's erst später.

------------------
      - 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

---

Noch besser wäre es allerdings wenn du die Blöcke neu bearbeiten würdest und diese Attribute schon vorab mit dem richtigen Schriftfeld ausfüllen würdest.

------------------
Roland Feletic
PAUSER ZT-GMBH

Acad 2009-deutsch, Express Tools
3ds Max 2008
WinXP-Professional
HP Workstation xw4400, 3GB
Quadro FX1500

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