Имя текущего принтера | |
---|---|
Alsim Сообщений: 3636 Откуда: Екатеринбург Дата регистрации: 17.11.2004 |
Есть кучу лет работающий класс вывода на печать.
Кнопка выбора принтера, кнопка просмотра печати, кнопка отправки на печать, кнопка выход. [attachment 30850 ] Захотелось выпендриться и доработать этот класс. (сохранять в PDF и на почту отправлять, это получается предварительно) НО! Хочу показать при вызова этого класса в статусе формы имя Текущего принтера ну и того, что потом выбрали с помощью SYS(1037). Убился, урылся - только GETPRINTER( ), но он диалогом выскакивает. APRINTERS() - дает список принтеров, но какой в данный момент текущий не видно опять же. Мне же хочется по-тихому в переменную. Чтобы сразу было видно куда. А то девушки натыкают "по-умолчанию" и забудут, а принтеров бывает и два и три, и у них из Екселя в один печатает, из браузера в другой, от меня в третий )))) Спасибо! + Fox7 если что Исправлено 1 раз(а). Последнее : Alsim, 11.04.19 14:42 |
Re: Имя текущего принтера | |
---|---|
Taran Сообщений: 13624 Откуда: Красноярск Дата регистрации: 16.01.2008 |
|
Re: Имя текущего принтера | |
---|---|
Alsim Сообщений: 3636 Откуда: Екатеринбург Дата регистрации: 17.11.2004 |
!Блин, Олег, был бы ты девчонкой, я б тебя поцеловал! Спасибо! |
Re: Имя текущего принтера | |
---|---|
Taran Сообщений: 13624 Откуда: Красноярск Дата регистрации: 16.01.2008 |
Если часто приходится менять устройство вывода, то я бы как минимум при старте загрузил список доступных принтеров через aPrinters и потом выводил его в ListBox`e с выделением активного и возможностью смены.
Достаточно подтормаживает GetPrinter() по моему. Ну и скорость выбора. GetPrinter() запустить кнопкой. там окно и в ComboBox`е список принтеров. ComboBox активировать, принтер выбрать. ОК нажать. А так ты просто в свою форму встроишь список принтеров и активный в нем же подсветишь. Одним кликом сменить можно. |
Re: Имя текущего принтера | |
---|---|
Alsim Сообщений: 3636 Откуда: Екатеринбург Дата регистрации: 17.11.2004 |
ага, не часто. У меня на клике кнопки Выбор сидит SYS(1037). Оно и в 9ом Фоксе работает корректно (у меня есть несколько проектов и на 9ке)
То что обнаружил, разбираясь в себе на 15лет младше, что по выходу из класса не восстанавливаю обратно принтер по умолчанию. Обсуждали с моей половинкой, (она примерно этим же решением пользуется в своей кухне, чуть под неё подпилено). Вроде как с её точки зрения логично - сменили принтер и на сеанс работы с нашей прогой он остаётся. Я-то это давно знал за собой, а вот хорошо это или плохо - вопрос противоречивый. Мои (на складиках, у которых несколько принтеров), не один раз удивлялись, а я это с важным видом освещал, что так и положено от дяди Билла ))) Потому у себя скорее всего добавлю ещё одну "галочку" запоминать принтер. Это вроде как дверь подъезда. Идём гулять, дверь НЕ захлопнута. Значит так и оставь! - каждый раз говорю я. А она закрывает(!) Первое правило программера - зашёл, запомнил. Вышел - восстановил как было. Ну и когда домой возвращаемся с прогулки, обе руки (мои) заняты, а дверь захлопнута))) "А!ВОТ!" - каждый раз талдычу я)))) Теперь вот сама и открывай!))) |
Re: Имя текущего принтера | |
---|---|
Taran Сообщений: 13624 Откуда: Красноярск Дата регистрации: 16.01.2008 |
Ну путей мильен.
Отсканил свои сырцы, нигде нет Sys(1037). Как-то даже и не знал про него. Как-то обходился. Восстанавливать не восстанавливать - всяко может быть по логике. Может быть вообще каждый отчет привязан к некоторому специфичному принтеру и переназначение надо автоматом делать. Этикетки допустим на термопринтере. Я так понял ты вопрос с именем текущего закрыл, ну и славно. |
Re: Имя текущего принтера | |
---|---|
Alsim Сообщений: 3636 Откуда: Екатеринбург Дата регистрации: 17.11.2004 |
Да, мне именно этой Set('Printer', 2) не хватало для счастья.
*** Кстати это идея запоминать имя репорта- имя принтера. Показывать как, ты меня уже научил) * У меня изначально было задумано: имя репорта, емейл кому запоминать. Это я уже про вывод-отсылку PDF. Но опять же по месту. Если акт сверки, то брать емейл из справочника контрагента. Это если БУчет. У меня там уже сделано, но очень через "местный" интерфейс (файл в ворд, его уже отсылаем) Если с кадрами работа, то вариант отсылки или главной в подразделении, или конкретно челу. У него в профиле емейл есть. Короче есть над чем помыслить и это радует |
Re: Имя текущего принтера | |
---|---|
Taran Сообщений: 13624 Откуда: Красноярск Дата регистрации: 16.01.2008 |
Но она UPPERCASE, что не всегда нравится. Процедурку ежели наваять. Массив принтеров получить через aPrinters - там имена MixedCase и многое другое полезное. Пробежался по массиву, нашел соответствие с Set('Printer', 2) и получил имя принтера MixedCase. Может есть вариант и проще. У меня коряво, но так. |
Re: Имя текущего принтера | |
---|---|
Alsim Сообщений: 3636 Откуда: Екатеринбург Дата регистрации: 17.11.2004 |
Да всё-всё-всё! У меня уже практически всё работает.
*** Девчонкам написал про вывод в PDF, а они как-то не восхитились. Мы, говорят на бумагу печатаем и в офис отправляем. Так исторически. А вот нарисуй-ка ты нам, раз у тебя творческое безделье... - написали они мне в ответ, - такую штуку... Короче озадачили)))) и это хорошо) |
Re: Имя текущего принтера | |
---|---|
Taran Сообщений: 13624 Откуда: Красноярск Дата регистрации: 16.01.2008 |
Потому что только в офисе есть сканер. Там сканируют и шлют на eMail. ...удаляюсь, удаляюсь, удаляюсь... |
Re: Имя текущего принтера | |
---|---|
vk65 Сообщений: 402 Дата регистрации: 08.04.2008 |
forum.foxclub.ru |
Re: Имя текущего принтера | |
---|---|
andrewk Автор Сообщений: 174 Откуда: Красноярск Дата регистрации: 15.05.2005 |
А через что в PDF пишешь? (я Doro PDF Writer использую, но вдруг интереснее идеи есть) |
Re: Имя текущего принтера | |
---|---|
Alsim Сообщений: 3636 Откуда: Екатеринбург Дата регистрации: 17.11.2004 |
Вот такой внешний вид.
Сделал год назад и отвлёкся напрочь. Буквально месяц назад вспомнил и отдал в работу. Девочкам нравится. Отправку на Email пока задвинул, думаю как красиво хранить получателей. [attachment 33540 set_print3.jpg] |
Re: Имя текущего принтера | |
---|---|
andrewk Автор Сообщений: 174 Откуда: Красноярск Дата регистрации: 15.05.2005 |
У меня в том особенность, что нужно экспортировать большое количество мелких отчётов, каждый в отдельный файл, то есть критичен вопрос скорости. Когда-то было сделано через LibreOffice, работало хорошо и довольно быстро. Ну как, то есть быстрее остальных виденных мною вариантов. За счёт того, что там не через виртуальный принтер, а прямая конвертация rtf и прочего. Но с какой-то версией там что-то сломалось то ли в Питоне, то ли во взаимодействии с ним. Ну и понятно, что это слишком большая привязка к слишком большому стороннему продукту. Других конвертеров, работающих не через виртуальный принтер, я так и не нашёл. С год или два ли назад очередной раз колупался с этим. Сперва тоже заточил под Bullzip. Да, COM-объект, все дела. Но, насколько помню, там какие-то ограничения бесплатной лицензии (типа 10 штук в конторе, мне этого достаточно). Кроме того, что-то там под RDP было не так (если не путаю). Но, главное для меня, скорость сильно не радовала. Потом наткнулся на Doro. Там управление через ini-файл. В целом, всё неплохо. Скорость в моих экспериментах раза в полтора была выше чем у Bullzip (но ниже чем у Libre). На этом и остановился. Сейчас взялся экспорт переделывать, наткнулся на этот пост, ну и решил спросить, вдруг кто-то что-то чудное подскажет)) |
© 2000-2024 Fox Club  |