And don't forget to set iTraceInterval to 10000 (or some other high value) in timer.init.



>Put the following in your base timer class' timer event. Add 2 properties to your timer class called iTraceInterval and iregularinterval. In timer.init, set iregularInterval = Timer.Interval and be sure to put DODEFAULT() in all subclasses:
>
>
>

>IF WVISIBLE("trace") OR  ;
>   WVISIBLE("debugger") OR ;
>   WVISIBLE("call") OR ;
>   WVISIBLE("watch") OR ;
>   WVISIBLE("locals")
>
>   IF THIS.Interval # THIS.iTraceInterval
>      THIS.iRegularInterval = THIS.Interval
>      THIS.Interval = THIS.iTraceInterval
>   ENDIF
>
>ELSE
>
>   IF THIS.Interval = THIS.iTraceInterval
>      THIS.Interval = THIS.iRegularInterval
>   ENDIF
>   THIS.iRegularInterval = THIS.Interval
>
>ENDIF
>

>
>This is now a trace aware timer (this code comes with VFP 6.0)