Author |
Topic |
|
newspalm
Russia
2 Posts |
Posted - 07/15/2003 : 10:08:41
|
Задача: есть мастер (прямоугольник), который имеет 10 Connection points с лева и 10 с права. Во время перетаскивания мастера на документ и перехода в шейп требуется убрать лишние Connection points (что бы они были не видны и не доступны пользователю). Количество лишних Connection points определяется программой по заданному алгоритму.
Вопрос: можно ли получить доступ к Connection points шейпа из VB и удалить ненужные точки?
Пытался найти ответ на этот вопрос в SDK, но решения не нашел. Может быть опыта совсем мало (еще недели не прошло как я начал работать с визио)
Пожалуйста, помогите советом.
Всего наилучшего, Максим |
|
Tumanov
Russia
1198 Posts |
Posted - 07/15/2003 : 12:46:42
|
В шейп-листе есть секция Connection Points. Для удаления Points нужно из этой секции удалить строку. Строка в общем случае удаляется примерно так: shpObj.DeleteRow visSectionFirstComponent + 0, visRowVertex + 3 Для секции Connection Points это будет выглядеть примерно так: shpObj.DeleteRow visSectionConnectionPts+0, visRowConnectionPts+2 В примере удалится точка № 3 (из расчета 0, 1, 2, 3...). Sub ttt() ActivePage.Shapes(1).DeleteRow visSectionConnectionPts + 0, visRowConnectionPts + 2 End Sub
|
|
|
newspalm
Russia
2 Posts |
Posted - 07/16/2003 : 14:17:52
|
Большое спасибо за помощь :)
Всего наилучшего, Максим |
|
|
|
Topic |
|
|
|