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