Функции NewWriteFileStream, NewReadFileStream в компонентах заменить на NewFileStream с указанием необходимых атрибутов. Также задавать атрибуты, если FileCreate вызывается из кода компонентов.