Как сохранять фигуры?

Статус
Закрыто для дальнейших ответов.

Маська

Участник
Топикстартер
Сообщения
148
Реакции
0
Долго думала, куда - в фотошопный тред или сюда, решила сюда.
Тут дело такое - иногда надо красивые линии и фигуры, нарисованые в кореле, пихать в фотошоп. Можно рисовать и там, но там я плохо умею. Иллюстратор вообще пока не предлагайте! Как делаю я - фигуры с черной заливкой - экспорт в епс, там по умолчанию, ну или разрешение добавляю иногда. А в фотошопе, соответственно, импорт. Но там получается как-то размыто. Я чувствую, что можно сделать лучше! Один раз я что-то быстро делала, и как-то сохранила, но это было в такой запарке, что я ничего не помню (только не смейтесь! Правда бывает такое!) так фот, как то я сохранила, что были очень гладкие края у моих фигур. Как этого добиться? Идеально было бы вообще импортировать в Фотошоп вектора - но как это делать? :-)
 
Ответ: Как сохранять фигуры?

>Иллюстратор вообще пока не предлагайте!
А почему? - если использовать для начала (пока не научишся:)) только для вставки - то никаких проблем. Гдето здесь CMYK давал ссылку на скрипт, который копирует любой объект из Корела в Илл. А потом из Иллюстратора просто через Ctrl+C, Ctrl+V вставлять в Шоп

Ну, или, делай как раньше - вставляй через EPS черную фигуру, делай выделение по ColorRange и преобразовывай выделение в путь
 
Ответ: Как сохранять фигуры?

http://www.oberonplace.com/vba/drawmacros/aiclipboard/index.htm

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

Еще момент. Поставьте Corel PhotoPaint. Он умеет сохранять psd файлы с путями. Внимание. У Пэинта есть фитча, которую можно в некоторых случаях считать багом: он выравнивает кривую по сетке пикселов документа. Поэтому, если вы попробуете через него получить вектор сделанный в Кореле в Шоп, и в кривых будет много узлов часто распложенных узлов, то вместо плавной кривой вы получите слегка помятую кривую.

Что касается епс-ов: вы их не открывайте в Шопе, а просто помещайте в тот документ, который у вас рабочий. Важно: создании формы в Кореле задавайте размер документа в точности совпадающий с размером документа в Шопе, а в свойствах экспорта в епс, в разделе Advanced > Boundng Box , выберите Page. Это позволит помещать в документ в Шопе форму из епс-а в точно то место, которое ей соответствовало в Кореле. Чтобы поместить, команда File > Place.

Если же открываете, то следите за разрешением, и за antialiasing'ом.
 
Ответ: Как сохранять фигуры?

черной заливкой - экспорт в епс, там по умолчанию, ну или разрешение добавляю иногда.

Где вы добавляете разрешения при экспорте в епс? В Image Header'е что ли?
 
Ответ: Как сохранять фигуры?

Burn сказал(а):
>
Ну, или, делай как раньше - вставляй через EPS черную фигуру, делай выделение по ColorRange и преобразовывай выделение в путь
Опа, а я не знала, что можно преобразовывать выделение в путь:-)
Надеюсь, это легко найти. Буду пробовать, спасибо.
 
Ответ: Как сохранять фигуры?

Если не захотите ковыряться с каким-то диалогами и прочей фигней которую Вакуленка добавил в продукт, я могу вам скинуть упрощенную, но также работающую версию
Была бы признательна. maskuns@mail.ru

Еще момент. Поставьте Corel PhotoPaint. Он умеет сохранять psd файлы с путями.
Тоже спасибо, попробую и так. А насчет фичи мне беспокоиться нечего - у меня мания делать как можно меньше точек на кривой :-)

еще всякие полезные советы
Все попробую, спасибо большое. Если что, буду задавать вопросы, только позже:-)
 
Ответ: Как сохранять фигуры?

-=CMYK=- сказал(а):
Где вы добавляете разрешения при экспорте в епс? В Image Header'е что ли?
Когда в кореле нажимаешь экспортнуть в епс и ок, выплывает окно, там резолюшн выставляю на 300 обычно.
 
Ответ: Как сохранять фигуры?

Интересно, а как делают все остальные, не такие чайники как я, если вдруг нужно скинуть некий сложный вектор в шоп?
 
Ответ: Как сохранять фигуры?

В архиве, в аттаче файл QuickPaths.gms , его положите в папку C:\Program Files\Corel\Corel Graphics 11\Draw\GMS , запустите Корел и в меню Tool > Visual Basic > Play (Если у вас не установлен ВижуалБасик фор Апликэйшн то этого меню не будет - придется установить) найдите в диалоге после слова UsefulWorks следующие скрипты:

SelectSubpaths - выделяете один узел на полигоне (полигонах) и скрипт выделяет все остальные узлы на нем (на них)

CurvesToPsd - используется Фотопэинт. Если Фотопэинт не установлен, нужно или установить его, или удалить ссылку на его объектную библиотеку из Tool > References > Corel PHOTO Paint 11.0 Type Library. Иначе ничем из данного gms вы пользоваться не сможете - будет сообщение об ошибке.

Работает эта байда так: Текущий документ должен быть сохранен куда-то. Выделяете нужные объекты (кривые), запускате, после всех операций скрипт их сохраняет как пути в файле Фотошопа с именем shapes.psd в том же самом каталоге где располагается активный документ Корела. Игнорируются все типы объектов кроме curves: группы, символы, текст, поверклипы и так далее. После успешного выполнения вы получаете сообщение о том, куда shapes.psd записан. Размер документа shapes.psd будет в точности соответствовать размеру документа в Кореле. Разрешение 300 дпи, режим - ЦМИК. Поэтому действуйте грамотно - не рисуйте на А3, если вы делаете макет 15 на 20 см.

Есть косячок который я решил не устранять - в файле shapes.psd все пути почему-то смещаются на некоторое расстояние влево и вниз. Отчего это я не понял. Но мне это не важно, поэтому я не стал ничего вымерять и проверять. Если вам важно - я могу исправить. Но взаимное расположение путей не изменяется ничуть.

Этот способ очень удобен, потому что можно очень быстро закинуть в Шоп массу кривых. Ну и как я уже упоминал - Фотопэинт выравнивает кривые (узлы) по сетке пикелов.

Я делаю так: открываю этот shapes.psd и создаю в нем сет, в сете создаю shape layers'ы: выбираете нужный путь в палитре путей, нажимаете Alt и кнопку на палитре слоев Create New Fill or Adjustment Layer - не отпуская альта выбираете тип слоя, например Solid Color, и в появившемся диалоге (для этого давили Альт) вписываете имя слоя и Ок. Не надо маскировать обычные слои векторными путями если нет в этих слоях никакого фотографического изображения - используйте shape layer'ы, включая настроечные.

После того как все пути забраны в векторные маски слоев я этот сет перетаскиваю в рабочий документ, и там уже дизайню далее. Шопом.

CopySelectionAsAI - Копирует выбранные объект в буфер обмена в формате Иллюстратора. Текст преобразуется в кривые.

PasteAIFormat - Преобразует данные в буфере в формат Корела и позволяет вставлять в Корел то, что было скопировано в Иле (Не в Шопе!)

Это кусок от большого gms'а и поэтому я сохранил несколько функций которые по теме и могли бы быть полезные. За исключением упомянутых скриптов от Вакуленки (которые он написал с моей подачи) все остальное моих рук дело, и если что-то не работает то сообщайте мне.

Шорт-каты: Для копирования путей через Фотопэинт я назначил Ctrl+Alt+C, для копирования в формате Иля - Ctrl+Shift+C, для вставки из Иля - Ctrl+Shift+V. Для примера.
 

Вложения

Ответ: Как сохранять фигуры?

Burn сказал(а):
Ну, или, делай как раньше - вставляй через EPS черную фигуру, делай выделение по ColorRange и преобразовывай выделение в путь

За издевательство над здравым смыслом расстрел по пятницам через повешание по средам.

Какой нафик каларенж? Епс же со свой собственной прозрачностью растеризуется. Если вы плейсанули форму из епса - контрол-клик на слое и вот вам селекция по форме. В принципе, можете преобразовать в путь, но мелкие детали могут пропасть. Навсегда. Или растеризовать епс на 2400 дпи, и там попробовать - может помочь с получением вектора из растра, который только что был растеризован.
 
Ответ: Как сохранять фигуры?

Огромное вам спасибо, CMYK!
 
Ответ: Как сохранять фигуры?

Незнаю, может я самый "умный", но... Короче, ЦМИКовские макросы у меня, за исключением "выделителя узлов" не пошли.
1. Копирование в АИ.
Не нравится вот это: strTempPath = String(260, vbNullChar)
Изменил на strTempPath = False (первое, что, методом тыка пришло в голову :D )
Прошёл дальше, до строчки
GetTempFolder = Left(strTempPath, _
InStr(1, strTempPath, vbNullChar) - 1)
И её на False заменил - GetTempFolder = False.
После этого, к моему великому удивлению макрос заработал.

2. Вставка из АИ.
Тут мне упорно сообщается, что Адоб Иллюстратор дата в клипборде нифига не присутствует, то бишь not available. Судя по всему, это из-за Илла CS. В этом плане Вакуленовский скрипт предпочтительнее, за счёт возможности выбора формата вставляемого объекта.

3. Кривые в Шоп.
Тормоза на: frmOptions.MousePointer = fmMousePointerHourGlass
Уже по традиции меняю на frmOptions.MousePointer = False
Зато вот тут: s = d.FilePath & "shape" & Format(shNum(i), "000") & ".cmx" моих знаний скриптостроительства, кои вобщем-то "заменой на False" и ограничены явно не хватает... :D

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

2ЦМИК: вышесказанное не более чем впечатление бета-тестера, надеюсь что-то может оказаться полезным.
 
Ответ: Как сохранять фигуры?

А у меня все пошло, правда я не помню, с какой ссылки я поставила
скрипт, с первой или второй, НО все работает Я просто кайфую!
Кидаю в фотошоп все подряд, очень быстро и непринуждено,
без нудного сохранения в епс и открытия его в шопе :)
 
Ответ: Как сохранять фигуры?

Здравствуйте!

Поднимаю старую-престарую тему.
Очень давно пользовалась прекрасным скриптом QuickPaths.
Постоянно вспоминала добрым словом его создателя.
Теперь по нему возник вопрос. Пожалуйста! Помогите! Работа горит!

Дело вот в чем. На новой работе стоит Корел Х3. Дома у меня тоже самое. QuickPaths прекрасно работает. Здесь же - никак.

Симптомы.
Кладу в папку ГМС, потом в кореле - Оптионс, Коммандс, Макрос - как обычно. По идее, в Макросах он и должен быть (дома у меня так). Нажимаешь, выбираешь кнопочку и работаешь. А здесь в Макросах пусто.

Что делала.
Проверяла Визуал Бэйсик (он не был установлен) - поставила.
Захожу в Корел - вроде стоит. Нажала на плей - выскочило окно с такими ругательствами -
Cannot initialize Visual Basic for Applications. VBA may not be installed.
Try reinstalling it using the Corel Installer and selecting a Custom Setup.
И потом снова Визуал Бейсик не работает. Кнопочка Плей серая, неактивная.

Потыкалась там-сям. Знаний не хватет.
Помогите, пожалуйста!!!
Хочу QuickPaths.
 
Ответ: Как сохранять фигуры?

Ну снесите корел начисто, полностью и поставьте по-новой. Ну не нравится ему ваш VBA.
 
Ответ: Как сохранять фигуры?

Спасибо, помогло.
Теперь новый вопрос.
А есть такая штука, которая кривые из иллюстратора быстро
(с помощью буфера например) сохраняет для работы в кореле?

Епсы сохранять очень долго.
Я изучаю Илл, но быстро переключиться с Корела на Илл тяжело.
 
Статус
Закрыто для дальнейших ответов.