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

Первая картинка - логотип какой-то из Баухаусов, а остальное KorinnaBlackC в вариациях

исправьте ActiveSelection.Shapes.FindShapes(, cdrGuidelineShape).RemoveFromSelection

Бланки А5.cdr

а растр того и другого 3450 × 2300 и 2386 × 2656 в png не подойдет? ну или за небесплатно флаг отрисовать, уверен, не составит больших трудов

киррилический значит ... хм поищите к примеру Huxley /// вот не прямо оно - но похожее ... их несколько интерпретаций имеется

мне самому довольно долго его одного было достаточно

не скачивали триалку, случаем ? Что за версия там? Билд какой? :)

м.б. и путаете - скорее алгоритм

Появился ... доступен при выборе английского языка

Проверяйте ... zOsman3.gms оставил отдельным сборником - не стал соединять и воплощать ... по крайней мере пока :)

Описание исходного сборника тут. Из сборника удалены некоторые пункты и добавлена совместимость с версиями Х5-2017 х32/х64. Стоит добавить что, есть взаимное пересечение по функционалу с другим сборником wx_Tools того же автора wOxxOm, также представленного в файлообменнике

Нету. Создайте. И потом пользуйтесь.

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

уф ... собрал из двух османов одного ... кое-что придется предать забвению типа загрузить цветовой профиль "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 видимо решил выбросить там, сказать прямо, и без этого порядочно навалено всякого ... ну пусть ещё будет маленькая кучка вижу-вижу ... уже...