Создание наружной стены (по отношению к комнате) на плане дома

@Dukalys · Регистрация: 13.02.2012

Author24 — интернет-сервис помощи студентам

Добрый день уважаемые спецы, рассчитываю на вашу помощь.

Исходные данные:
Ms. Visio 2010
Документ типа "план дома" - прикладываю. пример.7z
Библиотека "Структурные элементы".

Цель:
Создать (автоматизированно) стену комнаты (элемента visio - "место") таким образом, чтобы стена эта расположилась снаружи комнаты, но никак не внутри неё, нарушая указанные внутренние размеры комнаты.

Последовательность действий:
Вызов контекстного меню на элементе "место" - "преобразовать в стены" - ОК.

Результат:
Стены ушли внутрь элемента "место", тем самым нарушили геометрию (размер) комнаты.

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

@Евгений С · 24.02.2016, 12:03

врятли выйдет... а если рисовать место больше на пол ширины стены?

@Dukalys · 24.02.2016, 12:08 **[ТС]**

Спасибо за мнение.

рисовать место больше на пол ширины стены?

Думал, но комнат много и они не прямоугольники. То есть по факту план состоит из прямоугольников, но они потом объединяются во всякие сложные фигуры - витьеватые коридоры и комнаты. Таким образом, в некоторые "места" закладывать размеры стен придётся, а в некоторые другие нет - просто свихнуться можно или сначала план переделывать под это дело

@Евгений С · 24.02.2016, 12:16

тут очень умные, но непомерно скромные, и даже самовыпиленные из этого форума, люди говорят, что раз эти соединения прописаны встроенным аддоном визио, то руки юзера бессильны против воли МС.
Вариантов 3:
-пилить свой коннектор
-сначала план переделать под это дело
-ручками

Трудозатраты оценивать не мне)

Добавлено через 1 минуту
та не... если свой коннектор, это всё равно начинать с начала придётся.
Либо переделывать, либо ручками.

@Dukalys · 24.02.2016, 12:26 **[ТС]**

Спасибо.
Видимо вариант с "лопатой" подойдёт больше, чем другие.

Fairuza · 24.02.2016, 12:46

Не по теме:

Сообщение от Евгений С

даже самовыпиленные из этого форума

привет большой им)))

@kukuruku310 · 01.03.2016, 15:16

Как костыль можно "перевернуть" стены хотя бы макросом
например, в пустом документе с выставленными размерами страницы, масштаба и прочего, в модуль ThisDocument пихаете такой код

Visual Basic

Option Explicit
 
Sub revers()
  Dim mainShape As Shape
  Dim sel As Selection
  Dim sp As Shape
  Dim ang#
 
  Set mainShape = Application.ActiveWindow.Selection(1)
  Set sel = mainShape.SpatialNeighbors(visSpatialOverlap, 0, 0)
  For Each sp In sel
    If InStr(1, sp.NameU, "Wall") > 0 Or InStr(1, sp.NameU, "wall") > 0 Then
      If sp.CellExistsU("Angle", 0) Then
        ang = Abs(sp.Cells("Angle").ResultIU)
        If ang < 0.7854 Or ang > 2.3562 Then
          sp.FlipHorizontal
        Else
          sp.FlipVertical
        End If
      End If
    End If
  Next
End Sub

потом сохраняете этот документ в виде шаблона
в Stencil'ах, на которые надо добавить действие, добавляете в ShapeSheet в секции Action строчку типа
=RUNADDON("ThisDocument.revers") - это в колонке Action, в столбике "меню" - как-нибудь обзовите, например, "Расширить"

после преобразования в стены (с сохранением исходного места) опять выбираете это место, правой кнопкой - Расширить

В результате обрамляющие стены Flip-нутся по горизонтали или вертикали и станут как Вам надо. Правда, при этом теряется их склейка между собой. Но, если это важно, то переделайте макрос, чтобы сначала "расширить" исходное место, а потом уже "остенивайте" его.

Вообще-то непонятно требование обрамлять именно внутренности "комнаты". А как потом соседнюю комнату пристыковываете? Если же оставить, как изначально мелкомягкими задумано, то, на мой взгляд, проще будет. А вообще-то этот MS AEC довольно глюкавый, особенно если чертеж достаточно сложный, а стенки не точно меж собой соединены. При простой попытке перетащить несколько объектов или просто группировать-разгруппировать, такое выдаст, что мама-не горюй. Я в свое время ради интереса даже рисовал взамен специальный Add-In для замены глюкавых стен, и, как ни странно, получилось довольно неплохенько. По крайней мере в нашем БТИ довольно успешно пользовали несколько лет (пока БТИ окончательно не помер).
Вот только работает он до Visio 2002. В последних версиях напридумывали всяких подписей-росписей-отпечатков пальцев. Да и заниматься этим уже как-то не тянет...

@Dukalys · 01.03.2016, 17:35 **[ТС]**

Большое спасибо, думаю будет полезной информацией не только для меня!

@Dukalys 1816 / 1030 / 285 Регистрация: 13.02.2012 Сообщений: 3,339
		1
	Создание наружной стены (по отношению к комнате) на плане дома 24.02.2016, 11:31. Показов 6821. Ответов 7 Метки нет (Все метки) Добрый день уважаемые спецы, рассчитываю на вашу помощь. Исходные данные: Ms. Visio 2010 Документ типа "план дома" - прикладываю. пример.7z Библиотека "Структурные элементы". Цель: Создать (автоматизированно) стену комнаты (элемента visio - "место") таким образом, чтобы стена эта расположилась снаружи комнаты, но никак не внутри неё, нарушая указанные внутренние размеры комнаты. Последовательность действий: Вызов контекстного меню на элементе "место" - "преобразовать в стены" - ОК. Результат: Стены ушли внутрь элемента "место", тем самым нарушили геометрию (размер) комнаты. Вариант чертить стены вручную, а также закладывать толщину в размеры "места"- не рассматриваются, ибо план большой и не совсем прямоугольный. 0

@Евгений С самый вменяемый тролль 564 / 52 / 8 Регистрация: 19.09.2012 Сообщений: 193
	24.02.2016, 12:03	2
	врятли выйдет... а если рисовать место больше на пол ширины стены? 1

@Dukalys 1816 / 1030 / 285 Регистрация: 13.02.2012 Сообщений: 3,339
	24.02.2016, 12:08 [ТС]	3
	Спасибо за мнение. рисовать место больше на пол ширины стены? Думал, но комнат много и они не прямоугольники. То есть по факту план состоит из прямоугольников, но они потом объединяются во всякие сложные фигуры - витьеватые коридоры и комнаты. Таким образом, в некоторые "места" закладывать размеры стен придётся, а в некоторые другие нет - просто свихнуться можно или сначала план переделывать под это дело 0

@Евгений С самый вменяемый тролль 564 / 52 / 8 Регистрация: 19.09.2012 Сообщений: 193
	24.02.2016, 12:16	4
	Сообщение было отмечено Dukalys как решение Решение тут очень умные, но непомерно скромные, и даже самовыпиленные из этого форума, люди говорят, что раз эти соединения прописаны встроенным аддоном визио, то руки юзера бессильны против воли МС. Вариантов 3: -пилить свой коннектор -сначала план переделать под это дело -ручками Трудозатраты оценивать не мне) Добавлено через 1 минуту та не... если свой коннектор, это всё равно начинать с начала придётся. Либо переделывать, либо ручками. 1

@Dukalys 1816 / 1030 / 285 Регистрация: 13.02.2012 Сообщений: 3,339
	24.02.2016, 12:26 [ТС]	5
	Спасибо. Видимо вариант с "лопатой" подойдёт больше, чем другие. 0

Fairuza
	24.02.2016, 12:46 #6
	Не по теме: Сообщение от Евгений С даже самовыпиленные из этого форума привет большой им))) 0

@Dukalys 1816 / 1030 / 285 Регистрация: 13.02.2012 Сообщений: 3,339
	01.03.2016, 17:35 [ТС]	8
	Большое спасибо, думаю будет полезной информацией не только для меня! 0

Опции темы

Создание наружной стены (по отношению к комнате) на плане дома

Решение