TimerGetState

> [HTML Version](timergetstate.html)

**Синтаксис**

````
procedure TimerGetState(AVariable: TM\_Variable): Integer;

````
**Описание**

Возвращает состояние таймера по переменной AVariable. "-1" : таймер сброшен; "0" : таймер на паузе; "1" : таймер запущен.

**Пример кода**

````
var  
  I: Integer;  
begin  
  TimerStart(vrTime, 0);      // запустить таймер по переменной "vrTime"  
  I := TimerGetState(vrTime); // узнать состояние таймера, результат: I = 1  
end.
````