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
