All Forums
 Категория Visio
 Форум Вопросы и ответы
 EventDblClick
Author Previous Topic Topic Next Topic  

Roman

3 Posts
Posted - 09/01/2003 :  13:13:38
Нужно сделать так, чтобы один из объектов группы исчезал и появлялся по двойному клику. Расскажите как.

Digitall

Russia
389 Posts
Posted - 09/01/2003 :  13:52:41  Visit Digitall's Homepage
Зайдите в ТаблицуФигур группы и вставьте раздел Другие свойства.
В ТаблицеФигур группы укажите следующие параметры:
EventDblClick =IF(Prop.Row_1.Prompt=1;SETF(GetRef(Prop.Row_1.Prompt);0);SETF(GetRef(Prop.Row_1.Prompt);1))
И в фигуре которая должна исчезнуть:
Geometry1.NoShow =Sheet.ID!Prop.Row_1.Prompt
где ID номер группы. Теперь при двойном нажатии эта фигура(ы) будет "исчезать" и "появляться".
Go to Top of Page

Digitall

Russia
389 Posts
Posted - 09/02/2003 :  12:12:59  Visit Digitall's Homepage
Можно еще вот как поступить, если требуется убирать из группы группу.
1) Создать группу. (как элемент будущей группы)
2) Скопировать в буфер.
3) Сделать специальную вставку Edit>Paste Special...
4) С этим новым элементом создать группу.
5) Зайдите в ТаблицуФигур группы и вставьте раздел Другие свойства.
В ТаблицеФигур группы укажите следующие параметры:
EventDblClick =IF(Prop.Row_1.Prompt=1;SETF(GetRef(Prop.Row_1.Prompt);0);SETF(GetRef(Prop.Row_1.Prompt);1))
И в группе которая должна исчезнуть:
ImgWidth =Width*Sheet.ID!Prop.Row_1.Prompt
ImgHeight =Height*Sheet.ID!Prop.Row_1.Prompt
где ID номер группы. Теперь при двойном нажатии эта группа(ы) будет "исчезать" и "появляться".
Go to Top of Page

Roman

3 Posts
Posted - 09/02/2003 :  12:39:14
На строку IF(Prop.Row_1.Prompt=1;SETF(GetRef(Prop.Row_1.Prompt);0);SETF(GetRef(Prop.Row_1.Prompt);1))
В поле EventDblClick я получаю сообщение "Error in formula"/В справке 5-го Визио я не могу найти GetRef. Что это?
Go to Top of Page

Roman

3 Posts
Posted - 09/02/2003 :  13:10:28
В общем задача решилась так.
EventDblClick=IF(Prop.Row_1.Prompt=1;SETF("Prop.Row_1.Prompt";"0");SETF("Prop.Row_1.Prompt";"1"))
в общей группе.
В группе которая исчезает
Width=Sheet.ID!Width*1*Sheet.ID!Prop.Row_1.Prompt
Height=Sheet.ID!Height*0,7703*Sheet.ID!Prop.Row_1.Prompt

Появилась другая проблема.
В 5-ом Визио эта штука работает отменно. При открытии в 2002. Несмотря на то, что элементы сгруппированы из группы можно спойно мышкой вытащить объект. Его контрольные точки при этом в виде зеленого квадрата с крестиком. Что делать, чтобы и в 2002 это работало.
Go to Top of Page

Digitall

Russia
389 Posts
Posted - 09/02/2003 :  13:38:12  Visit Digitall's Homepage
quote:
Originally posted by Roman

На строку IF(Prop.Row_1.Prompt=1;SETF(GetRef(Prop.Row_1.Prompt);0);SETF(GetRef(Prop.Row_1.Prompt);1))
В поле EventDblClick я получаю сообщение "Error in formula"/В справке 5-го Визио я не могу найти GetRef. Что это?

Измените =IF(Prop.Row_1.Prompt=1;SETF(GetRef(Prop.Row_1.Prompt);0);SETF(GetRef(Prop.Row_1.Prompt);1))
на
=IF(Prop.Row_1.Prompt=1;SETF("Prop.Row_1.Prompt";0);SETF("Prop.Row_1.Prompt";1))
Go to Top of Page

Digitall

Russia
389 Posts
Posted - 09/03/2003 :  09:00:39  Visit Digitall's Homepage
quote:
Originally posted by Roman

В общем задача решилась так.
EventDblClick=IF(Prop.Row_1.Prompt=1;SETF("Prop.Row_1.Prompt";"0");SETF("Prop.Row_1.Prompt";"1"))
в общей группе.
В группе которая исчезает
Width=Sheet.ID!Width*1*Sheet.ID!Prop.Row_1.Prompt
Height=Sheet.ID!Height*0,7703*Sheet.ID!Prop.Row_1.Prompt

Появилась другая проблема.
В 5-ом Визио эта штука работает отменно. При открытии в 2002. Несмотря на то, что элементы сгруппированы из группы можно спойно мышкой вытащить объект. Его контрольные точки при этом в виде зеленого квадрата с крестиком. Что делать, чтобы и в 2002 это работало.

Выполнить одно из след. действий в Visio 2002.(хотя тоже самое может работать и в Visio 5)
1) Выбрать группу и в меню выбрать Format>Behavior и в разделе Group properties выбрать Selction: Group Only
2) Выбрать группу и в меню ShapeSheet группы в разделе Group properties в ячейке Select Mode выставить "0".
Go to Top of Page
  Previous Topic Topic Next Topic  
Данный сайт является архивом форума visio.artberg.ru, который был закрыт в связи с переходом на новую платформу visio.getbb.ru
Все материалы доступны только для чтения! Если у вас появились вопросы, или вы хотите что-то обсудить, связанное с Visio, обращайтесь на новый форум!
Архив был создан благодаря совместным усилиям Генадия Туманова @Tumanov (visio.artberg.ru), Александра ака @Surrogate (visio.getbb.ru), и Николая Белых @nbelyh (unmanagedvisio.com)