Prehľad
Nástroje obsahu
ENTRY OnHistoryTime(IN TIME _newTime) ; actions END OnHistoryTime
_newTime | Time of the picture. |
BOOL _blnHistory ; variable that specifies whether the History mode is or is not activated TIME _historyTime ; current history time, if exists ENTRY OnHistoryTime(IN TIME _newTime) IF _newTime\VLD THEN IF ! _blnHistory THEN ; activating the History mode _blnHistory := @TRUE ENDIF ; history time _historyTime := _newTime ELSE ; deactivating the History mode _blnHistory := @FALSE ENDIF END OnHistoryTime BEGIN _blnHistory := @FALSE ENDIF
Pridať komentár