| | |
 | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
| | |
 | PNY präsentiert die neue NVIDIA RTX A400 und die A1000 Grafikkarte, eine Pressemitteilung
|
|
Autor
|
Thema: Ein Blockname mehrmals verwendet. (608 mal gelesen)
|
RoyCAD
Mitglied
Dipl-Ing Energietechnik
   Beiträge: 206
Registriert: 24.05.2004 Win XP
AutoCAD2008-2010
Inventor 2008-2010
Productstream Compass
P4 3,0GHz
512MB Ram
|
erstellt am: 03. Aug. 2005 09:46  <-- editieren / zitieren -->   Unities abgeben:          
Hallo Ich habe da eine Frage, wenn ich ein Block Teil2 lösche ohne danach zu bereinigen und dann noch einmal machen oder einfach mehrmals erzeugen, dann will er natürlich den Block Teil2 neu definieren. Gibt es eine Möglichkeit dieser Vorgang umzugehenden. (command "plinie" p1 p2 p3 p4 "s")
(setq AW(ssadd (entlast)))
(command "_-block" "Teil2" '(0 0 0) AW ""
"_-insert" "Teil2" '(0 0 0) 1 1 0 0) es wäre natürlich mit eine cond oder z.B. if Schleife möglich aber das ist sehr Aufwendig und nicht das was ich mich vorgestellt habe. (setq blockda (ssget "X" '((0 . "INSERT")(2 . "Teil2"))))
(if (/= blockda nil)
(setq Blockname "Teil2")
(setq Blockname "Teil3")
)
(command "plinie" p1 p2 p3 p4 "s")
(setq AW(ssadd (entlast)))
(command "_-block" Blockname '(0 0 0) AW ""
"_-insert" Blockname '(0 0 0) 1 1 0 0)
Gruß
RoyCAD
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
joern bosse
Ehrenmitglied
Dipl.-Ing. Vermessung
Beiträge: 1776
Registriert: 11.10.2004 Window 11
ACAD 2021
CIVIL 2021
BricsCAD ab V14
11th Gen Intel(R) Core(TM) i7-1165G7 @ 2.80GHz 2.80 GHz
32.0GB RAM
NVIDIA GeForce MX450<P>
|
erstellt am: 03. Aug. 2005 10:01 <-- editieren / zitieren --> Unities abgeben: Nur für RoyCAD 
Hallo Roy, ich bin mir nicht sicher, ob ich Dich richtig verstanden habe, aber mit folgender Methode könntest Du einen Index an den Blocknamen anhängen.
(setq n 1);;Index
(command "plinie" p1 p2 p3 p4 "s")
(setq AW(ssadd (entlast)))
(while (tblsearch "BLOCK"(strcat "Teil" (itoa n)))
(setq n (+ n 1)))
(command "_-block" (strcat "Teil" (itoa n)) '(0 0 0) AW ""
"_-insert" (strcat "Teil" (itoa n)) '(0 0 0) 1 1 0 0) getestet habe ich das ganze nicht, sollte aber eigentlich funktionieren ------------------
viele Grüße Jörn Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
RoyCAD
Mitglied
Dipl-Ing Energietechnik
Beiträge: 206
Registriert: 24.05.2004 Win XP
AutoCAD2008-2010
Inventor 2008-2010
Productstream Compass
P4 3,0GHz
512MB Ram
|
erstellt am: 03. Aug. 2005 10:54 <-- editieren / zitieren --> Unities abgeben:
|
mapcar
Mitglied
CADmin
Beiträge: 1250
Registriert: 20.05.2002 Time flies like an arrow, fruit flies like a banana (Groucho Marx)
|
erstellt am: 03. Aug. 2005 12:18 <-- editieren / zitieren --> Unities abgeben: Nur für RoyCAD
|
RoyCAD
Mitglied
Dipl-Ing Energietechnik
Beiträge: 206
Registriert: 24.05.2004 Win XP
AutoCAD2008-2010
Inventor 2008-2010
Productstream Compass
P4 3,0GHz
512MB Ram
|
erstellt am: 03. Aug. 2005 12:30 <-- editieren / zitieren --> Unities abgeben:
|
Foren auf CAD.de
| 
