Просматривают:
CorelDRAW , макрос |
||
|
||
---|---|---|
![]() Пользователь 2 уровня
![]() Присоединился:
2008/2/4 10:01 Откуда Москва
Сообщений: 49
![]() |
Всем приветики.
Хотел написать Макрос , который бы обрабатывал только те объекты, которые выбраны пользователем и в том же порядке. 1. Есть открытый документ CorelDraw с кучей разных объектов. 2. Пользователь выделяет (selection) объекты нажимает кнопку "запомнить". 3. Выделенному (selection) присваевается порядковый номер(?) заноситься в список или массив(?) или..... 4. Потом согласно сформированого списка выпоняется обработка selections. ps: есть форма, две кнопки ("запомнить", "обработать" ![]() Кто силен помогите, или подскажите ![]() есть подобный макрос (SelectionManager) по сохранению селекций, но как автор реализовал непонятно
Опубликовано: 2008/2/4 10:24
|
|
|
Re: CorelDRAW , макрос |
|
---|---|---|
![]() Новичок
![]() Присоединился:
2008/1/15 10:05 Откуда Челябинск
Сообщений: 20
![]() |
Цитата:
GoodvinVV wrote: Если не сильно отвлеку, но как это сделать? (я с VBA только пару дней Если пару дней - то в первую очередь смотреть help по VBA для Corel (для 11-го - DRAW11VBA.HLP, для Х3 - draw_vba.chm). Там много описано, есть примеры.
Опубликовано: 2008/2/4 14:56
|
|
|
Re: CorelDRAW , макрос |
|
---|---|---|
![]() Пользователь 2 уровня
![]() Присоединился:
2008/2/4 10:01 Откуда Москва
Сообщений: 49
![]() |
Примеры то есть да все как то не то
нет примера присвоить селекции уникальный номер, чтобу потом найти ее по этому номеру ![]()
Опубликовано: 2008/2/4 15:08
|
|
|
Re: CorelDRAW , макрос |
|
---|---|---|
![]() Пользователь 2 уровня
![]() Присоединился:
2008/2/4 10:01 Откуда Москва
Сообщений: 49
![]() |
так... чтобы понять чего собственно хотел Я "изобрести свой велик"
![]()
Опубликовано: 2008/2/4 15:10
|
|
|
Re: CorelDRAW , макрос |
|
---|---|---|
![]() Новичок
![]() Присоединился:
2008/1/15 10:05 Откуда Челябинск
Сообщений: 20
![]() |
Цитата:
GoodvinVV wrote: Примеры то есть да все как то не то Всё там есть - ищи и пробуй. Сам. Для твоего случая может подойти: Dim s1 As Shape Dim s2 As Shape ' Задаём имя выделенного объёкта: Set s1 = ActiveSelection.Shapes(1) s1.Name = "MamaMylaRamu" ' Тут сам пиши, что нужно - добавление в список, перебор и пр., и пр. ' [...] ' Поиск по имени объекта: For Each s2 In ActiveLayer.Shapes.FindShapes("MamaMylaRamu") MsgBox "Я MamaMylaRamu", vbInformation, " Пример" Next Доводи до ума сам, исходя из задачи.
Опубликовано: 2008/2/4 15:51
|
|
|
Re: CorelDRAW , макрос |
|
---|---|---|
![]() Новичок
![]() Присоединился:
2007/4/5 10:45 Откуда Московская обл.
Сообщений: 20
![]() |
Цитата:
А если селекцию в группу, и назвать как удобно, можно с числами на конце. Dim OrigSelection As ShapeRange Set OrigSelection = ActiveSelectionRange Dim s1 As Shape Set s1 = OrigSelection.Group Dim nameLogo, mystr nameLogo = s1.name s1.name = "Logo" Потом по названию разыскать, разгруппировать и обработать.
Опубликовано: 2008/2/4 15:52
|
|
|
Re: CorelDRAW , макрос |
|
---|---|---|
![]() Пользователь 2 уровня
![]() Присоединился:
2008/2/4 10:01 Откуда Москва
Сообщений: 49
![]() |
![]() ![]() завтра отпишу как прошло....
Опубликовано: 2008/2/4 16:03
Edited by GoodvinVV on 04/02/2008 18:57:05
Edited by GoodvinVV on 05/02/2008 0:05:50 |
|
|
|
Re: CorelDRAW , макрос |
|
---|---|---|
![]() Пользователь 2 уровня
![]() Присоединился:
2008/2/4 10:01 Откуда Москва
Сообщений: 49
![]() |
Да теперь что-то получаеться
![]() Спасибо Sanchos! ![]() Спасибо Ander_OS! ![]() Спасибо magnus_z! ![]()
Опубликовано: 2008/2/5 0:03
|
|
|
Re: CorelDRAW , макрос |
|
---|---|---|
![]() Пользователь 2 уровня
![]() Присоединился:
2008/2/4 10:01 Откуда Москва
Сообщений: 49
![]() |
Считаю тему закрытой!
Однако как работать с группой (не группируя выделенные объекты) пока не ясно ![]()
Опубликовано: 2008/2/5 20:44
|
|
|
Re: CorelDRAW , макрос |
|
---|---|---|
![]() Новичок
![]() Присоединился:
2007/4/5 10:45 Откуда Московская обл.
Сообщений: 20
![]() |
Вопрос? Что нужно сделать в группе? Перебираешь элементы по очереди и делаешь что хочешь.
Опубликовано: 2008/2/6 11:03
|
|
|
Re: CorelDRAW , макрос |
|
---|---|---|
![]() Пользователь 2 уровня
![]() Присоединился:
2008/2/4 10:01 Откуда Москва
Сообщений: 49
![]() |
Группировать нельзя! объекты могут находиться на разных слоях и при групировке падают на один слой и могут поменять свой порядок, что кретично
![]()
Опубликовано: 2008/2/6 12:45
|
|