Просматривают:
2 Анонимно
давайте сделаем макрос для конвертации баркодов в кривые |
||
|
||
---|---|---|
Пользователь 1 уровня
Присоединился:
2005/10/21 23:21 Откуда Н. Новгород
Сообщений: 873
|
Вот решил обратиться к товарищам, разбирающимся в написании макросов под корел
в частности wOxxOm хочу попросить написать очень полезный макрос была у нас тут темка насчет конвертации баркодов в кривые остановились на том что командамит вырезать -специальная вставка (cut - paste special) баркод конвертируется таки в кривые, но встает не в исходное место, а в центр рабочей области вот как бы так это исправить, то есть написать макрос который бы делал все те же действия, но только вставку делал туда, откуда вырезал сделал бы сам и просить бы не стал, но в VBA не в зуб ногой
Опубликовано: 2006/6/10 11:42
|
|
|
Re: давайте сделаем макрос для конвертации баркодов в кривые |
|
---|---|---|
Титан - модератор
Присоединился:
2006/4/8 19:42 Сообщений: 152
|
wx_BarCodeCurves.zip
Такой вот макрос полезный ты придумал, а я сделал. кийя! Курвит он через экспорт/импорт в EPS - я так всегда делал вручную. Работает либо с выделенными объектами либо со всей страницей. разгруппировать ничего не надо - он рексурсивный (но в Х3 не будет хватать барсы внутри поверклипов, если надо кому в Х3 чтоб пклипы обрабатывал - жалуйтесь) Работает очень быстро и КАЧЕСТВЕННО, т.к. постскрипт все ж таки Все баркоды конвертируются в отдельные группы объектов в кривых все в СМУК на тех же слоях и позициях и месте в стеке (ну типа OrderInFrontOf ну вы поняли) В конце дается отчет сколько баркодов найдено, сколько удалось сконвертировать (должны быть ВСЕ И там задается вопрос - скомбайнить каждую группу в кривую без белой подложки - если да, то вместо группы из 43 объектов будет одна симпатишная черная кривулька для каждого баркода
Опубликовано: 2006/6/10 14:39
|
|
|
Re: давайте сделаем макрос для конвертации баркодов в кривые |
|
---|---|---|
Пользователь 1 уровня
Присоединился:
2005/10/21 23:21 Откуда Н. Новгород
Сообщений: 873
|
wOxxOm
это ты только что сваял???!!! гениально! взял на испытания
Опубликовано: 2006/6/10 15:18
|
|
|
Re: давайте сделаем макрос для конвертации баркодов в кривые |
|
---|---|---|
Пользователь 1 уровня
Присоединился:
2005/10/21 23:21 Откуда Н. Новгород
Сообщений: 873
|
wOxxOm
не пашет я ведь на 11-ом сижу
Опубликовано: 2006/6/10 15:23
|
|
|
Re: давайте сделаем макрос для конвертации баркодов в кривые |
|
---|---|---|
Титан - модератор
Присоединился:
2006/4/8 19:42 Сообщений: 152
|
Прости я после Х3 даже смотреть могу с трудом на 11-й это потому что ВБА там такой слабенькій, а для меня это все равно что сердце проги, т.к. практически все рутинные операции у себя заделываю в макросы
Нашел комп с 11-м корелом промаялся час и понял что в 11-м глюк - он не отпускает при экспорте файлы до конца макроса (оказывается известная для кодеров проблема). Сделал через внутренний системный таймер но на той машине проверить не смог т.к. ее юзает человек с чуждым мне мировоззрением которому удалось каким то образом так испортить поддержку ВБА в 11-м, что ни одна системная функция не работает в нем (плюс к этому он испортил то же и в 12-м и в 13-м). Его девиз наверное "смерть всему что не понимаю" Ну так вот попробуй этот вариант, что приаттачен Edit: я узнал кто віноват в том что сістемные функции не работали - Kasper5 причем защищенный паролем на конфигурацию, так я не будь дураком взял в реестре отключил запуск всех его сервисов и деинсталил его, проверил макрос в 11-м - работает и все мои тоже работают. Вот так вот!
Опубликовано: 2006/6/10 20:33
|
|
|
Re: давайте сделаем макрос для конвертации баркодов в кривые |
|
---|---|---|
Пользователь 1 уровня
Присоединился:
2005/10/21 23:21 Откуда Н. Новгород
Сообщений: 873
|
никак
пишет "method 'Import' for object 'IDrawLayer' failed" придется на ХЗ все-таки переходить ух, и Корёл вылетел после этого
Опубликовано: 2006/6/17 12:34
|
|
|
Re: давайте сделаем макрос для конвертации баркодов в кривые |
|
---|---|---|
Пользователь 1 уровня
Присоединился:
2005/10/21 23:21 Откуда Н. Новгород
Сообщений: 873
|
ха!
работает!! гениально! проблема была в том что я попытался скурвить непропорционально деформированные баркода, т.е. вытянутые или сплющенные при ковертации нормального баркода все ОК мои искренние восхищения!
Опубликовано: 2006/6/17 12:39
|
|
|
|
Re: давайте сделаем макрос для конвертации баркодов в кривые |
|
---|---|---|
Пользователь 1 уровня
Присоединился:
2005/10/21 23:21 Откуда Н. Новгород
Сообщений: 873
|
блинблинблин
глобальные испытания макрос не прошел наверное дело в том что корка все-таки 11-ая макрос выдает все время интересные сообщения типа предыдущего или "ошибка экспорта/импорта баркода в EPS" причем все мои усилия установить закономерность появления этих ошибок закончились неудачей то есть системности в этом я не вижу при абсолютно одних и тех же задачах макрос выдавал 3 разных результата испытания будут продолжены...
Опубликовано: 2006/6/17 12:50
|
|