Установить флаг видимости для всех объектов с заданным идентификатором стиля
procedure ObjectsVisibleByStyleId(aStyleId: Int64; aValue: Boolean);