Widgets verschieben

Beispiele

! Dieses kleine Code-Beispiel verschiebt den Programmende-Button
! des Hauptdialogs bei jedem Schleifendurchlauf um eine Pixelposition nach
! links oben. Nach 200 Durchläufen ist der Button vollkommen verschwunden
! und kann somit vom Anwender auch nicht mehr angewählt werden.
FOR i=0 TO 200
    WIDMOVE "DLG007_Dexit" ; "MoveX -1, MoveY -1"
NEXT

Referenz

WIDMOVE WidgetName$|WidgetID ; Kommando$
Mit der Anweisung wird ein Widget auf dem Bildschirm verschoben. Der Kommando$ enthält die Verschiebeanweisungen in der Form "MoveXnnn,MoveYnnn" oder einer beliebigen Kombination davon. "MoveX" verschiebt ein Widget in der Horizontalen, "MoveY" verschiebt das Widget in der Vertikalen. "nnn" steht dabei für die Anzahl der Bildschirmpunkte, um die das Widget verschoben werden soll. Negative Zahlen für "nnn" sind zulässig. WIDMOVE stellt eine interessante Alternative zum WIDUNMAP dar, denn statt ein Widget auszublenden, kann es auch ganz einfach aus dem Sichtbereich des Dialogs herausgeschoben werden.

Siehe auch



Schatten