Запретить завершение программы на Delphi?

Да, я помню, делали мы так программу, да ещё запаролили. Windows не могла закрыться.

Александр Скуснов, расскажи про своё решение подробнее, пожалуйста.

Так xmoonlight же написал. Только сервисом делать не обязательно (мы это делали, т.к. легко было привязаться к запуску базы данных, у служб есть настройка зависимостей). Сама программа запускалась невидимой, только значок внизу справа. Опции: открыть окно, выйти по паролю.
В обработчике закрытия учитывалось введена команда закрытия через меню или по нажатию крестика (в последнем случае окно просто делалось невидимым)
Естественно, можно убить процесс через диспетчер задач.

Александр Скуснов, Windows по завершении работы посылает все 2 сообщения через очередь. Не помню как конкретно они называются. Первое, типа "сейчас будем выходить" ответом на него можно попросить систему подождать, если идет какая-то критическая операция. И второе, типа " все, выходим". Можно ловить эти сообщения и в OnCloseQuery отвечать True. Тогда все будет корректно закрываться.