Вообще программа — хорошая.
Только есть идея, как сделать её ещё лучше:
Переделать под хранитель экрана.
Я не люблю
screensaver'ы за то, что:
- они не «хранят» экран;
- они выскакивают в неподходящий момент;
- они «грузят» процессор.
(нужное подчеркнуть)
И всё же эту программу можно было бы так использовать (и потому что не нагружает процессор тоже). Тем более, что и переделывать почти ничего не надо. Самое главное обработку параметров запуска сделать:
- если параметр /s — «запуск» («на весь экран-поверх всего», любое действие прекращает работу);
- если параметр /p — отобразить предпросмотр (в меню «Свойства экрана» пункт «Заставка»)
- во всех остальных случаях изобразить меню «Настройки» (уже есть)
Подробности можно найти в любом подробном руководстве по
Delphi (например на
Delphi World есть
База Знаний по языку).
Пользы на «домашнем» компе никакой, зато на «общедоступных» терминалах (в магазинах) — всё таже реклама (уже на весь экран).
В остальном «ТАК ДЕРЖАТЬ!»