[Gambas-user] Timer backwards?

[Bruce Steers]

> Public Sub Time_Timer()
>   Dec $iCountDown
>   If $iCountDown > 0 Then Return
>   $Timer.Stop
>   Raise ZeroReached
> End
>

Oops , sorry, correction.
The first 2 lines of that function are in error because if the countdown
was 1 second it would instantly become zero so it is 1 second out.

*  If $iCountDown > -1 Then Return*

Would fix that :)
BruceS
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.gambas-basic.org/pipermail/user/attachments/20210305/89fbcbf8/attachment.htm>