Как другой принтер в Windows-е сделать "по-умолчанию"?
Релиб
Форумы       Участники    Календарь    Кто он-лайн?
Добро пожаловать, гость ( Вход | Регистрация )
        



Как другой принтер в Windows-е сделать... Expand / Collapse
Автор
Сообщение
24.01.2007 20:06
Supreme Being

Supreme BeingSupreme BeingSupreme BeingSupreme BeingSupreme BeingSupreme BeingSupreme BeingSupreme Being

участник
Last Login: 14.09.2007 16:26
Сообщ.: 123, Visits: 1 095
Здравствуйте!

Столкнулся с такой проблемой.

С помощью VB5 нужно выбрать принтер и выполнить на нём распечатку с помощью объякта Printer из коллекции Printers.

Команда Set Printer = Printer(i) хоть и делает i-й принтер текущим, а всё равно печать происходит на том принтере, который в данный момент выбран в Windows-е по-умолчанию.

Есть ли какие-то способы с помощью API сделать в Windows-е другой принтер по-умолчанию?

Сообщ. #910032
24.01.2007 20:26
Supreme Being

Supreme BeingSupreme BeingSupreme BeingSupreme BeingSupreme BeingSupreme BeingSupreme BeingSupreme Being

участник
Last Login: 14.09.2007 16:26
Сообщ.: 123, Visits: 1 095
Кое-что нашёл: http://www.winsov.ru/vb015.php

В XP работает!

В win9x пока не проверил...

Сообщ. #910033
01.02.2007 3:54
Supreme Being

Supreme BeingSupreme BeingSupreme BeingSupreme BeingSupreme BeingSupreme BeingSupreme BeingSupreme Being

участник
Last Login: 14.09.2007 16:26
Сообщ.: 123, Visits: 1 095
Под Windows 95 пример http://www.winsov.ru/vb015.php тоже работает. На всякий случай прикрепляю его к сообщению в готовом виде (prndef.zip)

 

  Post Attachments 
PrnDef.zip (0 views, 7,84 KB)

Сообщ. #910273
03.02.2007 12:28
Supreme Being

Supreme BeingSupreme BeingSupreme BeingSupreme BeingSupreme BeingSupreme BeingSupreme BeingSupreme Being

участник
Last Login: 14.09.2007 16:26
Сообщ.: 123, Visits: 1 095
Найденный пример переработал и проверил на практике. Цепляю к сообщению.

P.S.: из примера выкинул определение принтера, выбранного в Windows по-умолчанию, т.к. его можно узнать проще: Printer.DeviceName

  Post Attachments 
Printer.zip (1 view, 2,08 KB)

Сообщ. #910374
« пред. тема | след. тема »


Эту тему читают Expand / Collapse
Посетители: 0 (0 гостей, 0 участников, 0 скрыт.участников)
Сейчас нет участников, просматривающих тему.
Модераторы: Alexey, boombastik, bazile, pl, Comanche, Alexey Spirin

Время GMT +3:00, Сейчас 11:53