Релиб / Программирование / Visual Basic / Как другой принтер в Windows-е сделать "по-умолчанию"? / Latest Posts

RE: Как другой принтер в Windows-е сделать "по-умолчанию"?

aleksmir — Sat, 03 Feb 2007 12:28:53 GMT

Найденный пример переработал и проверил на практике. Цепляю к сообщению.

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

RE: Как другой принтер в Windows-е сделать "по-умолчанию"?

aleksmir — Thu, 01 Feb 2007 03:54:35 GMT

Под Windows 95 пример http://www.winsov.ru/vb015.php тоже работает. На всякий случай прикрепляю его к сообщению в готовом виде (prndef.zip)

RE: Как другой принтер в Windows-е сделать "по-умолчанию"?

aleksmir — Wed, 24 Jan 2007 20:26:45 GMT

Кое-что нашёл: http://www.winsov.ru/vb015.php

В XP работает!

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

Как другой принтер в Windows-е сделать "по-умолчанию"?

aleksmir — Wed, 24 Jan 2007 20:06:07 GMT

Здравствуйте!

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

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

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

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