---

Hi,

ich versuche gerade in einen Menu-Button zu erstellen, der
seine Beschriftung durch eine Konstante (oder Variable)
erhält (wegen Mehrsprachigkeit). Leider akzeptiert ':label'
an dieser Stelle (siehe Kommentare im Programm) keine
Konstanten (mit Variablen habe ich es auch schon versucht).

Anstelle des gewünschten Labels erhalte ich als Button-Beschriftung
'dtc_3d_shapes_sphere'.
Benutzte ich an der gleichen Stelle gleich einen String,
ist die Beschriftung korrekt.

An allen anderen Stellen funktioniert die Verwendung von
Konstanten einwandfrei!

Ich verwende übrigens
OneSpace Designer Modeling 2002+  11.5 (12.Jun 2002)

Hier der LISP-Code:

(defconstant *dtc-shapes-button* "3D Elemente")
(defconstant *dtc-shapes-menu-group-basic* "Einfache Grundformens")
(defconstant *dtc-sphare-button* "Kugel")

(sd-create-menu "3D-Shapes"
  :title *dtc-shapes-button*
  :contents '(
    (:buttonBox "BASICSHAPES"
      :title *dtc-shapes-menu-group-basic*
      :buttons (
        (dtc_3d_shapes_sphere
          :label *dtc-sphare-button* ; <- FUNKTIONIERT NICHT
;;        :label "Kugel"            ; <- würde funktionieren
)))))

Vielen Dank für Eure Hilfe!!!
Dieter

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

---

Hallo,

Man braucht als Label nicht die Variable/Konstante sondern den Wert der Konstanten. Den erhaelt man mit einem Komma. Dann muss man aber den Quote (') in einen Back-Quote (`) bei der Liste fuer den contents aendern. Sonst gibt's eine Fehlermeldung. Der Code kann wie folgt aussehen:

(sd-create-menu "CREATE_2D"
:title *dtc-shapes-button*
:contents `( ;<- back quote
(:buttonBox "BASICSHAPES"
:title *dtc-shapes-menu-group-basic*
:buttons (
(dtc_3d_shapes_sphere
:label ,*dtc-sphare-button* ;<-Komma
)))))

Gruss Dorothea

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

---

Hi Dorothea,

jetzt bin ich aber impressed!!!

Vielen Dank für die schnelle Antwort.
Problem beseitigt!!!

Gruss
Dieter

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