Установить флаг видимости для всех объектов с заданной меткой
procedure ObjectsVisibleByTag(aTag: integer; aValue: boolean);