EMA-XPS Online
MAKE-BABYLON-TEXT-LABEL
MAKE-BABYLON-TEXT-LABEL
=======================
Syntax: (make-babylon-text-label <Interface>
<WName> <xPos> <yPos> <Breite> <Höhe>
<Aufschrift> <Rahmen> <Schriftart> <Farbe>
&Rest <Arg>)
Diese Funktion definiert ein Textfeld auf der Ober-
fläche. <WName> ist der Name des Textfeldes. <xPos>
und <yPos> geben die Position der oberen linken Ecke
an. <Breite> und <Höhe> definieren die Größe
des Textfeldes. <Aufschrift> beschreibt die Aufschrift
des Rahmens. <Rahmen>, <Schriftart> und <Farbe> werden
unter Babylon v3 nicht unterstützt. Das erzeugte
Text-Feld erscheint im Interface.
Beispiel: >(defun make-kb-interface (interface)
(add-window-elements
interface
(list (make-babylon-text-label interface
"BOX1" 400 300 100 50 "Eingabe:"
nil nil nil))))
EMA-XPS Online