Возврат на главную мнемосхему при бездействии оператора

[Belyash1]

Добрый день

Хотел узнать, может быть, кто-то реализовал механизм возврата на главную мнемосхему при бездействии опертаора.
К примеру, при возникновении какого-нибудь аварийного сигнала происходит переход с главной мнемосхемы на мнемосхему, связанную с этим сигналам. Но если в течении, например 20 секунд, оператор ничего не выпонлняет, то мнемосхема снова переключается на главную.

Пожалуйста, помогите

[pan2000]

   Здравствуйте.

Для контроля временных интервалов можно использовать событие "Прошла секунда" и таймерную переменную vrTimer типа integer.
Установка таймерной переменной в скрипте "Пользователь перешел на эту страницу" на странице связанной с аварией:

Код: (delphi)

begin
  vrTimer.Value := 20 + 1;
end.

Работа с таймерной переменной - скрипт "Прошла секунда":

Код: (delphi)

begin
  vrTimer.inc(-1);
  if vrTimer.AsInt = 1 then Page1.GoToPageAll;  // оператор "прозевал аварию" - возврат на главную страницу
end.

Сброс таймера во всех скриптах, связанных с действиями оператора:

Код: (delphi)

  vrTimer.Value := 0;   // останов таймера

Пример для одного клиента во вложении.