[CDR 2017-2022] Тримминг растра

[izrukvruki]

В CorelDraw или Corel Photopaint есть инструмент автоматического тримминга (обрезка пустого пространства вокруг изображения, обозначено желтой областью)? Аналогично как это в Фотошопе работает...

Может быть есть возможность макрос какой-то написать?

В Corel на листе стоят картинки, нужно им задать одинаковые размеры, но у одного объекта вокруг по 3см пространства, другое полностью обрезано...

 

[dastin]

не совсем понял, что подразумевается под

Аналогично как это в Фотошопе работает...

есть такой инструмент в CoreDRAW

Если этот растр по Edit Bitmap открыть в Core PhotoPaint,
то там помимо такого функционала добавляются пресеты
к сожалению нередактируемые (или я не знаю как это делать)

 

[izrukvruki]

я имел в виду следующую функцию в фотошопе

 

[dastin]

в Corel PhotoPaint можно создать маску из обьекта - выделяем справа в докере обьектов наш растр
создать маску из обьекта - CRTL+M - и дальше Image - Crop - Crop Image to Mask

если обьект (растр) прямоугольный - то можно прямо в CorelDraw инструментом Shape Tools F10 подвигать точки

 

[_MBK_]

Помнится, у woxxom в wx_tools был макрос, который вообще на автомате векторную обтравку делает

 

[Sh]

Bнструмент Crop Border Color. Выбрать инструмент Crop и правой кнопкой мыша вызвать меню

 

[izrukvruki]

Вот это уже ближе...
Но мне бы хотелось обрезать прозрачность

 

[~RA~]

Не по теме:
Я так понимаю, что древние практики, вроде "тримнуть растр в растровом редакторе" и только потом пхать в корел предлагать не стоит?

 

[dastin]

Скорее всего чего-то я не понял...
вот пнг - битмап с прозрачностью с линейным размером больше чем само изображение

вот оно же в CorelDraw - под ним желтый прямоугольник и рядом тот же вид, но в каркасе

как бы излишняя прозрачность ничему не мешает , ничего не загораживает - но надо её убрать средствами CorelDraw Graphic Suite
жмём Edit Bimap - открываем растр в CorelPhotoPaint
в докере обьектов правой кнопкой на обьекте - Mask from Object (CTRL+M)
- и далее Image - Crop - Crop Image to Mask - все лишняя прозрачность обрежется

Удаляем маску CTRL+SHIFT+R и сохраняем с возвратом в CorelDraw

Или надо что-то другое?

 

[Skvoznyak]

Не по теме:
Я так понимаю, что древние практики, вроде "тримнуть растр в растровом редакторе" и только потом пхать в корел предлагать не стоит?

а PhotoPaint это что?

 

[dastin]

а PhotoPaint это что?

растровый редактор в составе CorelDRAW Graphics Suite

 

[Skvoznyak]

я об этом и говорю

 

[izrukvruki]

Скорее всего чего-то я не понял...
вот пнг - битмап с прозрачностью с линейным размером больше чем само изображение
Посмотреть вложение 134082

вот оно же в CorelDraw - под ним желтый прямоугольник и рядом тот же вид, но в каркасе
Посмотреть вложение 134083Посмотреть вложение 134084

как бы излишняя прозрачность ничему не мешает , ничего не загораживает - но надо её убрать средствами CorelDraw Graphic Suite
жмём Edit Bimap - открываем растр в CorelPhotoPaint
в докере обьектов правой кнопкой на обьекте - Mask from Object (CTRL+M)
- и далее Image - Crop - Crop Image to Mask - все лишняя прозрачность обрежется
Посмотреть вложение 134087Посмотреть вложение 134088

Удаляем маску CTRL+SHIFT+R и сохраняем с возвратом в CorelDraw
Посмотреть вложение 134089Посмотреть вложение 134090

Или надо что-то другое?

Именно это и нужно!!!
А это можно интересно в макрос запихать?

 

[dastin]

Можно немного иначе - Edit Bimap - in Corel Photo-Paint select object - правой клавишей - Clip Mask - Create - From Object Trasparency

и сразу сохраняем

 

[lev]

Если по прозрачным пикселам, то пересохранить батчем всю папку в psd формат и импортнуть в корел.

 

[dastin]

А это можно интересно в макрос запихать?

... возможно я ошибаюсь ...
Draw по нажатию Edit Bimap по факту экспортирует растр в какой-то временный каталог,
Paint его оттуда подхватывает и по завершению обработки снова туда же во временный каталог возвращает,
а Draw забирает обратно и заменяет растр на обработанный
т.е. это два приложения в связке - но второе просто открывается с растром из временного каталога ...
VBA в нём тоже есть, но получается, этот макрос должен запускаться либо автоматом при открытии любого документа, отрабатывать код и закрывать Paint
( а надо ли такое?)
либо должен будет запускаться по кнопочке в Paint

 

[dastin]

А это можно интересно в макрос запихать?

В Corel PHOTO-PAINT откройте редактор VBA - точно такой же как и в DRAW - и создайте там макрос с кодом

Sub TransDel()

Dim doc As Document
Dim lr As Layer

Set doc = ActiveDocument
Set lr = ActiveDocument.ActiveLayer

lr.CreateMask
doc.CropToMask
doc.Mask.Delete
doc.Save

End Sub

сохраните и вытащите кнопочку для него
вся процедура будет выглядеть так -
CorelDRAW - выделить растр для редактирования
Edit Bitmap - откроется Corel PHOTO-PAINT с растром
жмём кнопочку макроса и рядом кнопку Finish Editing

если таких растров несколько - Corel PHOTO-PAINT можно не закрывать
следующие растры будут открываться в том же окне Corel PHOTO-PAINT