ExplorerTreeGadget-Bug
Verfasst: 16.01.2015 14:13
Warum wird schwachsinnigerweise bei dem ExplorerTree-Gadget -nachdem es deaktiviert wird- ALLE Einträge als markiert gezeigt, obwohl man tatsächlich nur eine Auswahl getroffen hat?
Code: Alles auswählen
If OpenWindow(0, 0, 0, 260, 340, "ExplorerTree-Bug", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
ExplorerTree= ExplorerTreeGadget(#PB_Any, 10,10, 240, 240, "", #PB_Explorer_AlwaysShowSelection | #PB_Explorer_NoLines)
Button_Abbruch = ButtonGadget(#PB_Any, 150, 270, 100, 25, "Abbruch")
Button_Start = ButtonGadget(#PB_Any, 150, 300, 100, 25, "Start")
DisableGadget(Button_Abbruch,1)
Repeat
Event = WaitWindowEvent()
Select EventGadget()
Case Button_Start
DisableGadget(Button_Start,1)
DisableGadget(ExplorerTree,1)
DisableGadget(Button_Abbruch,0)
Case Button_Abbruch
DisableGadget(Button_Start,0)
DisableGadget(ExplorerTree,0)
DisableGadget(Button_Abbruch,1)
EndSelect
Until Event = #PB_Event_CloseWindow
EndIf