Thank you Przemek, I've reimplemented it this way. BTW, I didn't see this msg on the list. I suspect it was TP_ONTIME() related.
Brdgs, Viktor On 2010 Jan 29, at 20:34, Przemysław Czerpak wrote: > On Fri, 29 Jan 2010, [email protected] wrote: > > Hi Viktor, > >> 2010-01-29 20:11 UTC+0100 Viktor Szakats (harbour.01 syenar.hu) >> * contrib/hbtpathy/telepath.prg >> ! Fixed "midnight bug" in several TP functions having timeout option >> (it was wrong in all places). >> Reported by AbeB. >> ; Please review/test, I didn't make _any_ testing whatsoever. > > For such usage we have hb_milliSeconds() functions which returns > UTC time (if OS supports UTC time offset) in milliseconds which is > not reset at midnight, i.e. example I sent today to this list: > > proc main() > cls > hb_idleAdd( {|| > static s_timer := 0 > local timer := hb_milliseconds() > if timer - s_timer > 1000 > s_timer := timer > hb_dispoutat( 0, 72, time() ) > endif > return nil > } ) > wait > return > > best regards, > Przemek > _______________________________________________ > Harbour mailing list (attachment size limit: 40KB) > [email protected] > http://lists.harbour-project.org/mailman/listinfo/harbour _______________________________________________ Harbour mailing list (attachment size limit: 40KB) [email protected] http://lists.harbour-project.org/mailman/listinfo/harbour
