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

Форум по вопросам применения и программирования в Visio
Текущее время: 29 мар 2024, 16:21

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


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


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

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



Начать новую тему Ответить на тему  [ Сообщений: 16 ] 
Автор Сообщение
 Заголовок сообщения: Проставить углы
СообщениеДобавлено: 21 ноя 2009, 20:40 
Не в сети
Постоянный участник

Зарегистрирован: 07 сен 2009, 00:09
Сообщений: 62
Очков репутации: 20

Добавить очки репутацииУменьшить очки репутации
вот есть два-вектора прямых. между ними угол - чтобы его показать использую стандартный мастер Angle even. вот только вектора эти могут крутится как угодно - а угол между ними мне нужен всегда наименьший, который меньше 180. т.е всегда нужен угол 20 градусов, а не 340. 90, а не 270. как этого добится ?


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Проставить углы
СообщениеДобавлено: 21 ноя 2009, 21:23 
Не в сети
Content manager
Content manager
Аватара пользователя

Зарегистрирован: 02 окт 2009, 01:01
Сообщений: 5043
Откуда: оттуда
Использую Visio c: 1998
Отрасль: Интеграция системных интеграторов
Должность: Дизайнер по оформлению документации
Уровнь квалификации: Форматирование документов MS Word
bdfy писал(а):
вот только вектора эти могут крутится как угодно - а угол между ними мне нужен всегда наименьший, который меньше 180. т.е всегда нужен угол 20 градусов, а не 340. 90, а не 270. как этого добится ?


вектора должны исходить из одной и той же точки ? вот мое решение сделанное за 3 минуты ( во вложении)

1. Добавляем свойство user.mirror
2. В Scratch.B4 меняем формулу на
=IF(ANG360(ATAN2(Controls.Row_1.Y,Controls.Row_1))>180 deg,ANG360(ATAN2(Controls.Row_1.Y,Controls.Row_1))-180 deg+SETF"User.mirror",1),ANG360(ATAN2(Controls.Row_1.Y,Controls.Row_1))+SETF("User.mirror",0))
3. в FlipY пишем =GUARD(User.mirror)

Решение безусловно кривоватое: при углах в диапазоне 180 - 270 градусов, фигура будет моргать. также можно поворачивать полученную фигуру с помощью не controls, а зеленой точки (не знаю как она называется, см. скриншот)


Вложения:
Комментарий к файлу: скриншот
gp.png
gp.png [ 7.77 Кб | Просмотров: 7439 ]
Комментарий к файлу: модифицированный мастер angle_even
angle_even.rar [10.01 Кб]
Скачиваний: 369

_________________
База знаний ShapeSheet
Мой Youtube-канал @surrogate-tm
Мои трафареты
Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Проставить углы
СообщениеДобавлено: 22 ноя 2009, 05:02 
Не в сети
Постоянный участник

Зарегистрирован: 07 сен 2009, 00:09
Сообщений: 62
Очков репутации: 20

Добавить очки репутацииУменьшить очки репутации
Surrogate
интересный вариант. но чего то не хватает. ибо не работает как надо. угол показывает верный, но геометрически указатель угла находится не с той стороны фигуры. т.е не между векторами, а сбоку. в другую сторону отлаживает от одного из векторов


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Проставить углы
СообщениеДобавлено: 22 ноя 2009, 10:55 
Не в сети
Content manager
Content manager
Аватара пользователя

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

Если речь идет о текстовом поле, на котором написано значение угла между векторами - то все легко исправить: выделить мышью этот измеритель углов, щелкнуть правой кнопкой мыши, в выпавшем меню выбрать "Reset text position" (или как это будет в русской версии, см. верхний скриншот).

для управления положением измерителя угла можно пользоваться контрольными точками:
зеленая точка (на нижнем скриншоте обозначена Move endpoint) задает точку отсчета угла (это значение можно увидеть в окне Size&Position)
желтая точка (на нижнем скриншоте обозначена Change dimension angle) задает направление угла. Если истинный угол между векторами больше 180 градусов, то эта точка будет не совпадать с направлением. Отличаться будет на 180 градусов, управлять фигурой она будет как рычаг :)

Если я не ответил на вопрос прошу прислать скриншот с пояснением, что такое указатель угла


Вложения:
Комментарий к файлу: выпадающее меню фигуры
menu.png
menu.png [ 4.26 Кб | Просмотров: 7134 ]
Комментарий к файлу: точки управления положением фигуры
gp1.png
gp1.png [ 12.49 Кб | Просмотров: 444 ]

_________________
База знаний ShapeSheet
Мой Youtube-канал @surrogate-tm
Мои трафареты
Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Проставить углы
СообщениеДобавлено: 22 ноя 2009, 12:50 
Не в сети
Постоянный участник

Зарегистрирован: 07 сен 2009, 00:09
Сообщений: 62
Очков репутации: 20

Добавить очки репутацииУменьшить очки репутации
сделал все по инструкции. вот что получается. две ситуации - второй вектор выше первого (угол больше нуля), и ниже первого (меньше нуля). я хочу в обоих случаях положительный угол между ними. и чтобы указатель был тоже между векторами.
сейчас же значение стоит верное - но геометрически находится не там.

Изображение


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Проставить углы
СообщениеДобавлено: 22 ноя 2009, 13:07 
Не в сети
Content manager
Content manager
Аватара пользователя

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

Изображение

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


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Проставить углы
СообщениеДобавлено: 22 ноя 2009, 13:12 
Не в сети
Content manager
Content manager
Аватара пользователя

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

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


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

Зарегистрирован: 07 сен 2009, 00:09
Сообщений: 62
Очков репутации: 20

Добавить очки репутацииУменьшить очки репутации
Surrogate
хех. это понятно что руками можно поставить угол как угодно поменяв точки местами. НО
вектора эти все рисуются макросом и выводятся на печать - ручному труду там места нет, соответсвенно все изменения на чертеже хотелось бы чтобы происходили автоматом через мастеры. вот такое решение и ищу...


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Проставить углы
СообщениеДобавлено: 22 ноя 2009, 17:24 
Не в сети
Content manager
Content manager
Аватара пользователя

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

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

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


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Проставить углы
СообщениеДобавлено: 22 ноя 2009, 19:51 
Не в сети
Постоянный участник

Зарегистрирован: 07 сен 2009, 00:09
Сообщений: 62
Очков репутации: 20

Добавить очки репутацииУменьшить очки репутации
Код:
я давно читал на формумах посты о макросах которые чертят прямоугольники. сегодня узнал о макросах для векторов. люди добрые объясните мне темному, зачем и где это применяется ?

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

в принципе мастер то должен быть не больно мудренный : есть две точки или прямые отсчета угла - вот при углах больше 180 их надо менять местами. и все будет по идее отлично. но в хитросплетениях этого мастера я запутался - сам найти решение не могу ((


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Проставить углы
СообщениеДобавлено: 22 ноя 2009, 21:26 
Не в сети
Content manager
Content manager
Аватара пользователя

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

можно попробовать внедрить в твой макрос, блоки которые прорисуют дугу со стрелочками и посчитают величину угла. Для начала нужно только вспомнить курс тригонометрии :)
попытался по памяти вычислить угол между векторами. разница между моими расчетами и тем что показал этот мастер ~2 градуса ...

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


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

Зарегистрирован: 07 сен 2009, 00:09
Сообщений: 62
Очков репутации: 20

Добавить очки репутацииУменьшить очки репутации
Surrogate
ну считать то угол не надо - это исходные данные для построения вектора ) но неужели нельзя мастер подправить ? я все еще жду магического решения...


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Проставить углы
СообщениеДобавлено: 22 ноя 2009, 22:12 
Не в сети
Content manager
Content manager
Аватара пользователя

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

тем более даже в автокаде для определения угла нужно минимум 3 точки

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


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Проставить углы
СообщениеДобавлено: 23 ноя 2009, 00:12 
Не в сети
Постоянный участник

Зарегистрирован: 07 сен 2009, 00:09
Сообщений: 62
Очков репутации: 20

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


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Проставить углы
СообщениеДобавлено: 25 ноя 2009, 22:49 
Не в сети
Постоянный участник

Зарегистрирован: 07 сен 2009, 00:09
Сообщений: 62
Очков репутации: 20

Добавить очки репутацииУменьшить очки репутации
решено. буржуи помогли
http://visguy.com/vgforum/index.php?topic=1308.0


Пожаловаться на это сообщение
Вернуться к началу
 Профиль  
Ответить с цитатой  
 Заголовок сообщения: Re: Проставить углы
СообщениеДобавлено: 26 ноя 2009, 00:11 
Не в сети
Content manager
Content manager
Аватара пользователя

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

всего одну ячейку поменял и всё получилось :)

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


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

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



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

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


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

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