Hot News:

Mit Unterstützung durch:

  Foren auf CAD.de (alle Foren)
  Lisp
  Methode vlax-curve-getPointAtDist in Acad2016

Antwort erstellen  Neues Thema erstellen
CAD.de Login | Logout | Profil | Profil bearbeiten | Registrieren | Voreinstellungen | Hilfe | Suchen

Anzeige:

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen nächster neuer Beitrag | nächster älterer Beitrag
  
Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte
Autor Thema:  Methode vlax-curve-getPointAtDist in Acad2016 (987 mal gelesen)
cadplayer
Ehrenmitglied
CADniker


Sehen Sie sich das Profil von cadplayer an!   Senden Sie eine Private Message an cadplayer  Schreiben Sie einen Gästebucheintrag für cadplayer

Beiträge: 1832
Registriert: 28.04.2009

erstellt am: 23. Nov. 2015 18:35    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Code:

(defun c:xx()
  (setq curve-obj (vlax-ename->vla-object (car (entsel "\m Select Polyline!"))))
  (while (setq p (vlax-curve-getPointAtDist curve-obj (getdist "\n Enter a distance: ")))
    (command-s "_point" p)
    )
  )

Kurz mal nachgefragt...
Hab jetzt grad kein Acad2015 zur hand, bin aber der Meinung, dass die Anwendung je nach Eingabe einer Strecke für Polylinien (typ LW- oder 3dPoyline) gleichermassen funktionieren sollte?!

Vom Polylinienanfang werden entlang der Polylinie, je nach Strecke points ausgesetzt. Bei LWPolylinien geschieht es einwandfrei nur bei 3dPolys kommt mujrx raus.

Liege ich falsch mit meiner Annahme ?!

------------------
Gruss Dirk
Blog | Adolf Spende | Infra-Feed | ÅF AB

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

CAD-Huebner
Ehrenmitglied V.I.P. h.c.
Verm.- Ing., ATC-Trainer



Sehen Sie sich das Profil von CAD-Huebner an!   Senden Sie eine Private Message an CAD-Huebner  Schreiben Sie einen Gästebucheintrag für CAD-Huebner

Beiträge: 9732
Registriert: 01.12.2003

One AutoCAD 2.5 - 2023, Civil 3D, Win10/win11

erstellt am: 23. Nov. 2015 18:48    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für cadplayer 10 Unities + Antwort hilfreich

Bei mir funktioniert die Routine auch mit 3D-Polylinien wie erwartet.
Getestet mit AutoCAD Civil 3D 2016 SP1

------------------
Mit freundlichem Gruß

Udo Hübner
www.CAD-Huebner.de

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

cadplayer
Ehrenmitglied
CADniker


Sehen Sie sich das Profil von cadplayer an!   Senden Sie eine Private Message an cadplayer  Schreiben Sie einen Gästebucheintrag für cadplayer

Beiträge: 1832
Registriert: 28.04.2009

erstellt am: 23. Nov. 2015 19:43    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Danke Udo, dass du es mal getestet hast. SP1, wahrscheinlich der Grund. Misst, warum bin ich darauf nicht gekommen (hab mir fast die Haare rausgerissen)

------------------
Gruss Dirk
Blog | Adolf Spende | Infra-Feed | ÅF AB

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

cadplayer
Ehrenmitglied
CADniker


Sehen Sie sich das Profil von cadplayer an!   Senden Sie eine Private Message an cadplayer  Schreiben Sie einen Gästebucheintrag für cadplayer

Beiträge: 1832
Registriert: 28.04.2009

Windows 10
64bit system
Autocad Civil3d 2020 ENGLISH
Visual Studio 2019
OpenDCL.Runtime.9<P>

erstellt am: 23. Nov. 2015 20:07    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

welches pack hast du installiert, die 64bit version von Civil3d lies sich bei mir nicht installieren
C3D2016_x64_SP1.0.exe hab ich runtergeladen!
"this update coult not be installed because it is not designed for the version of AutoCAD 2016 that is installed on your Computer"

Kann es sein, dass die Installation prüft nach dem Ordner C:\Program Files\Autodesk\AutoCAD Civil3d 2016 vorhanden ist

bei mir hängt die Civil installation im Ordner
C:\Program Files\Autodesk\AutoCAD 2016

Problem?!

------------------
Gruss Dirk
Blog | Adolf Spende | Infra-Feed | ÅF AB

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

cadffm
Moderator
良い精神




Sehen Sie sich das Profil von cadffm an!   Senden Sie eine Private Message an cadffm  Schreiben Sie einen Gästebucheintrag für cadffm

Beiträge: 21533
Registriert: 03.06.2002

Alles

erstellt am: 24. Nov. 2015 00:44    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für cadplayer 10 Unities + Antwort hilfreich

"mujrx" ist ja keine soo tolle Beschreibung, wenn man mal SOLL/IST wüßte..
Oder ob du wirklich malgeschaut hast was dir die Funktion liefert(ist die Rückgabe wirklich falsch oder liegt es nur an der Punkt-Erstellung).

Nur so am Rande, damit beschäftigen kann ICH mich nun nicht, keine Zeit - nur ein allgemeiner Schubser zu Kommunikation im Forum.

DWG mit 3dPL markiertem Klickpunkt und einem Punktobjekt(durch deine Zeilen erstellt) würde ggf. auch aufschlußreich sein.

------------------
CAD on demand GmbH - Beratung und Programmierung rund um AutoCAD

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

cadplayer
Ehrenmitglied
CADniker


Sehen Sie sich das Profil von cadplayer an!   Senden Sie eine Private Message an cadplayer  Schreiben Sie einen Gästebucheintrag für cadplayer

Beiträge: 1832
Registriert: 28.04.2009

erstellt am: 24. Nov. 2015 08:36    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities


Drawing1.dwg

 
Die Frage war jetzt, Installation von SP1 in Civil2016 ist nicht möglich bei mir. Nicht hilfreich war eben der Beitrag:
edit
Doch schon, SP1 ist bereits grundinstalliert bei mir, die Funktion läuft dennoch fehlerhaft. Punkte werden nicht im gegebenen Abstand ausgesetzt, da die übergabe in
(vlax-curve-getPointAtDist curve-obj (getdist "\n Enter a distance: ")
nicht den korrekten Punkt liefert.
https://knowledge.autodesk.com/support/autocad/troubleshooting/caas/sfdcarticles/sfdcarticles/AutoCAD-2016-Hotfix-1-This-update-could-not-be-installed.html

Fehlerdatei im Anhang!

------------------
Gruss Dirk
Blog | Adolf Spende | Infra-Feed | ÅF AB

[Diese Nachricht wurde von cadplayer am 24. Nov. 2015 editiert.]

[Diese Nachricht wurde von cadplayer am 24. Nov. 2015 editiert.]

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

cadplayer
Ehrenmitglied
CADniker


Sehen Sie sich das Profil von cadplayer an!   Senden Sie eine Private Message an cadplayer  Schreiben Sie einen Gästebucheintrag für cadplayer

Beiträge: 1832
Registriert: 28.04.2009

Windows 10
64bit system
Autocad Civil3d 2020 ENGLISH
Visual Studio 2019
OpenDCL.Runtime.9<P>

erstellt am: 24. Nov. 2015 10:50    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

gelöst!
Installations fehlermeldung kommt wie gesagt, wenn bereits SP1 installiert wurde - (wenn an sich die Beschreibung nicht stimmt). So könnte man update deinstallieren, dann funktioniert es auch mit der UpdateInstallation.

Der Fehler in der Routine kam zu stande, weil OSMODE nicht explizit auf 0 gestellt wurde. Geht also alles problemlos.

------------------
Gruss Dirk
Blog | Adolf Spende | Infra-Feed | ÅF AB

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

cadffm
Moderator
良い精神




Sehen Sie sich das Profil von cadffm an!   Senden Sie eine Private Message an cadffm  Schreiben Sie einen Gästebucheintrag für cadffm

Beiträge: 21533
Registriert: 03.06.2002

Alles

erstellt am: 24. Nov. 2015 15:14    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für cadplayer 10 Unities + Antwort hilfreich

Osmode=0
Bedeutet das man Objektfänge ausschaltet (die einzelnen Einstellungen/Fänge).
Eleganter wäre es den OFANG zu deaktivieren(Einstellungen bleiben erhalten).

In deinem Beispiel ist das jedoch nicht nötig!
In Autocad gibt es die SysVar Osnapcoord, diese steuert ob bei Koordinateneingaben der Objektfang berücksichtigt werden soll oder nicht(bei Automationen wie Makro, Script oder Befehlszeileneingaben, was du ja mit command und sendcommand in VBA machst!.

In jedem Acadprofil sollte diese Variable daher umgestellt sein, weil kaum jemand daran denkt.
In einer MakroScriptCommand - whatever - sollte diese daher umgestellt werden, denn der User macht es nicht.

Für eine Voreinstellung mußte Adesk sich entscheiden, für meinen Geschmack die falsche Wahl getroffen..

------------------
CAD on demand GmbH - Beratung und Programmierung rund um AutoCAD

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

cadplayer
Ehrenmitglied
CADniker


Sehen Sie sich das Profil von cadplayer an!   Senden Sie eine Private Message an cadplayer  Schreiben Sie einen Gästebucheintrag für cadplayer

Beiträge: 1832
Registriert: 28.04.2009

erstellt am: 25. Nov. 2015 05:13    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Danke fuer deine nachträglichen infos

------------------
Gruss Dirk
Blog | Adolf Spende | Infra-Feed | ÅF AB

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

Anzeige.:

Anzeige: (Infos zum Werbeplatz >>)

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen

nächster neuerer Beitrag | nächster älterer Beitrag
Antwort erstellen


Diesen Beitrag mit Lesezeichen versehen ... | Nach anderen Beiträgen suchen | CAD.de-Newsletter

Administrative Optionen: Beitrag schliessen | Archivieren/Bewegen | Beitrag melden!

Fragen und Anregungen: Kritik-Forum | Neues aus der Community: Community-Forum

(c)2023 CAD.de | Impressum | Datenschutz