Результаты поиска

уф ... собрал из двух османов одного ... кое-что придется предать забвению типа загрузить цветовой профиль "Silko" загрузить цветовой профиль "Swop2" загрузить палитру "Summer" по пути C:\Programm Files\CorelDRAW 12 //// CurveChannelMixer молодой как Буратино - без движков и красоты -...

ни-ни ... zz.rar\zzOsman2.gms /// другой, который не 2, я ещё не смотрел ... да-а ... там похоже винегрет с оливье под шубой :)

давайте проверим ... кривую незамкнутую и замкнутую сгруппируйте, скопируйте и снова сгруппируйте - будет 4 объекта, из них 2 незамкнутых запомните что вы вызываете из 12 Корела - название макроса и пункт в нём

можно выделить все-все-все незамкнутые, но ... перед этим надо или все группы разгруппировать или эти незамкнутые из этих групп "выдрать" ... что будет для вас лучше?

где же? If sh.Type = cdrCurveShape

там всего-то Sub selectOpenCurves() ' ================================================================================================= Dim sh As Shape, sr As New ShapeRange boostStart For Each sh In ActivePage.shapes If sh.Type = cdrCurveShape Then If Not sh.Curve.Closed Then...

так wx_Tools уже отредактирован - если прочтете описание его и zzOsmana - то увидите немало совпадений - надо будет просто его дополнить тем, что wOxxOm видимо решил выбросить там, сказать прямо, и без этого порядочно навалено всякого ... ну пусть ещё будет маленькая кучка вижу-вижу ... уже...

видимо у вас нечто другое чем тут выкладывайте, дружище, ваш экземпляр сюда зархивируйте и выкладывайте - ежели, конечно, вы не против ... проведем вивисекцию и получите нового франкештейна - zzOsman_wx_Tools - для вашего CD2017 ?

вот и я не найду ... даже не то, что в группе, а вовсе такого функционала макроса в имеющемся zzOsman нету ... точно zzOsman??? Может как иначе называлось?

zzOsman tools это же то, из чего wx_Tools появилось? Чего-то там такого нету ... может добавить? zzOsman tools где-то были ...

так и не надо - картинку нужно просто разлядеть - Macro Manager - Alt+Shift+F11 - пометить Visual Basic for Application - далее New - New Macro Project - дать название - Пум-пум-пурум-пум.gms. Потом - Alt+F11 - найти Пум-пум-пурум-пум.gms - И вставить код. И сохранить. И пользоваться, говоря...

все узлы сделать smoote или simmetrical ... зато похоже на тот зиг-заг - иммитация стежка\оверлога

с комбинированной кривой вроде тоже работает ...

Х6 нет под рукой - не знаю есть ли там это ... но вот в Х7 уже есть инструмент по F10 Roughen Tools - это оне - зиги и заги попробуйте

не-не ... всё верно - пост 21!

этот друг тоже умеет

макрос не вроде

Понял. Отстал.

видно, что процесс отлажен, оптимизирован и лаконичен но вопрос пляшет на языке минуя всё, что промеж сразу делать в Corel и кореловским же принтмерджем из Excel украсить - Нельзя?

c vba дружите? код макроса открыт в форме frmFileConvertor найдите For i = Application.VersionMajor To 14 Step -1 и исправьте на 12 Х7 сам по себе способен до 11 версии понижать