Как в Delphi установить атрибуты "СКРЫТЫЙ" на папку и все подпапки и файлы в ней?

Мне нужно чтобы выглядело так как на скриншоте, т. е. было "Скрытый" без возможности снять галку.
При этом все подпапки и файлы в ней тоже имели статус "СКРЫТЫЙ".
Как это сделать?

Заранее благодарна за ответ.