|
Autor
|
Thema: Polylinie in Kreis umwandeln (7432 mal gelesen)
|
newcad
Mitglied
Schreinermeister in der AV
   Beiträge: 255
Registriert: 12.11.2003 Acad 2008 LT DE SP1
Acad 2008 DE SP1
Expresstools <P>Intel Pentium 4
2,6Ghz
Windows xp pro, SP3
1024MB DDR2 Ram
Nvidia GeForce 7600GS 256MB
Zwei-Bildschirm-Arbeitsplatz
TFT=V7 22"Wide
TFT=V7 22"Wide
|
erstellt am: 24. Mrz. 2005 18:11    Unities abgeben:          
Hallo Thomas,auch auf die Gefahr hin, daß ich dich nerve.
Ich habe gerade die vlx neu geladen. APPLOAD pl2CIRCLE.vlx erfolgreich geladen.
Nach dem Aufruf mit PL2Circle kommt aber die Meldung:
Unbekannter Befehl "DT:PL2CIRCLE". Drücken Sie F1-Taste für Hilfe.
Was mache ich falsch? Ansgar
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
cadworker
Mitglied
Holztechniker
Beiträge: 106
Registriert: 09.10.2004 AMD K7 2400
256 DDR; XP-Prof. SP2; ACAD 2002+2004 Voll; ET
|
erstellt am: 25. Mrz. 2005 09:54 Unities abgeben:
bei mir ist es genauso,
DT:PL2CIRCLE und ??????
nichts passiert ausser die von ansgar geschriebene meldung.
oder ist DAS die 2002-version  jörg [Diese Nachricht wurde von cadworker am 25. Mrz. 2005 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
tunnelbauer
Ehrenmitglied V.I.P. h.c.
Bauingenieur
Beiträge: 6561
Registriert: 13.01.2004 Sie nannten ihn google.
|
erstellt am: 25. Mrz. 2005 10:00 Unities abgeben:
also unter AutoCAD 2004 funzt es ganz normal - unter AutoCAD 2006 leider nicht (da werde ich aber mit Thomas direkt drüber sprechen).Und eine Meldung in Richtung mit CADmium in Verbindung setzen konnte ich auch nie reproduzieren.... ------------------
Grüsse Thomas Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
cadworker
Mitglied
Holztechniker
Beiträge: 106
Registriert: 09.10.2004 AMD K7 2400
256 DDR; XP-Prof. SP2; ACAD 2002+2004 Voll; ET
|
erstellt am: 25. Mrz. 2005 10:21 Unities abgeben:
Zitat:
Original erstellt von tunnelbauer:
Und eine Meldung in Richtung mit CADmium in Verbindung setzen konnte ich auch nie reproduzieren....[/B]
diese "meldung" bezieht sich auch eher auf das plaetten.lsp
habe ich nähmlich auch
jörg Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Gromhelm2
Mitglied
Beiträge: 41
Registriert: 06.11.2006 AutoCad MAP 3D 2007
|
erstellt am: 06. Jan. 2008 12:28 Unities abgeben:
Hallo,gibt es eine vlx-Datei für Autocad 2007 ? Leider funktioniert es nicht - es kommt die Meldung
; error: no function definition: C  T:PL2CIRCLE Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Gromhelm2
Mitglied
Beiträge: 41
Registriert: 06.11.2006 AutoCad MAP 3D 2007
|
erstellt am: 06. Jan. 2008 12:35 Unities abgeben:
ah super, habs hinbekommen, das hier funktioniert: Zitat:
(defun C:P2C (/ as elem minx maxx miny maxy mitte)
(vl-load-com)
(while
(if (setq as (ssget '((0 . "*POLYLINE"))))
(progn
(repeat (sslength as)
(setq elem (ssname as 0))
(vla-getboundingbox
(vlax-ename->vla-object elem)
'xmin
'xmax
) ;_ end of vla-getboundingbox
(setq MINX (car (vlax-safearray->list xmin))
MINY (cadr (vlax-safearray->list xmin))
MAXX (car (vlax-safearray->list xmax))
MAXY (cadr (vlax-safearray->list xmax))
MITTE (list (/ (+ MINX MAXX) 2)
(/ (+ MINY MAXY) 2)
) ;_ end of list
) ;_ end of setq
(entmake
(list
(cons 0 "CIRCLE")
(cons 100 "AcDbEntity")
(cons 67 0)
(cons 410 "Model")
(assoc 8 (entget elem))
(cons 100 "AcDbCircle")
(cons 10 mitte)
(cons
40
(abs (distance mitte (list (/ (+ maxx minx) 2) miny)))
) ;_ end of cons
) ;_ end of list
) ;_ end of entmake
(setq as (ssdel elem as))
(entdel elem)
) ;_ end of repeat
) ;_ end of progn
) ;_ end of if
) ;_ end of while
) ;_ end of defun
wenn man das prog mit p2c aufruft. Ganz viel Danke!! Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADmium
Moderator
Maschinenbaukonstrukteur
    
Beiträge: 8611
Registriert: 30.11.2003 Hinweis: Meine Mitarbeit auf CAD.DE ist fakultativ, unentgeltlich und beruht nur auf einem ausgeprägtem Helfersyndrom.
|
erstellt am: 06. Jan. 2008 16:47 Unities abgeben:
Zitat:
Original erstellt von Gromhelm2:
Hallo,gibt es eine vlx-Datei für Autocad 2007 ? Leider funktioniert es nicht - es kommt die Meldung
; error: no function definition: C T:PL2CIRCLE
... da Tool hat einfach sein Absolutes Verfallsdatum erreicht ...und da dir das andere Lisp genügt, brauch ich die vlx ja nicht neu kompilieren ...?! ------------------
 - 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 |
| |
Gromhelm2
Mitglied
Beiträge: 41
Registriert: 06.11.2006 AutoCad MAP 3D 2007
|
erstellt am: 06. Jan. 2008 18:06 Unities abgeben:
nein, danke CADmium, das Lisp ist perfekt - hab super schnell 2300 bäume die als polylinien vorlagen in kreise umgewandelt.Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Foren auf CAD.de (alle Foren)
UBBFriend: Senden Sie diese Seite per eMail an einen Freund!
| 
Dieses Thema ist 4 Seiten lang: 1 2 3 4 
