Всем привет!

В нескольких темах обсуждался автоматическое завершение программы ночью, если пользователь сам не вышел.

Что может быть плохого в таком варианте? (Вроде работает, но может, есть подводные камни).

В конце главного программного файла:




IF Empty(VERSION(2))

&& ----- добавка
IF TIME()>"00:00:00" .and. TIME()<"06:00:00"
CLOSE all
QUIT
endif
&&------
READ EVENTS
_screen.visible = .f.
endif

ПыхА как насчет обработки ситуации, когда время переводят

Ну, это-то не проблема - дать диапазон от 01:01:00 до 06:00:00.

Да дело в том, что погорячился. Вход-то в программу блокируется, а выхода из главного меню не происходит! :-((

12345вышелзайчикпогулять автора выхода из главного меню не происходит

а с чего он должен выполняться Ваш код?

если уж так хочется,
то этот код должен быть в таймере,
который срабатывает через опред.промежутки времени

Да, в-общем, правильно. Этот эксперимент неудачный. Просто давно этим вопросом не занимался. Появилось время - решил покопать. На формах таймеры разбросаны, работает. Но если открыто просто главное меню, то выход не делается. Где-то было про втыкание таймера в меню. Наверно, единственный способ, буду искать.

MiklSЕсли программу хлопаем, а можь ещё и компьютер за юзером выключить? :)

Ну, за комп отвечает сисадмин - его головная боль. А программа - моя епархия.

Galyamov Rinat
>Где-то было про втыкание таймера в меню. Наверно, единственный способ, буду
>искать.

К _screen`у таймер приделывается и все.


Posted via ActualForum NNTP Server 1.4



А можно поподробней? Может, этот вариант проще?

Спасибо, попробую!

Оформил как отдельную программу - работает ( ну, конечно, messagemox->messagebox).
Но вставил в головную программу - не работает. Видимо, не туда вставил... ;-)

Вставил куда нужно - заработало!
Большое спасибо!