---

Hallo,

ich habe Probleme mit LISP-Anweisungen:
1.)
Wenn ich die folgende Funktion in einer Funktion aufrufe, die bei :after-initialization, :ok-action oder :cancel-action eines Dialogs aufgerufen wird, bekomme ich immer den Fehler "Negative Index: -1"

(defun sti-special-settings ()
(am_text_settings :size 2.5)
(am_text_settings :color :rgb 0.92,1,1)
(am_text_settings :ratio 0.8)
(am_text_settings :slant 0)
(am_text_settings :font1b "hp_i3098_c")
(am_text_settings :abs_angle 0.0)
(am_text_settings :frame "BALLOON")
(am_text_settings :feedb "ALL")
)

Darf am_text_settings nicht beim Initialisieren von Dialogen ausführen? Wenn ja, wo dann? Ich möchte sicherstellen, daß die Einstellungen beim Schließen des Dialogs wieder zurückgesetzt werden.

2.)
die LISP-Funktion round rundet bei .5 immer ab, bei .51 immer auf (mathematische Rundng?)
Gibts eine Möglichkeit, kaufmännisch zu runden (.5 auf, .4 ab) oder muß man das selbst programmieren?

------------------
Gruß aus dem Salzkammergut

Thomas Hollerweger

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

---

1.) Alle COMMANDs (also auch das ganze Zeugs, das der Aufzeichner ausspuckt)
sollte man mit (sd-call-cmds cmd) ausführen. Näheres in der Dokumentation im IntegrationKit in Installdir\help\Common\documentation\integration_kit\reference\sd-call-cmds.html

2.) Da hab ich nix gefunden, muss man wohl selbst programmieren

------------------
meine LISP-Makros sind auf Heikos Hilfeseite
Grüße aus Wien

Walter
DC4 Technisches Büro GmbH

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

---

Hallo Walter,

zu 1.) vielen Dank, es funktioniert! Unities sind unterwegs! 

zu 2.) schade, aber Übung macht den Meister 

------------------
Gruß aus dem Salzkammergut

Thomas Hollerweger

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

---

Hallo Thomas,

zu 2)
Das mit dem round-Kommando ist sogar noch komplizierter. Es rundet naemlich bei .5 immer auf die naechste gerade Zahl. Sprich:
(round 1.5) = 2
(round 2.5) = 2
Das heisst die Aussage, dass die LISP-Funktion round bei .5 immer abrundet, ist nicht ganz richtig. Warum das so ist weiss ich auch nicht.

Gruss Dorothea

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

---

Zitat:

---

Original erstellt von Dorothea:
Das mit dem round-Kommando ist sogar noch komplizierter. Es rundet naemlich bei .5 immer auf die naechste gerade Zahl. Sprich:
[...]Warum das so ist weiss ich auch nicht.

---

Siehe Spezifikation von Common LISP, zum Beispiel unter http://www.lispworks.com/reference/HyperSpec/Body/f_floorc.htm:

"round and fround produce a quotient that has been rounded to the nearest mathematical integer; if the mathematical quotient is exactly halfway between two integers, (that is, it has the form integer+1/2), then the quotient has been rounded to the even (divisible by two) integer."

Unser (round) verhaelt sich also entsprechend der Spezifikation von LISP.

Claus

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