Wenn #PB_Any als '#Gadget' Parameter verwendet wird, dann wird die Nummer des neuen Gadgets als 'Ergebnis' zurückgegeben.
Zu diesem Gadget kann mittels GadgetToolTip() eine 'Mini-Hilfe' hinzugefügt werden.
Sobald ein Panel (Schalttafel) erstellt wurde, ist seine Liste mit Schaltflächen leer. Die folgenden Befehle können benutzt werden, um auf den Inhalt des PanelGadgets zuzugreifen:
- AddGadgetItem(): fügt eine Schaltfläche hinzu.
- RemoveGadgetItem(): entfernt eine Schaltfläche.
- CountGadgetItems(): ermittelt die Anzahl der Schaltflächen.
- ClearGadgetItems(): entfernt alle Schaltflächen.
- GetGadgetItemText(): ermittelt den Text der angegebenen Schaltfläche.
- SetGadgetItemText(): ändert den Text der angegebenen Schaltfläche.
- SetGadgetState(): ändert den aktiven Panel (Schalttafel).
- GetGadgetState() ermittelt den Index des aktuellen Panels.
- GetGadgetAttribute(): mit einem der folgenden Attribute: (es muss mindestens ein Eintrag vorhanden sein, damit dies funktioniert)
#PB_Panel_ItemWidth : Gibt die Breite des inneren Bereichs zurück, worin die Gadgets angezeigt werden.
#PB_Panel_ItemHeight: Gibt die Höhe des inneren Bereichs zurück, worin die Gadgets angezeigt werden.
#PB_Panel_TabHeight : Gibt die Höhe der "Reiter" ("Panel-Tabs") am oberen Rand des Gadgets zurück.
Sie müssen erst AddGadgetItem() aufrufen, um eine Schalttafel hinzufügen, bevor Sie
andere Gadgets innerhalb des PanelGadget erstellen können. Die nächsten Gadgets werden dann
automatisch auf dem neuen Panel-Gadget Eintrag erstellt.
Dies ist sehr bequem. Wenn das Panel-Gadget mit allen benötigten Gadgets gefüllt wurde,
muss CloseGadgetList() aufgerufen werden, um zur vorhergehenden Gadgetliste
zurückzukehren. Dies bedeutet, dass ein Panel-Gadget auch auf einem anderen
Panel-Gadget erstellt werden kann...
Beispiel:
; Zeigt die Verwendung mehrerer Panels...
If OpenWindow(0, 0, 0, 322, 220, "PanelGadget", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
PanelGadget (0, 8, 8, 306, 203)
AddGadgetItem (0, -1, "Panel 1")
PanelGadget (1, 5, 5, 290, 166)
AddGadgetItem(1, -1, "Sub-Panel 1")
AddGadgetItem(1, -1, "Sub-Panel 2")
AddGadgetItem(1, -1, "Sub-Panel 3")
CloseGadgetList()
AddGadgetItem (0, -1,"Panel 2")
ButtonGadget(2, 10, 15, 80, 24,"Button 1")
ButtonGadget(3, 95, 15, 80, 24,"Button 2")
CloseGadgetList()
Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow
EndIf
