EMA-XPS Online
MAKE-BABYLON-GRAPHIC-BUTTON
MAKE-BABYLON-GRAPHIC-BUTTON
===========================
Syntax: (make-babylon-graphic-button <interface>
<WName> <xPos> <yPos> <Breite> <Höhe>
<Grafik-Datei> <Farbe>
&Optional <Aktion> &Rest <Arg>)
Diese Funktion definiert einen Grafik-Push-Button für
die Oberfläche. <WName> ist der Name des Buttons.
<xPos> und <yPos> geben die Position der oberen linken
Ecke an. <Breite> und <Höhe> definieren die Breite und
Höhe des Buttons. <Grafik-Datei> ist der Name der
Grafik-Datei, die benutzt wird. <Farbe> wird durch
Babylon v3. nicht unterstützt. <Aktion> beschreibt die
Task, die bei drücken der Taste aktiviert wird. Der
erzeugte Grafik-Button erscheint im Interface.
Beispiel: >(defun make-kb-interface (interface)
(add-window-elements
interface
(list (make-babylon-graphic-button
interface
"TASTE1" 400 300 100 50
"/bitmaps/pferd" nil
'(start 'demo-task interface)))))
EMA-XPS Online