[CDR X5-X8] Корел перестал печатать тонкие линии сразу на нескольких компьютерах

  • Автор темы Автор темы Foyk
  • Дата начала Дата начала
Кто ни будь пробовал распечатывать этот макет? У Вас так же нет линий?
 
CorelDRAW 2018
Versant280
линии, поганенькие, но есть - он растрирует в 1200dpi
1744103777982.png
 
И принтер PS или PCL какой-нибудь? Потому что PCL такие номера на раз-два откалывает
 
zollinger сказал(а):
И принтер PS или PCL какой-нибудь? Потому что PCL такие номера на раз-два откалывает
Нажмите, чтобы раскрыть...
3 принтера использовалось
hp 612
kyocera p3120 p3260
на некоторых документах есть линии, но не все. На некоторых вообще вот как у меня на фото нет линий.
Пойду побалуюсь с драйверами.
 
~RA~ сказал(а):
Вариант задать нормальную толщину линиям вы не рассматриваете?
Нажмите, чтобы раскрыть...
Ну, не желают пользователи переделывать "гигабайты" линий.
По этому я ищу способ облегчить им работу.
 
1744104361897.png

ЧТД. Физически - одно и то же устройство
 
  • Спасибо
Реакции: Foyk
Foyk сказал(а):
По этому я ищу способ облегчить им работу.
Нажмите, чтобы раскрыть...
вот вам - код. Создайте макрос с этим кодом
обработает активную страницу, включая объекты в группах. В поверклипы не полезет.
Найдёт объекты ВЫСОТОЙ меньше 0,02 мм и увеличит их по ВЫСОТЕ до 0,2мм
Юлии Киселёвой и Роланду Энверовичу- передавайте большой привет
1744105736454.png
1744105750416.png

Код: 
Sub ZeroLine()
Dim ZL As ShapeRange, lin As Shape, xl As Double, yl As Double
EventsEnabled = False: Optimization = True
ActiveDocument.Unit = cdrMillimeter
ActiveDocument.BeginCommandGroup ("DelZL")
Set ZL = ActiveDocument.ActivePage.Shapes.FindShapes(Query:="@height <{0.02 mm}")
For Each lin In ZL
lin.GetSize xl, yl
lin.SetSize xl, 0.2
Next lin
ActiveDocument.EndCommandGroup
EventsEnabled = True: Optimization = False
End Sub
 
Последнее редактирование:
  • Спасибо
Реакции: Foyk
Foyk сказал(а):
на драйверах KPDL киосера стала печатать все линии.
на KX печатало как повезет.
Спасибо.
Нажмите, чтобы раскрыть...
Но толще сделать все равно надо. Забавно, что поскольку у вас не линии (абрисы), то и Acrobat'овский или PitStop'овский preflight их не исправит. Только писать что-то, либо для корела, либо fixup для Acrobat'а/PitStop'а.
Кстати, а если повернуть этикетку на 90 градусов при той же ориентации бумаги в принтере, что-то меняется? Это опять к вопросу о несовершенстве драйверов
UPD: а вот уже @dastin и решение предложил
 
Последнее редактирование:
Foyk сказал(а):
По этому я ищу способ облегчить
Нажмите, чтобы раскрыть...
Я бы камень привязал на шею. Быстрее – значит легче.
dastin сказал(а):
вот вам - код
Нажмите, чтобы раскрыть...
А теперь Юля с лёгким Корелом продолжит плодить инвалидов, а ТС с радушием применять макрос на каждом файле.
 
если 0,2 покажется "жирновато" - поправите - сообразите ведь в каком месте?
 
Для ответа нужно войти/зарегистрироваться
Верх Низ