Hot News:

Mit Unterstützung durch:

   Foren auf CAD.de (alle Foren)
  Rund um AutoCAD
  Flächenermittlung

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
  
PNY wird von NVIDIA zum Händler des Jahres gewählt – zum dritten Mal in Folge, eine Pressemitteilung
Autor Thema:  Flächenermittlung (2318 mal gelesen)
siko04
Mitglied
Bauzeichnerin


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

Beiträge: 303
Registriert: 09.10.2008

ACAD 2018

erstellt am: 07. Jul. 2010 09:45    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

Flächen.lsp.txt
 
Hallo
letzte Woche war ein toller Beitrag über Flächenermittlung.
Habe nun versucht die lsp.Datei zu schreiben, hat aber nicht so richtig funktioniert. Füge sie im Anhang mal mit zu.

Bei mir kommt immer eine Fehlermeldung
Was habe ich falsch gemacht?
Vielleicht kann mir ja einer helfen
Danke

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

charlieBV
Ehrenmitglied V.I.P. h.c.
Bauzeichnerin



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

Beiträge: 9319
Registriert: 28.08.2003

 erstellt am: 07. Jul. 2010 09:56    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 siko04 10 Unities + Antwort hilfreich
Hallo Siko,

erst einmal, Anhänge bitte ohne Umlaute (steht im Anhangeinfügenfenster auch drin!), dann wäre es hilfreich, wenn du genau schreiben würdest, wie du das Lisp lädst, und vor allem, welche Fehlermeldung kommt.... Hellsehen können wir nicht, auch wenn es manchmal so wirken mag

------------------
Gruß Yvonne
Inoffizielle ADT-Help-Site

"Gehe nicht, wohin der Weg führen mag, sondern dorthin, wo kein Weg ist, und hinterlasse eine Spur."
Jean Paul

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

siko04
Mitglied
Bauzeichnerin


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

Beiträge: 303
Registriert: 09.10.2008

ACAD 2018

erstellt am: 07. Jul. 2010 10:06    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

Flaechen.lsp.txt
 
Sorry
habe den Anhang nocheinmal mitgeschickt
Lade die Datei
Dann gebe ich den Befehl stempel ein und es erscheint folgende Fehlermeldung:
;Fehler: zuwenig Argumente

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

CADmium
Moderator
Maschinenbaukonstrukteur




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

Beiträge: 13527
Registriert: 30.11.2003

Hinweis: Meine Mitarbeit auf CAD.DE ist fakultativ, unentgeltlich und beruht nur auf einem ausgeprägtem Helfersyndrom.

erstellt am: 07. Jul. 2010 10:28    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 siko04 10 Unities + Antwort hilfreich
nicht (stract  sondern strcat

einfach copy&paste von hier

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

siko04
Mitglied
Bauzeichnerin


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

Beiträge: 303
Registriert: 09.10.2008

ACAD 2018

erstellt am: 07. Jul. 2010 10:33    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
ersteinmal Danke. Heb den Fehler korrigiert und ausprobiert aber kommt wieder die gleiche Fehlermeldung.

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

siko04
Mitglied
Bauzeichnerin


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

Beiträge: 303
Registriert: 09.10.2008

ACAD 2018

erstellt am: 07. Jul. 2010 10:38    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
Habe jetze die ganzen Dateien mit kopieren nocheinmal geschrieben.
Wieder geladen, dann Polylinie ausgewählt und es erscheint:
;Fehler: no function difinition:
VLAX-ENAME->VLA-OBEJECT

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

CADmium
Moderator
Maschinenbaukonstrukteur




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

Beiträge: 13527
Registriert: 30.11.2003

Hinweis: Meine Mitarbeit auf CAD.DE ist fakultativ, unentgeltlich und beruht nur auf einem ausgeprägtem Helfersyndrom.

erstellt am: 07. Jul. 2010 10:38    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 siko04 10 Unities + Antwort hilfreich
(defun C:stempel(/OBJ A L)  da fehlt ein Leerzeichen vor OBJ -> also (defun C:stempel(/ OBJ A L)

(setqOBJ  hier fehlt auch ein Leerzeichen

kopiers dir einfach aus dem genannten Beitrag in dein notpad, speicher es als lsp und gut ist

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

Andreas Kraus
Mitglied
Elektrotechniker


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

Beiträge: 1455
Registriert: 11.01.2006

WIN 10
ACAD 2022
BricsCAD V23

erstellt am: 07. Jul. 2010 10:41    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 siko04 10 Unities + Antwort hilfreich
(vl-load-com)
gleich in die erste Zeile, dann ist der Befehl bekannt.

------------------
Gruß
Andreas

http://kraus-cad.de

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

CADmium
Moderator
Maschinenbaukonstrukteur




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

Beiträge: 13527
Registriert: 30.11.2003

Hinweis: Meine Mitarbeit auf CAD.DE ist fakultativ, unentgeltlich und beruht nur auf einem ausgeprägtem Helfersyndrom.

erstellt am: 07. Jul. 2010 10: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 siko04 10 Unities + Antwort hilfreich
Zitat:
Original erstellt von Andreas Kraus:
(vl-load-com)
gleich in die erste Zeile, dann ist der Befehl bekannt.

jo .. gibt ja auch Leute, die laden das nicht automatisch z.B. in der acaddoc.lsp

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

siko04
Mitglied
Bauzeichnerin


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

Beiträge: 303
Registriert: 09.10.2008

ACAD 2018

erstellt am: 07. Jul. 2010 11:01    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

Flaechen.lsp.txt
 
Habe doch den Beitrag genau kopiert und noch einmal genau verglichen.
Füge alles nocheinmal als Anhang mit.
Und wo genau muss jetzt folgendes hin (vl-load-com)
Verstehe es nicht so richtig.
Ich finde ganze Materie auch ganz schön schwierig
Trotzdem Danke für Eure Geduld

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

CADmium
Moderator
Maschinenbaukonstrukteur




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

Beiträge: 13527
Registriert: 30.11.2003

Hinweis: Meine Mitarbeit auf CAD.DE ist fakultativ, unentgeltlich und beruht nur auf einem ausgeprägtem Helfersyndrom.

erstellt am: 07. Jul. 2010 11: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 Nur für siko04 10 Unities + Antwort hilfreich
(defun c:stempel( / OBJ A L)
(vl-load-com)
(if(and(setq OBJ(car(entsel "\nPolylinie wählen:")))
      (setq OBJ(vlax-ename->vla-object OBJ))
      (setq A (vla-get-area OBJ))
      (setq L (vla-get-length OBJ))
  )
  (command "_mtext" pause pause (strcat "Fläche: "(vl-princ-to-string A) "\nUmfang: " (vl-princ-to-string L))"")
)
)

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

siko04
Mitglied
Bauzeichnerin


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

Beiträge: 303
Registriert: 09.10.2008

ACAD 2018

erstellt am: 07. Jul. 2010 11:15    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
Vielen Vielen Vielen Vielen Dank für Eure Hilfe

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

siko04
Mitglied
Bauzeichnerin


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

Beiträge: 303
Registriert: 09.10.2008

ACAD 2018

erstellt am: 07. Jul. 2010 14:20    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
Vielen Dank noch einmal hat alles sehr gut geklappt habe es sogar nach der Anleitung hin bekommen, dass am Ende jeweils m² und m steht.
Auch meine Kollegen sind sehr begeistert, es taucht aber jetzt folgende Frage auf:
Man hat nicht immer eine Polylinie sondern einzelne Elemente was muß geändert werden dass es dann auch klappt, mit den einzelnen Funktionen wie bei _MEASUREGEOM

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

CADmium
Moderator
Maschinenbaukonstrukteur




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

Beiträge: 13527
Registriert: 30.11.2003

Hinweis: Meine Mitarbeit auf CAD.DE ist fakultativ, unentgeltlich und beruht nur auf einem ausgeprägtem Helfersyndrom.

erstellt am: 07. Jul. 2010 14:34    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 siko04 10 Unities + Antwort hilfreich
naja .... man könnte als erste ne umgrenzung erstellen , die abfragen, die Werte ausgeben  und anschließend die Umgrenzung wieder löschen ..

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

siko04
Mitglied
Bauzeichnerin


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

Beiträge: 303
Registriert: 09.10.2008

ACAD 2018

erstellt am: 07. Jul. 2010 14:55    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
Na klar so geht es auch, wäre aber praktischer und kostet weniger Zeit wenn man über die Endpunkte oder Schnittpunkte  machen könnte.
Aber was es nicht gibt es eben nicht.
Bei unseren alten Zeichenprogramm funktionierte es sehr gut, aber man muss sich vielleicht auch mal umstellen und auf einige Sachen verzichten

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

CADmium
Moderator
Maschinenbaukonstrukteur




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

Beiträge: 13527
Registriert: 30.11.2003

Hinweis: Meine Mitarbeit auf CAD.DE ist fakultativ, unentgeltlich und beruht nur auf einem ausgeprägtem Helfersyndrom.

erstellt am: 07. Jul. 2010 15:02    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 siko04 10 Unities + Antwort hilfreich
naja .. das mit der umgrenzung erstellen, auslesen und wieder löschen dachte ich mir schon automatisiert für den Nutzer unsichtbar in einem Programm versteckt ...

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

CADwiesel
Moderator
CAD4FM UG




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

Beiträge: 1989
Registriert: 05.09.2000

AutoCAD, Bricscad
Wir machen das Mögliche unmöglich

erstellt am: 08. Jul. 2010 13:33    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 siko04 10 Unities + Antwort hilfreich
Wenn mich nicht alles täuscht, hatte ich mal so ein Werkzeug auf meiner Seite veröffentlicht (Schwpkt). Zum lernen ist das doch garnicht so verkehrt

------------------
Gruß
CADwiesel
Besucht uns im CHAT

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

siko04
Mitglied
Bauzeichnerin


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

Beiträge: 303
Registriert: 09.10.2008

ACAD 2018

erstellt am: 09. Jul. 2010 08:45    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
Vielen dank für den Tip. Habe mir die Datei runtergeladen und noch einige mehr nur mit dieser speziellen komme ich nicht zurecht.
Gibt es dafür eine Beschreibung?
Vielen Dank

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)2024 CAD.de | Impressum | Datenschutz