Lt. Hilfe muss bei Änderung des Timers dieser vorher gelöscht werden.
Code: Alles auswählen
RemoveWindowTimer(#Window, Timer)
AddWindowTimer(#Window, Timer, Timeout)
Code: Alles auswählen
If OpenWindow(0, 0, 0, 400, 100, "Timer Example", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
ProgressBarGadget(0, 10, 10, 380, 20, 0, 100)
AddWindowTimer(0, 123, 250)
AddWindowTimer(0, 123, 1250)
Value = 0
Repeat
Event = WaitWindowEvent()
If Event = #PB_Event_Timer And EventTimer() = 123
Value = (Value + 5) % 100
SetGadgetState(0, Value)
EndIf
Until Event = #PB_Event_CloseWindow
EndIf