Форум пользователей Visio

Форум по вопросам применения и программирования в Visio
Текущее время: 28 мар 2024, 23:32

Часовой пояс: UTC + 3 часа [ Летнее время ]


Правила форума


При размещении файлов предпочтительным является формат vsd (а не vsdx/vsdm)
Размещая ваши вложения на форуме не используйте имена файлов содержащих кириллицу, в противном случае файл будет иметь имя .<расширение файла> !

Для форматирования ваших сообщений используйте BBCodes, описание используемых на форуме BBCodes.



Начать новую тему Ответить на тему  [ Сообщений: 29 ]  На страницу Пред.  1, 2
Автор Сообщение
 Заголовок сообщения: Re: Вопросы по отдельным свойствам Connects
СообщениеДобавлено: 16 июн 2017, 17:52 
Не в сети
Administrator

Зарегистрирован: 30 авг 2009, 11:02
Сообщений: 2253
Очков репутации: 100626

Добавить очки репутацииУменьшить очки репутации
Цитата:
По сути вы предлагаете все изучать наугад...

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


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Вопросы по отдельным свойствам Connects
СообщениеДобавлено: 16 июн 2017, 19:44 
Не в сети
Content manager
Content manager
Аватара пользователя

Зарегистрирован: 02 окт 2009, 01:01
Сообщений: 5043
Откуда: оттуда
Использую Visio c: 1998
Отрасль: Интеграция системных интеграторов
Должность: Дизайнер по оформлению документации
Уровнь квалификации: Форматирование документов MS Word
nbelyh писал(а):
Пока только трудяга Shishok туда что-то полезное запостил
Shishok, respect!

_________________
База знаний ShapeSheet
Мой Youtube-канал @surrogate-tm
Мои трафареты


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Вопросы по отдельным свойствам Connects
СообщениеДобавлено: 16 июн 2017, 22:34 
Не в сети
Ветеран

Зарегистрирован: 30 июл 2014, 14:28
Сообщений: 534
Использую Visio c: 2008
Очков репутации: 107

Добавить очки репутацииУменьшить очки репутации
Кстати имя точки соединений к которой подключен коннектор можно еще проще получить:
Код:
Sub Example() ' к каким шейпам и точкам подключен коннектор

' должен быть выделен коннектор с подключенными на концах шейпами(шейпы должны иметь именованные точки соединений)
Dim vsoShape As Visio.Shape

Set vsoShape = ActiveWindow.Selection.PrimaryItem

With vsoShape.Connects(1)
    MsgBox "Начало линии подключено к шейпу: " & .ToSheet.Name  & vbNewLine &  "к точке:  " & .ToCell.RowName
End With

With vsoShape.Connects(2)
    MsgBox "Конец линии подключен к шейпу: " & .ToSheet.Name  & vbNewLine &  "к точке:  " & .ToCell.RowName
End With

End Sub

_________________
GitHub
Yandex-диск с набором полезных утилит


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Вопросы по отдельным свойствам Connects
СообщениеДобавлено: 17 июн 2017, 09:15 
Не в сети
Ветеран

Зарегистрирован: 30 июл 2014, 14:28
Сообщений: 534
Использую Visio c: 2008
Очков репутации: 107

Добавить очки репутацииУменьшить очки репутации
Вот еще интересный пример кода:
Код:
Sub Example()
' этот пример определяет:
' к какому месту искомого шейпа существует подключение
' а также что и каким местом подключено к искомому шейпу

' на листе:
' должен быть выделен шейп с подключенными коннекторами(входящими и/или исходящими, но не менее 1)
' шейп должен иметь именованные точки соединений

' этот макрос не учитывает подключениия шейпов подключенных к искомому напрямую, без коннекторов.

Dim vsoShape As Visio.Shape
Dim txt As String, txt1 As String, i As Integer

Set vsoShape = ActiveWindow.Selection.PrimaryItem

If vsoShape.FromConnects.Count = 0 Then
    MsgBox "У шейпа " & vsoShape.Name & " нет подключений."
    Exit Sub
End If

txt = "У шейпа " & vsoShape.Name & " есть подключение к точке: "
txt1 = "К этой точке подключено: "

For i = 1 To vsoShape.FromConnects.Count
    With vsoShape.FromConnects(i)
        Debug.Print txt & .ToCell.RowName
        Debug.Print txt1 & .FromSheet.Name & " из точки:  " & .FromCell.Name & vbNewLine
    End With
Next

End Sub

_________________
GitHub
Yandex-диск с набором полезных утилит


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Вопросы по отдельным свойствам Connects
СообщениеДобавлено: 20 июн 2017, 13:45 
Не в сети
Просто PowerCat
Аватара пользователя

Зарегистрирован: 16 фев 2016, 10:11
Сообщений: 282
Использую Visio c: 2000
Очков репутации: 2

Добавить очки репутацииУменьшить очки репутации
Делаю 2 прямоугольных шейпа, цепляю к каждому из них точку соединения, делаю эти точки внутрь/наружу, сцепляю эти 2 шейпа.
Смотрю, сколько объектов вернет Connects.Count. У того шейпа, который цепляется, возвращается почему-то 2 объекта. Вопрос - почему?


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Вопросы по отдельным свойствам Connects
СообщениеДобавлено: 20 июн 2017, 14:00 
Не в сети
Ветеран
Аватара пользователя

Зарегистрирован: 28 апр 2013, 14:03
Сообщений: 963
Откуда: Вена, Австрия
Использую Visio c: 1998
Очков репутации: 100614

Добавить очки репутацииУменьшить очки репутации
Потому что Connects - это не точки соединения. Это связи между ячейками. Достаточно низкоуровневая вещь.
То есть, они определяют если ты двигаешь один шейп, то какие ячейки во втором нужно обновить и как.

Для твоего случая - это PinX и Angle (позиция и поворот)

_________________
Полезные инструменты для создания диаграмм Visio:
https://unmanagedvisio.com/


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Вопросы по отдельным свойствам Connects
СообщениеДобавлено: 20 июн 2017, 14:15 
Не в сети
Просто PowerCat
Аватара пользователя

Зарегистрирован: 16 фев 2016, 10:11
Сообщений: 282
Использую Visio c: 2000
Очков репутации: 2

Добавить очки репутацииУменьшить очки репутации
nbelyh писал(а):
Потому что Connects - это не точки соединения. Это связи между ячейками. Достаточно низкоуровневая вещь.
То есть, они определяют если ты двигаешь один шейп, то какие ячейки во втором нужно обновить и как.

Для твоего случая - это PinX и Angle (позиция и поворот)
Я понимаю, что Коннект - это объект, а не точка.
Вопрос - почему тогда при соединении коннектором возвращается 1?


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Вопросы по отдельным свойствам Connects
СообщениеДобавлено: 20 июн 2017, 15:44 
Не в сети
Ветеран
Аватара пользователя

Зарегистрирован: 28 апр 2013, 14:03
Сообщений: 963
Откуда: Вена, Австрия
Использую Visio c: 1998
Очков репутации: 100614

Добавить очки репутацииУменьшить очки репутации
powercat писал(а):
nbelyh писал(а):
Потому что Connects - это не точки соединения. Это связи между ячейками. Достаточно низкоуровневая вещь.
То есть, они определяют если ты двигаешь один шейп, то какие ячейки во втором нужно обновить и как.

Для твоего случая - это PinX и Angle (позиция и поворот)
Я понимаю, что Коннект - это объект, а не точка.
Вопрос - почему тогда при соединении коннектором возвращается 1?


Потому что в этом случае одна зависимость - Pin (точка соединения), а Angle (угла) нету.
В смысле, если вращать шейп, коннектор не поворачивается (не меняет угол), в отличие от приклеенного шейпа.
А вообще это IMHO лучше уже у разработчиков Visio спрашивать :)

_________________
Полезные инструменты для создания диаграмм Visio:
https://unmanagedvisio.com/


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Вопросы по отдельным свойствам Connects
СообщениеДобавлено: 20 июн 2017, 18:18 
Не в сети
Просто PowerCat
Аватара пользователя

Зарегистрирован: 16 фев 2016, 10:11
Сообщений: 282
Использую Visio c: 2000
Очков репутации: 2

Добавить очки репутацииУменьшить очки репутации
Благодарю
Дополнено позднее: последующие сообщения отделены от данной ветки, как не имеющая отношение к теме. сообщения перенесены в ветку Ввод данных в окне ShapeData


Последний раз редактировалось Surrogate 27 июн 2017, 12:31, всего редактировалось 2 раз(а).
добавлена ссылка на отделенное сообщение


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
Показать сообщения за:  Поле сортировки  
Начать новую тему Ответить на тему  [ Сообщений: 29 ]  На страницу Пред.  1, 2

Часовой пояс: UTC + 3 часа [ Летнее время ]



Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 8


Вы можете начинать темы
Вы можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения

Найти:
Перейти:  
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
Вы можете создать форум бесплатно PHPBB3 на Getbb.Ru, Также возможно сделать готовый форум PHPBB2 на Mybb2.ru
Русская поддержка phpBB