Выкладываю компонент WaitProgress на всеобщее обозрение.
Это порт моего компонента из Lazarus'а под Блэкбокс.
Так сказать, "тренировка на кошке" и апробация возможностей "черного ящика".
Поэтому просьба сильно не бить.

Представляет собой круговой прогресс-бар, имитирующий в FireFox'е, который появляется в правой верхней части браузера при загрузке страниц(ы).
Основное предназначение - ожидание пользователя при длительном выполнении расчетов (запросов), когда время завершения расчетов - неопределено.

Есть окно свойств (начальный и конечный цвета, вид и количество фигур (круг, квадрат), таймер).
В отличие от оригинального, компонент частично недоделан (но вполне работоспособный),
в нем отутствуют методы Start, Pause, Stop, свойство InActiveColor (неактивный цвет) -
потому что они должны быть связаны с интерактором, при обработке стадартного окна свойств StdProp.

При написании кода я отталкивался от StdHeader.

Приму замечания и пожелания.

PS. Использовался BB 1.6