| |
![](https://ww3.cad.de/php/image.php?resolution=width:20050) | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
Autor
|
Thema: Lisp-Tool welches Abstand in ein MText schreibt?? (1207 mal gelesen)
|
PamDeluxe Mitglied
![](/foren/ubb/star3.gif) ![](/foren/ubb/star3.gif)
![Schreiben Sie einen Gästebucheintrag für PamDeluxe](/foren/ubb/pmimages/gbu.gif) Beiträge: 169 Registriert: 11.01.2007 Core2Duo 6300 2GB DDR2 nVidia Quadro FX 1500 AutoCAD 2007/Civil 3D 2007
|
erstellt am: 08. Aug. 2007 13:26 <-- editieren / zitieren --> Unities abgeben: ![1 Unity (wenig hilfreich, aber dennoch)](/foren/ubb/z1.gif) ![2 Unities](/foren/ubb/z2.gif) ![3 Unities](/foren/ubb/z3.gif) ![4 Unities](/foren/ubb/z4.gif) ![5 Unities](/foren/ubb/z5.gif) ![6 Unities](/foren/ubb/z6.gif) ![7 Unities](/foren/ubb/z7.gif) ![8 Unities](/foren/ubb/z8.gif) ![9 Unities](/foren/ubb/z9.gif)
Hi Leute, wie die Überschrift schon sagt, suche ich so ein tool mit diesen fähigkeiten! Also ein Lisp Tool mit dem ich einen abstand messen kann und das den abstand in Metern (oder noch besser wäre wenn man das irgendwie definieren könnte wie es ausgegeben wird)in ein MText feld schreibt welches ich dann beliebig platzieren kann. danke schon mal im Voraus für eure Tipps! PamDeluxe Hat irgendjemand so ein tool??oder weis wo es sowas kostenlos zum downloaden gibt? ------------------ Ein Kreis mit unendlichem Radius ist auch nur eine Gerade. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
KlaK Ehrenmitglied V.I.P. h.c. Dipl. Ing. Vermessung, CAD- und Netz-Admin
![](/foren/avatars/KlaK.gif)
![Schreiben Sie einen Gästebucheintrag für KlaK](/foren/ubb/pmimages/gbu.gif) Beiträge: 2789 Registriert: 02.05.2006 AutoCAD LandDesktop R2 bis 2004 Civil 3D 2005 - 2022 Bricscad V11-V23 pro Plateia, Canalis Visual Basic
|
erstellt am: 08. Aug. 2007 13:37 <-- editieren / zitieren --> Unities abgeben: ![1 Unity (wenig hilfreich, aber dennoch)](/foren/ubb/z1.gif) ![2 Unities](/foren/ubb/z2.gif) ![3 Unities](/foren/ubb/z3.gif) ![4 Unities](/foren/ubb/z4.gif) ![5 Unities](/foren/ubb/z5.gif) ![6 Unities](/foren/ubb/z6.gif) ![7 Unities](/foren/ubb/z7.gif) ![8 Unities](/foren/ubb/z8.gif) ![9 Unities](/foren/ubb/z9.gif) Nur für PamDeluxe
Hallo PamDeLuxe, warum machst Du es nicht einfach mit einer ausgerichteteten Bemaßung? Der Text ist beliebig verschiebbar und Du kannst einstellen was Du brauchst (Größe, Einheit, Nachkommastellen). Wenn die Bemaßung über Ursprung zerlegt wird erhältst Du auch einen einfachen MText. Grüße, Klaus Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
PamDeluxe Mitglied
![](/foren/ubb/star3.gif) ![](/foren/ubb/star3.gif)
![Schreiben Sie einen Gästebucheintrag für PamDeluxe](/foren/ubb/pmimages/gbu.gif) Beiträge: 169 Registriert: 11.01.2007 Core2Duo 6300 2GB DDR2 nVidia Quadro FX 1500 AutoCAD 2007/Civil 3D 2007
|
erstellt am: 08. Aug. 2007 13:46 <-- editieren / zitieren --> Unities abgeben: ![1 Unity (wenig hilfreich, aber dennoch)](/foren/ubb/z1.gif) ![2 Unities](/foren/ubb/z2.gif) ![3 Unities](/foren/ubb/z3.gif) ![4 Unities](/foren/ubb/z4.gif) ![5 Unities](/foren/ubb/z5.gif) ![6 Unities](/foren/ubb/z6.gif) ![7 Unities](/foren/ubb/z7.gif) ![8 Unities](/foren/ubb/z8.gif) ![9 Unities](/foren/ubb/z9.gif)
o.k. hab mich falsch ausgedrückt!Tut mir leid...also ich möchte eigentlich einen Punkt als Nullpunkt definieren können, von dem aus das Lisp immer den neuen abstand hinzuzählt zb für Kilometrierung! So ein Tool suche ich! Danke für den Tipp Klaus is aber nicht das was ich gesucht hab(wie gesagt, flsch beschrieben von mir) ------------------ Ein Kreis mit unendlichem Radius ist auch nur eine Gerade. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
KlaK Ehrenmitglied V.I.P. h.c. Dipl. Ing. Vermessung, CAD- und Netz-Admin
![](/foren/avatars/KlaK.gif)
![Schreiben Sie einen Gästebucheintrag für KlaK](/foren/ubb/pmimages/gbu.gif) Beiträge: 2789 Registriert: 02.05.2006 AutoCAD LandDesktop R2 bis 2004 Civil 3D 2005 - 2022 Bricscad V11-V23 pro Plateia, Canalis Visual Basic
|
erstellt am: 08. Aug. 2007 15:32 <-- editieren / zitieren --> Unities abgeben: ![1 Unity (wenig hilfreich, aber dennoch)](/foren/ubb/z1.gif) ![2 Unities](/foren/ubb/z2.gif) ![3 Unities](/foren/ubb/z3.gif) ![4 Unities](/foren/ubb/z4.gif) ![5 Unities](/foren/ubb/z5.gif) ![6 Unities](/foren/ubb/z6.gif) ![7 Unities](/foren/ubb/z7.gif) ![8 Unities](/foren/ubb/z8.gif) ![9 Unities](/foren/ubb/z9.gif) Nur für PamDeluxe
Hallo PamDeLuxe, hatte mal eine Funktion in VBA geschrieben, die als ZIP beiliegt. Wenn Du die Linien nicht brauchst, mußt Du nur vor Set LineObj und LineObj.update ein ' setzen. Vielleicht hilft Dir diese Funktion Einbinden in AutoCAD über Extra - Makro laden Ausführen über: -vbarun stat Grüße, klaus Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
PamDeluxe Mitglied
![](/foren/ubb/star3.gif) ![](/foren/ubb/star3.gif)
![Schreiben Sie einen Gästebucheintrag für PamDeluxe](/foren/ubb/pmimages/gbu.gif) Beiträge: 169 Registriert: 11.01.2007 Core2Duo 6300 2GB DDR2 nVidia Quadro FX 1500 AutoCAD 2007/Civil 3D 2007
|
erstellt am: 08. Aug. 2007 15:42 <-- editieren / zitieren --> Unities abgeben: ![1 Unity (wenig hilfreich, aber dennoch)](/foren/ubb/z1.gif) ![2 Unities](/foren/ubb/z2.gif) ![3 Unities](/foren/ubb/z3.gif) ![4 Unities](/foren/ubb/z4.gif) ![5 Unities](/foren/ubb/z5.gif) ![6 Unities](/foren/ubb/z6.gif) ![7 Unities](/foren/ubb/z7.gif) ![8 Unities](/foren/ubb/z8.gif) ![9 Unities](/foren/ubb/z9.gif)
hmm...geht irgendwie nicht zu laden habs über appload reingeladen, hat auch funktioniert, dann mit _vbarun wollte ich es starten aber hier steht es nicht in der liste zum auswählen. Hast du einen Tipp dazu? Danke vorerst mal ------------------ Ein Kreis mit unendlichem Radius ist auch nur eine Gerade. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
KlaK Ehrenmitglied V.I.P. h.c. Dipl. Ing. Vermessung, CAD- und Netz-Admin
![](/foren/avatars/KlaK.gif)
![Schreiben Sie einen Gästebucheintrag für KlaK](/foren/ubb/pmimages/gbu.gif) Beiträge: 2789 Registriert: 02.05.2006 AutoCAD LandDesktop R2 bis 2004 Civil 3D 2005 - 2022 Bricscad V11-V23 pro Plateia, Canalis Visual Basic
|
erstellt am: 08. Aug. 2007 16:00 <-- editieren / zitieren --> Unities abgeben: ![1 Unity (wenig hilfreich, aber dennoch)](/foren/ubb/z1.gif) ![2 Unities](/foren/ubb/z2.gif) ![3 Unities](/foren/ubb/z3.gif) ![4 Unities](/foren/ubb/z4.gif) ![5 Unities](/foren/ubb/z5.gif) ![6 Unities](/foren/ubb/z6.gif) ![7 Unities](/foren/ubb/z7.gif) ![8 Unities](/foren/ubb/z8.gif) ![9 Unities](/foren/ubb/z9.gif) Nur für PamDeluxe
Probier's mit - statt mit _ vor vbarun, dann klappt es Ach ja : appload läd Lisp, vba wird wie oben beschrieben über: Extras - makro - Projekt laden (vbalad) ausgewählt. Klaus [Diese Nachricht wurde von KlaK am 08. Aug. 2007 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
PamDeluxe Mitglied
![](/foren/ubb/star3.gif) ![](/foren/ubb/star3.gif)
![Schreiben Sie einen Gästebucheintrag für PamDeluxe](/foren/ubb/pmimages/gbu.gif) Beiträge: 169 Registriert: 11.01.2007 Core2Duo 6300 2GB DDR2 nVidia Quadro FX 1500 AutoCAD 2007/Civil 3D 2007
|
erstellt am: 08. Aug. 2007 16:10 <-- editieren / zitieren --> Unities abgeben: ![1 Unity (wenig hilfreich, aber dennoch)](/foren/ubb/z1.gif) ![2 Unities](/foren/ubb/z2.gif) ![3 Unities](/foren/ubb/z3.gif) ![4 Unities](/foren/ubb/z4.gif) ![5 Unities](/foren/ubb/z5.gif) ![6 Unities](/foren/ubb/z6.gif) ![7 Unities](/foren/ubb/z7.gif) ![8 Unities](/foren/ubb/z8.gif) ![9 Unities](/foren/ubb/z9.gif)
wenn ich es mit -vbarun mache kann ich den namen "stationieren" in die befehlszeile eingeben und dann schreibt er hin: Makro nicht gefunden obwohl es mit appload geladen wurde! ------------------ Ein Kreis mit unendlichem Radius ist auch nur eine Gerade. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
KlaK Ehrenmitglied V.I.P. h.c. Dipl. Ing. Vermessung, CAD- und Netz-Admin
![](/foren/avatars/KlaK.gif)
![Schreiben Sie einen Gästebucheintrag für KlaK](/foren/ubb/pmimages/gbu.gif) Beiträge: 2789 Registriert: 02.05.2006 AutoCAD LandDesktop R2 bis 2004 Civil 3D 2005 - 2022 Bricscad V11-V23 pro Plateia, Canalis Visual Basic
|
erstellt am: 08. Aug. 2007 16:47 <-- editieren / zitieren --> Unities abgeben: ![1 Unity (wenig hilfreich, aber dennoch)](/foren/ubb/z1.gif) ![2 Unities](/foren/ubb/z2.gif) ![3 Unities](/foren/ubb/z3.gif) ![4 Unities](/foren/ubb/z4.gif) ![5 Unities](/foren/ubb/z5.gif) ![6 Unities](/foren/ubb/z6.gif) ![7 Unities](/foren/ubb/z7.gif) ![8 Unities](/foren/ubb/z8.gif) ![9 Unities](/foren/ubb/z9.gif) Nur für PamDeluxe
|
PamDeluxe Mitglied
![](/foren/ubb/star3.gif) ![](/foren/ubb/star3.gif)
![Schreiben Sie einen Gästebucheintrag für PamDeluxe](/foren/ubb/pmimages/gbu.gif) Beiträge: 169 Registriert: 11.01.2007 Core2Duo 6300 2GB DDR2 nVidia Quadro FX 1500 AutoCAD 2007/Civil 3D 2007
|
erstellt am: 08. Aug. 2007 17:32 <-- editieren / zitieren --> Unities abgeben: ![1 Unity (wenig hilfreich, aber dennoch)](/foren/ubb/z1.gif) ![2 Unities](/foren/ubb/z2.gif) ![3 Unities](/foren/ubb/z3.gif) ![4 Unities](/foren/ubb/z4.gif) ![5 Unities](/foren/ubb/z5.gif) ![6 Unities](/foren/ubb/z6.gif) ![7 Unities](/foren/ubb/z7.gif) ![8 Unities](/foren/ubb/z8.gif) ![9 Unities](/foren/ubb/z9.gif)
cool danke jetzt klappts allerdings funktioniert es nur in y-richtung!aber mal irgndwie wird es scho funktionieren! danke für das tool! werd jetzt selber mal probieren lisp zu lernen! ------------------ Ein Kreis mit unendlichem Radius ist auch nur eine Gerade. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
KlaK Ehrenmitglied V.I.P. h.c. Dipl. Ing. Vermessung, CAD- und Netz-Admin
![](/foren/avatars/KlaK.gif)
![Schreiben Sie einen Gästebucheintrag für KlaK](/foren/ubb/pmimages/gbu.gif) Beiträge: 2789 Registriert: 02.05.2006 AutoCAD LandDesktop R2 bis 2004 Civil 3D 2005 - 2022 Bricscad V11-V23 pro Plateia, Canalis Visual Basic
|
erstellt am: 08. Aug. 2007 17:40 <-- editieren / zitieren --> Unities abgeben: ![1 Unity (wenig hilfreich, aber dennoch)](/foren/ubb/z1.gif) ![2 Unities](/foren/ubb/z2.gif) ![3 Unities](/foren/ubb/z3.gif) ![4 Unities](/foren/ubb/z4.gif) ![5 Unities](/foren/ubb/z5.gif) ![6 Unities](/foren/ubb/z6.gif) ![7 Unities](/foren/ubb/z7.gif) ![8 Unities](/foren/ubb/z8.gif) ![9 Unities](/foren/ubb/z9.gif) Nur für PamDeluxe
hast Du den orthomodus noch aktiv? Edit: ist quatsch wenn dort dy²+dy² statt dx²+dy² beiliegend für alle die's brauchen noch mal die korrigierte dvb Wenn Du 3D brauchst müßte noch die dz - komponente dazugenommen werden. Wie gesagt stammt noch aus alten Tagen und habs noch gar nicht bemerkt Zu Deiner Info: Programm ist in Visual Basic nicht in AutoLisp, sind zwei ganz unterschiedliche Programmiersprachen für AutoCAD Grüße, Klaus [Diese Nachricht wurde von KlaK am 08. Aug. 2007 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Ex-Mitglied | |
PamDeluxe Mitglied
![](/foren/ubb/star3.gif) ![](/foren/ubb/star3.gif)
![Schreiben Sie einen Gästebucheintrag für PamDeluxe](/foren/ubb/pmimages/gbu.gif) Beiträge: 169 Registriert: 11.01.2007 Core2Duo 6300 2GB DDR2 nVidia Quadro FX 1500 AutoCAD 2007/Civil 3D 2007
|
erstellt am: 09. Aug. 2007 08:03 <-- editieren / zitieren --> Unities abgeben: ![1 Unity (wenig hilfreich, aber dennoch)](/foren/ubb/z1.gif) ![2 Unities](/foren/ubb/z2.gif) ![3 Unities](/foren/ubb/z3.gif) ![4 Unities](/foren/ubb/z4.gif) ![5 Unities](/foren/ubb/z5.gif) ![6 Unities](/foren/ubb/z6.gif) ![7 Unities](/foren/ubb/z7.gif) ![8 Unities](/foren/ubb/z8.gif) ![9 Unities](/foren/ubb/z9.gif)
Vielen Dank Klaus für deine Hilfe und dein Engagement!! geb dir dafür 10U's Wegen dem Programmieren, ja weiss schon das vba was anderes is als Lisp!Aber anscheinend soll lisp ja besser mit acad zusammenarbeiten bzw mehr möglichkeiten bieten als vba und desshalb werd ich mir ev. mal lisp aneigenen falls ich das jemals hinkrieg!!! ------------------ Ein Kreis mit unendlichem Radius ist auch nur eine Gerade. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
KlaK Ehrenmitglied V.I.P. h.c. Dipl. Ing. Vermessung, CAD- und Netz-Admin
![](/foren/avatars/KlaK.gif)
![Schreiben Sie einen Gästebucheintrag für KlaK](/foren/ubb/pmimages/gbu.gif) Beiträge: 2789 Registriert: 02.05.2006 AutoCAD LandDesktop R2 bis 2004 Civil 3D 2005 - 2022 Bricscad V11-V23 pro Plateia, Canalis Visual Basic
|
erstellt am: 11. Aug. 2007 13:31 <-- editieren / zitieren --> Unities abgeben: ![1 Unity (wenig hilfreich, aber dennoch)](/foren/ubb/z1.gif) ![2 Unities](/foren/ubb/z2.gif) ![3 Unities](/foren/ubb/z3.gif) ![4 Unities](/foren/ubb/z4.gif) ![5 Unities](/foren/ubb/z5.gif) ![6 Unities](/foren/ubb/z6.gif) ![7 Unities](/foren/ubb/z7.gif) ![8 Unities](/foren/ubb/z8.gif) ![9 Unities](/foren/ubb/z9.gif) Nur für PamDeluxe
Hallo, ob Lisp besser mit AutoCAD zusammenarbeitet als VBA ist wie gesagt Philosophiefrage (so wie früher der Streit zwischen Pascal und C ), man kann mit beidem zum gleichen Ergebnis kommen, übersichtlichen Code schreiben oder kurze ineinandergeschachtelte Funktionen, für deren Verständnis man erst mal 'nen halbe Tag braucht. Gewöhnungsbedürftig bei Lisp ist die Schreibweise "von hinten rein", so wie früher auf den HP-Rechnern mit UPN ( c = + a b statt c= a + b ). Wenn Du ein Buch zu Lisp brauchst schau mal hier. Viel Spaß dabei, Klaus Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
PamDeluxe Mitglied
![](/foren/ubb/star3.gif) ![](/foren/ubb/star3.gif)
![Schreiben Sie einen Gästebucheintrag für PamDeluxe](/foren/ubb/pmimages/gbu.gif) Beiträge: 169 Registriert: 11.01.2007 Core2Duo 6300 2GB DDR2 nVidia Quadro FX 1500 AutoCAD 2007/Civil 3D 2007
|
erstellt am: 13. Aug. 2007 07:40 <-- editieren / zitieren --> Unities abgeben: ![1 Unity (wenig hilfreich, aber dennoch)](/foren/ubb/z1.gif) ![2 Unities](/foren/ubb/z2.gif) ![3 Unities](/foren/ubb/z3.gif) ![4 Unities](/foren/ubb/z4.gif) ![5 Unities](/foren/ubb/z5.gif) ![6 Unities](/foren/ubb/z6.gif) ![7 Unities](/foren/ubb/z7.gif) ![8 Unities](/foren/ubb/z8.gif) ![9 Unities](/foren/ubb/z9.gif)
|