---

Hallo zusammen.

Ich bin ein wenig mit grread / grdraw am rumexperimentieren.
Funktioniert soweit ganz gut, nur das wenn ich Pan dazwischen verwende (mittlere Maustaste) dann zeichnet es immer das letzte neu wenn ich mal still halte (auf die letzte Cursor Position),
was schräg aussieht

Kann mir da vieleicht einer einen Tipp geben wie ich das abfangen kann?

Gruss Steff

Code:

---

(defun c:Test ( / p1)
  (defun vSpur ( / P)
    (while (/= 3 (car (setq P (grread t))))
      (redraw)
      (grdraw p1 (cadr P) 7 1)
    )
  )
  (setq p1 (getpoint))
  (vSpur)
)

---

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

---

Zitat:

---

Original erstellt von Steff179:
... nur das wenn ich Pan dazwischen verwende (mittlere Maustaste) dann zeichnet es immer das letzte neu wenn ich mal still halte (auf die letzte Cursor Position),
was schräg aussieht ...

---

Sehr schwer zu verstehen was du da willst 
Was möchtest du denn genau?! Die Linie soll von Punkt zu Punkt im BKS gehen und sich bei pan nicht verändern?

" grdraw - Draws a vector between two points, in the current viewport"

------------------
Mfg Heiko

Elefantenjagd in Afrika
"... LISP-Programmierer bauen einen Irrgarten aus Klammern und hoffen, dass sich der Elefant darin verirrt..."   (www.uni-leipzig.de/~rotheh/elefant.htm)

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

---

Zitat:

---

Original erstellt von Dorfy:
Die Linie soll von Punkt zu Punkt im BKS gehen und sich bei pan nicht verändern?

---

In etwa so  hab mich wider mal selbst übertroffen mit meiner Formulierung 
Eigentlich sollte sie sich veränden, aber im Pan funktioniert grread nicht so wie ich das interpretiere.
Also würde ich die Linie am liebsten einfach nicht darstellen wärend ich im Pan bin.
Ev. mittels Reaktoren?

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

---

hi,
vllt. was mit grvecs 

------------------
Mfg Heiko

Elefantenjagd in Afrika
"... LISP-Programmierer bauen einen Irrgarten aus Klammern und hoffen, dass sich der Elefant darin verirrt..."   (www.uni-leipzig.de/~rotheh/elefant.htm)

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

---

Hmmmm ok mal schauen melde mich wider...

Besten Dank

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

---

hmmmmmmmmmmmmm

(defun c:Test ( / p1)
  (defun vSpur ( / P)
    (while
      (and (setq viewctr (getvar"viewctr"))
  (/= 3 (car (setq P (grread t)))))
      (redraw)
      (if (equal (getvar"viewctr") viewctr)
      (grdraw p1 (cadr P) 7 1))
          )
  )
  (setq p1 (getpoint))
  (vSpur)
)

------------------
Mfg Heiko

Elefantenjagd in Afrika
"... LISP-Programmierer bauen einen Irrgarten aus Klammern und hoffen, dass sich der Elefant darin verirrt..."   (www.uni-leipzig.de/~rotheh/elefant.htm)

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

---

viewctr das wars hey besten dank hab an allem anderen rumstudiert nur nicht am fenster...

besten dank

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