alibek писал(а):Способ 1. Что-то ты не то говоришь. Если фон прозрачный, то все должно нормально печататься.
alibek писал(а):Способ 2. А фон белым ты делал?
alibek писал(а):Покажи весь код печати.
' переменные
Dim objPic As Object ' объект "Принтер"
' установка поворота страницы
Printer.Orientation = vbPRORPortrait
' ссылка на принтер
Set objPic = Printer
' грузим картинку в PictureBox
Set picIn.Picture = LoadPicture("diamonds.jpg")
' выводим картинку на принтер
objPic.PaintPicture picIn.Image, 0, 0
' печатаем текст
objPic.Print "Текст"
' конец документа
Printer.EndDoc
alibek писал(а):И где ты тут указываешь FontTransparent?
Кстати, промежуточный picIn тебе не нужен, можешь печатать сразу objPic.PaintPicture LoadPicture(...)
alibek писал(а):Кстати, промежуточный picIn тебе не нужен, можешь печатать сразу objPic.PaintPicture LoadPicture(...)
Хакер писал(а):Ты не делаешь согласование по DPI (резрешению).
+ первый ЧБ-скриншот — это скан распечатанного на бумаге документа, или же скриншот документа с виртуального принтера?
aleksmir писал(а):Печатаю с виртуального.
iGrok писал(а):aleksmir писал(а):Печатаю с виртуального.
Т.е. на реальную печать ты документы не выводил?
Виртуальные принтеры иногда глючат, как раз оставляя "лишний" фон вокруг текста.
aleksmir писал(а):В любом случае - виртуальный принтер - это тоже принтер.
aleksmir писал(а):Нужно чтобы печаталось везде одинаково.
Хакер писал(а):Нет, второй способ жуткий.
Он отправляет на принтер гигантский битмап, чем расходует канал и запросто переполняет память принтера.
Хакер писал(а):Ну, фоновый рисунок, если в нём плавные переходы, может отправляться в более низком DPI, а может опционально (очень должна быть такая опция) и не отправляться.
Хакер писал(а):Вообще же, правильным с точки зрения здравого смысла решением будет заказать в типографии крупную партию бланков с фоном, а на них уже печатать только таблицы, с прозрачным фоном.
alibek писал(а):По способу 2 — укажи вручную BackColor=&hffffff&. Я подозреваю, что там у тебя системный цвет Windows Background, от того и муар.
По поводу способа 1 — что-то ты видимо делаешь не так. Я печатал текст поверх фона, при указании FontTransparent все печаталось, как надо (как на экране, так и на принтере). Попробуй еще выводить для проверки текст на принтер через API.
Нет, там куча мелкого текста. Разрешение должно быть высоким.
Кроме того бланк не один, а их несколько видов (зависит от вида товара).
Хакер писал(а):Нет, там куча мелкого текста. Разрешение должно быть высоким.
Что, прямо в фоновой картинке мелкий текст?Кроме того бланк не один, а их несколько видов (зависит от вида товара).
И у каждого типа своя , отличная от других фоновая картинка?
Хакер писал(а):Вопрос был такой: в фоном рисунке, картинке, изображении, художестве, творчестве есть мелкий текст?
Хакер писал(а):И такой: для каждой формы используется свой, отличный от других, рисунок, своя картинка, своё изображение, художество, творчество?
Хакер писал(а):В чём смысл использовать доисторические версии VB?
При использовании VB6 периписывать ничего не придется.aleksmir писал(а):Хакер писал(а):В чём смысл использовать доисторические версии VB?
Проект большой, действующий. За переписывание на другом языке никто платить не будет.
Сейчас этот форум просматривают: SemrushBot и гости: 104