Подпись: В помощь проектировщику!
Подпись:                  Макросы для CorelDRAW
Подпись: SmartMacros
Подпись: Metal List
Подпись: Otdelka
Подпись: TextCalc
Подпись: GetAreaText
Подпись: LevelMark

Otdelka

Авторские права на  макрос принадлежат  (С) Антон Порозов 2004

Для 10 и 12 версии CorelDRAW.

Макрос предназначен для подсчета площади стен помещения с учетом оконных и дверных проемов.

Особенно полезен для архитекторов, сметчиков или инженеров-строителей, которые по долгу службы составляют ведомости / спецификации отделки помещений.

Условия для работы макросов и описание инсталляции см. на главной странице сайта.

UserFormПлан этажа

Как пользоваться

 

У Вас есть план этажа, желательно с марками окон и дверей, либо Вы помните их размеры наизусть :) Обведите границы каждого помещения кривыми (если они прямоугольны, прямоугольники будут преобразованы в кривые). Выделите границу одного помещения, запустите макрос, введите требуемые переменные, жмите "Подсчет" - получите искомую площадь, доступную для копирования в буфер обмена.

Не закрывая диалоговое окно, можете выделить границу следующего помещения. Значения высоты помещения, окон и дверей, у Вас, скорее всего, остаются теми же, меняете остальное, нажимаете "Подсчет" и т.д.

Ограничения: предполагается, что в помещении все окна одинаковой высоты, все двери одинаковой высоты, и высота помещения во всех его частях одинакова. Согласитесь, в проектной практике именно так чаще всего и бывает.

Макрос учитывает возможность раздельного подсчета верха и низа стен и перегородок (если, например, в ванной комнате отделка нижней части стен – плитка, а верхней – окраска). Для этого нажмите кнопку «С учетом панели».

Также макрос позволяет суммировать площади под отделку в нескольких помещениях.

Если экономия пространства на мониторе для Вас не пустой звук, то можно пользоваться сокращенной формой диалогового окна - без учета верха и низа стен и перегородок, когда не требуется их раздельный подсчет.

Кроме того, Вы в любое время можете скрыть диалоговое окно (без потери исходных и расчетных переменных), воспользовавшись одноименной кнопкой.

UserFormBrief

Ваши пожелания и замечания можно отправить сюда.

Хостинг от uCoz