Hallo Mitstreiter,
bin am verzweifeln: bin beim Umstellen meines Vermessungsdateieinleseprogrammes auf 2015
Habe eine Funktion zum Zeichnen der Polylinie :
Code:
(defun liniezeichnen (LinieZ koordliste / )
(print (setq aktiv (getvar "CMDNAMES")))
(setq koordliste (mapcar 'nurkoord koordliste)) ; enfernt name und Typ gibt nur die koordinaten zurück
(Princ (strcat "zeichne eine " LinieZ "-Linie"))
(If (= LinieZ "2D")
(command "_pline")
(command "_3Dpoly")
)
(mapcar 'command koordliste)
(command "" )
)
;
Wenn ich das mit der Funtion Test starte wird die Linie gezeichnet :
Code:
(defun c:test ( / )
(setq koordliste (List (List "pkt1" "" 4516767.027 5627551.431 317.31)
(List "pkt2" "" 4516746.235 5627553.643 316.90)
(List "pkt3" "" 4516725.017 5627555.831 316.65)
)
)
(liniezeichnen "2D" koordliste) )
;
Komme ich aber mit der gleichen Liste aus meinem Programm dann bricht LISP nach dem ersten Command ab. Habe schon alle vorherigen Command Aufrufe auskommentiert aber trotzdem Absturz.
Gibt es noch andere Befehle die den Commandbefehl blockieren ? In der CMDNAMES wird nichts ausgewiesen was noch aktiv sein könnte ?
Sehr hilfreich ist natürlich dass ACAD nach dem Absturz über den Taskmanager gekillt werden muss
Die englische Hilfe nützt mir nix (hatte in der Schule nur Russisch als Fremdsprache) und die deutsche Hilf besteht ja aus Chinesischen Lettern
Hoffe jemand kann mir einen Denkanstoss geben.
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP