Вот решил обратиться к товарищам, разбирающимся в написании макросов под корел
в частности wOxxOm
хочу попросить написать очень полезный макрос

была у нас тут темка насчет конвертации баркодов в кривые
остановились на том что командамит вырезать -специальная вставка (cut - paste special) баркод конвертируется таки в кривые, но встает не в исходное место, а в центр рабочей области

вот как бы так это исправить, то есть написать макрос который бы делал все те же действия, но только вставку делал туда, откуда вырезал

сделал бы сам и просить бы не стал, но в VBA не в зуб ногой

wx_BarCodeCurves.zip


Такой вот макрос полезный ты придумал, а я сделал. кийя!

Курвит он через экспорт/импорт в EPS - я так всегда делал вручную.
Работает либо с выделенными объектами либо со всей страницей. разгруппировать ничего не надо - он рексурсивный (но в Х3 не будет хватать барсы внутри поверклипов, если надо кому в Х3 чтоб пклипы обрабатывал - жалуйтесь)
Работает очень быстро и КАЧЕСТВЕННО, т.к. постскрипт все ж таки
Все баркоды конвертируются в отдельные группы объектов в кривых все в СМУК на тех же слоях и позициях и месте в стеке (ну типа OrderInFrontOf ну вы поняли)
В конце дается отчет сколько баркодов найдено, сколько удалось сконвертировать (должны быть ВСЕ
И там задается вопрос - скомбайнить каждую группу в кривую без белой подложки - если да, то вместо группы из 43 объектов будет одна симпатишная черная кривулька для каждого баркода

wOxxOm
это ты только что сваял???!!!
гениально!
взял на испытания

wOxxOm
не пашет
я ведь на 11-ом сижу

Прости я после Х3 даже смотреть могу с трудом на 11-й это потому что ВБА там такой слабенькій, а для меня это все равно что сердце проги, т.к. практически все рутинные операции у себя заделываю в макросы

Нашел комп с 11-м корелом промаялся час и понял что в 11-м глюк - он не отпускает при экспорте файлы до конца макроса (оказывается известная для кодеров проблема). Сделал через внутренний системный таймер но на той машине проверить не смог т.к. ее юзает человек с чуждым мне мировоззрением которому удалось каким то образом так испортить поддержку ВБА в 11-м, что ни одна системная функция не работает в нем (плюс к этому он испортил то же и в 12-м и в 13-м). Его девиз наверное "смерть всему что не понимаю"

Ну так вот попробуй этот вариант, что приаттачен

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

Загрузить:

---

wx_BarCodeCurves.zip Размер: 12.06 KB; Скаченно: 314

никак
пишет "method 'Import' for object 'IDrawLayer' failed"

придется на ХЗ все-таки переходить

ух, и Корёл вылетел после этого

ха!
работает!!
гениально!

проблема была в том что я попытался скурвить непропорционально деформированные баркода, т.е. вытянутые или сплющенные

при ковертации нормального баркода все ОК

мои искренние восхищения!

блинблинблин
глобальные испытания макрос не прошел

наверное дело в том что корка все-таки 11-ая
макрос выдает все время интересные сообщения типа предыдущего или "ошибка экспорта/импорта баркода в EPS"

причем все мои усилия установить закономерность появления этих ошибок закончились неудачей
то есть системности в этом я не вижу

при абсолютно одних и тех же задачах макрос выдавал 3 разных результата

испытания будут продолжены...