Unter Windows gab diesbezüglich bisher keine Probleme.
Code: Alles auswählen
OpenWindow(0, 150,150,800,100, "Hauptfenster", #PB_Window_MinimizeGadget | #PB_Window_MaximizeGadget | #PB_Window_SizeGadget | #PB_Window_ScreenCentered)
ButtonGadget(11, 600, 25, 80, 50, "Start")
ProgressBarGadget(10, 50, 30, 520, 30, 0, 1000)
Repeat
Event = WindowEvent()
If event = #PB_Event_CloseWindow
End
EndIf
If Event=#PB_Event_Gadget
Select EventGadget()
Case 11
a= 0
SetGadgetState(10, a)
While a <> 1001
SetGadgetState(10, a)
a = a + 1
Debug a
Delay(10)
Wend
EndSelect
EndIf
Until quit
Auf dem Mac füllt sich die Progressbar nicht, sondern bleibt leer. Erst am Ende zeigt sie mit einem Schlag 100% an.