![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Неактивность приложения [D6]
O?O © (2004-08-31 11:21:00)Как проконтролировать неактивность приложения, чтоб произвести в случае этой неактивности какие-либо действия, наприпер включить окно "по умолчанию"?
O?O (2004-08-31 13:01:00) [1]> MU © (31.08.04 11:56) [5]
> см Application.OnIdle + F1
Видимо это действительно то что надо, но описано неочень доступно :(
MU (2004-08-31 12:08:00) [2]нет, это я глупость написал...
MU (2004-08-31 12:03:00) [3]var XTime : Cardinal;
Form.FormCreate(...);
begin
XTime := GetTickCount;
end;
procedure TForm1.ApplicationEvents1Idle(Sender: TObject;
var Done: Boolean);
begin
if GetTickCount - XTime > 10000 then begin
XTime := GetTickCount;
PageControl.ActivePageIndex := 0;
end;
end;
MU (2004-08-31 11:56:00) [4]см Application.OnIdle + F1
O?O (2004-08-31 11:49:00) [5]если программа из 20 форм, и на каждой кучка мала всякой всячины то как-то я непредставляю за какими действиями следить. Как к примеру отслеживают действия пользователя ScreenSavers?
Квэнди (2004-08-31 11:42:00) [6]Попробуй кинуть таймер на форму, и делай ему disable на любое действие пользователя, поставь ему интервал 10 мин (600000) и на ontimer пиши свои действия...
O?O (2004-08-31 11:39:00) [7]К примеру у меня небольшая програмка из одной формы на которой PageControl с несколькими страничками. Приложение запущено, но его не юзают 10 мин. и оно делает активной страничку PageControl к примеру с логотипом или вводом пароля, вот что имеется ввиду.
MU (2004-08-31 11:23:00) [8]Application.OnIdle?