---

Hallo an Alle

wer kennt eine Systemvariable mit der es mir möglich ist das Textfenster von AutoCAD Filter zu unterdrücken. Die Systemvariablen Filedia und CMDDIA haben mir leider nicht den gewünschten Effekt gebracht. Ich habe AutoCAD 2000 im Einsatz.

Vielen Dank

Michael

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

---

Für den Filter gibt es keine Befehlszeilen Version,
kannst du also nicht unterdrücken...
Auch für die Schnellauswahl wäre mir sowas unbekannt !

Da du vermutlich ein script erstellen möchtest ?!
mußt du wohl mit Lisp-Befehlen arbeiten !

Was soll er filtern - ich schreibe dir die Zeile...
oder kennst du dich mit ssget... aus ?

(behauptet wer das Gegenteil ?)

------------------
Gruß Sebastian , Ffm
Der Feind des Guten ist das Bessere.

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

---

Hi Sebastian,

Ich kenne mich mit lisp Befehlen leider nicht aus.
Ich benötige ein Skript mit dem ich Auswahlkriterien treffen kann.
z.B. es soll mir nur einen bestimmten Block anzeigen. (filtern)

Vielen Dank

Michael

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

---

das mit dem "Anzeigen" verunsichert mich zwar aber..

(ssget "X" '((0 . "INSERT")(2 . "Blname")))
_move _p

die (ssget.. Zeile wählt zB alle Blockreferenzen mit dem Name Blname !
_move ist nur ein Beispielbefehl ...
das _p (steht für Vorher, kannst auch v verwenden)

so pauschal wie du deine Wünsche äußerst kann man dir leider nicht weiterhelfen.. entweder genau beschreiben oder selbst mal
in der ACAD-Hilfe den Befehl ssget nachsehen.

------------------
Gruß Sebastian , Ffm
Der Feind des Guten ist das Bessere.

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

---

DANKE Sebastian

damit kann ich schon was Anfangen. Kann ich auch nach Attributwerten filtern lassen.

Michael

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

---

Da wird es schwieriger deswegen Gegenfrage:

möchtest du die Blöcke wählen die einen Attributwert XY haben oder möchtest du den Wert ändern ? -dann nehme doch den Befehl "_-attedit"

ansonsten müßtest du noch etwas mehr über Lisp erfahren...

------------------
Gruß Sebastian , Ffm
Der Feind des Guten ist das Bessere.

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

---

Hallo Michael,

direkt nach Attributwerten filtern geht nicht, da die Attribute den Inserts nur 'nachrangig' zugeordnet sind.
Das geht dann nur noch mit 'nem kleinen Tool.
Das wurde letztens bei induma.com intensiv diskutiert.
siehe dort: http://www.industrie24.com/bbs/read.php?f=5&i=7033&t=7033
In diesem Thread sind so einige Varianten zu finden.

Bei Fragen ...

Grüße Holger

------------------
Holger Brischke
CADlon - Lisp over night!
Irgendwann muß man schlafen, deshalb:
+!+!+Urlaub vom 01.08.-30.08.2003+!+!+

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

---

Vielen Dank an Alle
Ihr habt mir weiter geholfen.

Michael

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

---

Schönen guten Tag,

da ich ja jetzt schon in mehreren Beiträgen gelesen habe, dass Schnellauswahl nicht in Scripten funktioniert, wollte ich fragen ob es möglich ist in lisp folgendes zu bewerkstelligen:
Er soll alle Linien wählen, diese mit Ursprung 0,0 kopieren und wieder in eine neue Zeichnung einfügen, wieder mit Ursprung 0,0.
Das selbe Spielchen wär dann bei Kreisen.
Da ich rein nur mit Scripten umgehen kann wäre meine zweite Frage (wenn es nicht allzu viel Aufwand ist) ob mir da jemand bei der lisp Erstellung helfen könnte?

Mit freundlichen Grüßen

Franzal

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

---

Ich habe versucht mit ein paar Schnipseln weiter zu bringen, jedoch funktionierts nicht ganz so wie erwartet. leider hab ich für -copybase und _pasteclip keine für mich verständlichen Schnipseln gefunden. Was passt hier nicht zusammen?

(defun C:choose)
(sssetfirst(setq a(ssget "_x" '((0 . "line"))))a)
(command "_copybase" "0,0" "_p")
(command "vbastmt" "AcadApplication.Documents.Add \"C:\\ProgramData\\Autodesk\\ACA 2010\\deu\\Template\\ohneschraffur.dwt\"")
(command "_pasteclip" "0,0")
)

Mit freundlichen Grüßen

Franzal

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

---

Code:

---

(ssget "X" '((0 . "LINE")))  wählt alle Linien
(ssget "X" '((0 . "CIRCLE")))  wählt alle Kreise

---

...das dann an COPYCLIP übergeben ...

Code:

---

(command "_COPYCLIP" (ssget "X" '((0 . "LINE"))) "")

---

... in der neuen Zeichnung:
_pasteorig = Menü Bearbeiten => Mit Originalkoordinaten einfügen

Hth

Ergänzung:
Du kannst nicht mit einer "Lisp" 2 DWGs "bedienen" - muss erst geladen und aufgerufen werden
dazu: http://ww3.cad.de/foren/ubb/Forum54/HTML/009952.shtml

------------------
Schöne Grüße
Ernst

www.geopaint.at

[Diese Nachricht wurde von Geos am 25. Mai. 2010 editiert.]

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

---

Guten Morgen,

schon mal danke für die Hilfe und den Hinweis! Es ist jetzt so, dass die lsp Datei in jeder Zeichnung geladen wird und folgendermaßen aussieht:
(prompt "\nType choose to run this Lisp")
(defun C:choose ()
(command "_COPYCLIP" (ssget "X" '((0 . "LINE"))) "")
(command "vbastmt" "AcadApplication.Documents.Add \"C:\\ProgramData\\Autodesk\\ACA 2010\\deu\\Template\\ohneschraffur.dwt\"")
(command "_pasteorig")
(princ)
)

Jetzt hab ich nur das Problem, dass in der neuen Zeichnung  nichts eingefügt wird. Wenn ich dann händisch _pasteorig eingeb ist alles da. Was mach ich noch falsch?

Mit freundlichen grüßen

Franzal

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

---

ein Lisp wird in die aktuelle Zeichnung geladen und in dem Namensraum ( Speicher) auch ausgeführt ... deine neue Zeichnung kennt das Lisp und den übrigbleibenden Befehl _pastclip dann gar nicht ...

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