Delphi World - Автоматическое определение занятости приложения
Delphi World - это проект, являющийся сборником статей и малодокументированных возможностей  по программированию в среде Delphi. Здесь вы найдёте работы по следующим категориям: delphi, delfi, borland, bds, дельфи, делфи, дэльфи, дэлфи, programming, example, программирование, исходные коды, code, исходники, source, sources, сорцы, сорсы, soft, programs, программы, and, how, delphiworld, базы данных, графика, игры, интернет, сети, компоненты, классы, мультимедиа, ос, железо, программа, интерфейс, рабочий стол, синтаксис, технологии, файловая система...
Автоматическое определение занятости приложения

Оформил: DeeCo

Автор: Митронов Станислав

Компонент:
TBusyDetector V0.1b
Описание:
Компонент для автоматического определения занятости приложения с целью развлечь пользователя при выполнении тяжелых операций, приводящих к зависанию GUI (пользовательского интерфейса).
Интерфейс:
property Enabled: Boolean; вкл/выкл слежения
property Interval: Cardinal; интервал (в мсек) проверки занятости
property Caption: TCaption; заголовок окна
property Text: TCaption; текст окна

property Stated: Boolean;  вкл/выкл строки состояние
property State: TCaption; текст сотсояние

property Progressed: Boolean;  вкл/выкл полосу прогресса
property Min: Integer;
property Max: Integer;
property Position: Integer; позиция в полосе прогресса
property Step: Integer;

property OnGetWindowClass: TBusyWindowClassEvent; получение класса окна
property OnBusyDetect: TNotifyEvent; событие на обнаружения занятости
property OnIdleDetect: TNotifyEvent; конец занятости
Показания:
Delphi 3 и выше;
OS Win9X/WinNTX;
Руки2X;
Халява.
Комментарий:
Очень часто, особенно в связи с одно-потоковой архитектурой приложения в Delphi, требуется вставлять хоть какие то предупреждения для пользователя перед и в процессе выполнения тяжелых операций таких как подключения к базе, массовые математические вычисления и т.п. но так как на это нет времени да и не во все влезешь я взялся в своем проекте решить эту проблему "глобально". Компонент сырой, требует серьезной доработки (например, если компилить в режиме рантайм пакетов - то ресурсы с анимацией недоступны), так что жду критики, пожеланий и конкретных предложений по email.
Скачать компонент: BusyDetect.zip (15.7K)
Проект Delphi World © Выпуск 2002 - 2017
Автор проекта: Эксклюзивные курсы программирования