CADsite forum

AutoCAD => Autolisp => Topic gestart door: Reimer op ma 11 01 2010, 12:22:15

Titel: pline tekenen met onbekend aantal punten (OPGELOST)
Bericht door: Reimer op ma 11 01 2010, 12:22:15
Beste lispers,

voor het uitzetten van een pad gebruiken we binnen een bestaande functie het volgende principe om een pline te tekenen:

(defun c:test ()
 (setq PLTYPE (getvar "plinetype"))
 (setvar "plinetype" 0)
 (command "pline")
 (setvar "plinetype" PLTYPE)
)


Nu is het probleem  dat na het starten van het commando "pline" de lisproutine direct doorgaat met de volgende stap. Ik heb al gewerkt met (command "pline" pauze), dit helpt helaas niet. Ik vindt het bovenstaande wel verklaarbaar. Ik heb echter nog geen oplossing. Hoe kan ik er voor zorgen dat de lisproutine pas door gaat nadat de pline is afgerond?

Reimer.
Titel: Re:pline tekenen met onbekend aantal punten
Bericht door: roy_043 op ma 11 01 2010, 13:31:25
Probeer het eerst eens met de juiste spelling van "pause":
(command "pline" pause)

Werkt dat niet gebruik dan:(defun c:test ( / PLTYPE)
  (setq PLTYPE (getvar "plinetype"))
  (setvar "plinetype" 0)
  (command "pline")
  (while (> (getvar "cmdactive") 0)
    (command pause)
  )
  (setvar "plinetype" PLTYPE)
)
Titel: Re:pline tekenen met onbekend aantal punten
Bericht door: Reimer op ma 11 01 2010, 15:31:53
Ik was iets te snel met typen op het forum. Goed gezien  :shock:
Ik had inmiddels bedacht dat je ook een pline kunt tekenen ongeacht de plinetype instelling en deze pline achteraf om te zetten met CONVERTPOLY.
Jouw oplossing werkt perfect. Dit gaan we toepassen. Bedankt.  :vreegoe:

Reimer.