Guten Abend nochmal
Also meine Frage ist beantwortet aber zum Verständnis für alle...
Zitat:
Original erstellt von cadffm:
Wenn ich dich recht verstehe möchtest du überhaupt keine Option anbieten sondern lediglich
die Möglichkeit geben einen Vorgabewert per Enter zu übernehmen?
Doch. Ich möchte eben die Option anbieten...
Zitat:
Original erstellt von cadffm:
PUNKT wählen vs. Zahlenwert
Das eine ist eine Koordinate, das andere ist eine Zahl - macht auf den ersten Block keinen Sinn!?
...einen Zahlenwert zu verändern, der erst
später im Programm benötigt wird.
Das Eine hat mit dem Anderen gar nichts zu tun.
Es geht mir eben darum, keine weitere Abfrage zu generieren falls man den Wert nicht verändern will.
Ansonsten müsste ich die Frage fast immer mit Enter überspringen.
Mein Lisp benötigt nur zwei Eingaben: Eine Auswahl und eine Koordinate.
Eine Zahl ist vorgegeben, soll aber auf Wunsch auch verändert werden können (aber nicht jedesmal abgefragt werden).
Daher soll diese innerhalb von ssget (wie es Jörn gelöst hat) oder innerhalb der getpoint angeboten werden.
Ausserdem habe ich das Prinzip für das Forum etwas vereinfacht um die Frage einfacher zu gestallten. In Wirklichkeit frage ich einen Bereich mit getcorner ab, darin wiederum benötige ich zusätzlich einen getpoint, darin wiederum eine getdist.
In meinem Lisp sieht es dann 1:1 so aus:
Code:
(setq Y-Untergrenze
(cadr (getcorner
(while (not Nullpunkt3D)
(cond
((setq Nullpunkt3D
(getpoint "\nPunkt für erstes Profil wählen oder [Eingabe] um Profilabstand zu ändern:")
)
Nullpunkt3D
)
((not Nullpunkt3D)
(setq Aussparung
(getdist
(strcat "\nAbstand <" (rtos Aussparung) "> eingeben oder mittels zwei Punkte wählen:")
)
)
)
)
) ;_ Ende von while
"\nUntergrenze des Zielbereichs angeben: "
)
)
)
;; davon brauche ich dann...
(setq Y-Obergrenze (cadr Nullpunkt3D))
(setq Maximalhöhe (- Y-Obergrenze Y-Untergrenze))
So funtioniert es bei mir und so soll es sein.
Sollte jemand noch einen groben Fehler sehen bin natürlich dankbar.
------------------
Du kannst in anderen nur entzünden,
was in Dir selber brennt!
Wollte noch ein File anhängen, aber habe die Kiste schon heruntergefahren.
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP