Не рабтает смена лотка в QuickReport

← →
asail (2008-12-03 00:24) [0]

Здрасьте всем!
Вот такая беда приключилась:
юзаю отчеты QuickReport (в силу исторической необходимости) пытаюсь программно выбать нужный принтер и лоток подачи бумаги, так сказать, автоматом без открытия PrinterSetup диалога и не обращая внимания на дефолтные установки в винде. С выбором принтера проблем нет, а лоток какой не выставлю - все печатает по дефолту драйвера :-(.
Для установки лотка исользую:
MyQRep.PrinterSettings.OutputBin := Upper/Lower и т.д.
Я так понимаю, что ошибка, видимо, в том что здесь речь идет о ВЫХОДНОМ лотке, а мне нужно как раз наоборот... Тока никак не могу найти нужного свойства.
Может есть у кого идеи куда копать?
Спасибо.

← →
KilkennyCat © (2008-12-03 00:43) [1]

{ bin selections } {$EXTERNALSYM DMBIN_UPPER} DMBIN_UPPER = 1; {$EXTERNALSYM DMBIN_FIRST} DMBIN_FIRST = DMBIN_UPPER; {$EXTERNALSYM DMBIN_ONLYONE} DMBIN_ONLYONE = 1; {$EXTERNALSYM DMBIN_LOWER} DMBIN_LOWER = 2; {$EXTERNALSYM DMBIN_MIDDLE} DMBIN_MIDDLE = 3; {$EXTERNALSYM DMBIN_MANUAL} DMBIN_MANUAL = 4; {$EXTERNALSYM DMBIN_ENVELOPE} DMBIN_ENVELOPE = 5; {$EXTERNALSYM DMBIN_ENVMANUAL} DMBIN_ENVMANUAL = 6; {$EXTERNALSYM DMBIN_AUTO} DMBIN_AUTO = 7; {$EXTERNALSYM DMBIN_TRACTOR} DMBIN_TRACTOR = 8; {$EXTERNALSYM DMBIN_SMALLFMT} DMBIN_SMALLFMT = 9; {$EXTERNALSYM DMBIN_LARGEFMT} DMBIN_LARGEFMT = 10; {$EXTERNALSYM DMBIN_LARGECAPACITY} DMBIN_LARGECAPACITY = 11; {$EXTERNALSYM DMBIN_CASSETTE} DMBIN_CASSETTE = 14; {$EXTERNALSYM DMBIN_FORMSOURCE} DMBIN_FORMSOURCE = 15; {$EXTERNALSYM DMBIN_LAST} DMBIN_LAST = DMBIN_FORMSOURCE; {$EXTERNALSYM DMBIN_USER} DMBIN_USER = $100; { device specific bins start here }

← →
KilkennyCat © (2008-12-03 00:47) [2]

http://www.delphisources.ru/pages/faq/base/change_printting_options.html

Ну, я думаю, дальше сам осилишь.

Логика поиска ответа: открываем printer.pas, находим [1], берем гугль...

← →
Германн © (2008-12-03 01:31) [3]

> KilkennyCat © (03.12.08 00:47) [2]

Имхо, тут еще может быть проблема именно из-за QR. Его автор всю жизнь жаловался на проблемы с принтерами. А его пользователи постоянно жаловались на его кривизну. И на невозможность порой понять в чём проблема. Вот в апреле нужно было срочно сделать маленькую программку, которая готовит отчет особого рода, который не заложен в основную программу. Сделал на Д6. Ничего не измышлял особенного. Использовал стандартное QRPreview. И с тех пор не могу понять, почему в ~10% случаев открытия окна превью кнопка печати отчета доступна, а в остальных 90% нет? Статистику за этот период набрал большую, но никаких причинно-следственных связей в ней так и не обнаружил. Плюнул. При недоступности кнопки печати, записываю отчет в qrp-файл, тут же загружаю его и кнопка доступна. Печатаю.

← →
KilkennyCat © (2008-12-03 02:01) [4]

> Германн ©

Есть такое дело. Причем, ответ был один - кривые драйвера принтера.
Лично я сразу отказался от QR.

← →
Германн © (2008-12-03 02:15) [5]

> KilkennyCat © (03.12.08 02:01) [4]
>
>
> > Германн ©
>
> Есть такое дело. Причем, ответ был один - кривые драйвера
> принтера.
> Лично я сразу отказался от QR.
>

Ну мне сложнее было. Кроме QR я ничего не знаю, а изучать что-то ещё не было ни времени, ни желания.

← →
KilkennyCat © (2008-12-03 02:20) [6]

> Кроме QR

существуют RTF файлы :)

← →
Германн © (2008-12-03 02:34) [7]

> KilkennyCat © (03.12.08 02:20) [6]
>
>
> > Кроме QR
>
> существуют RTF файлы :)
>

Существует ещё много чего. Но это многое требует изучения.

← →
KilkennyCat © (2008-12-03 02:36) [8]

Нееее... это QR реально требует изучения. А сгенерить ртф - что может быть проще?

← →
Германн © (2008-12-03 02:49) [9]

> KilkennyCat © (03.12.08 02:36) [8]
>
> Нееее... это QR реально требует изучения. А сгенерить ртф
> - что может быть проще?
>

Ну хорошо. Скажем так. Я этого не умею.
Я не умею "сгенерить ртф". Я не умею вывести на печать "сгенерированный ртф" в виде набора таблиц.
Да я вообще много чего не умею.:(
Но мне пока и того, что я умею, хватает. Ведь платят! :)

← →
asail (2008-12-03 10:20) [10]

> Имхо, тут еще может быть проблема именно из-за QR.

Вот у меня тоже такое подозрение... Я вообще не понимаю нафига давать свойство устанавливающее выходной лоток бумаги и не иметь свойство для входного лотка!!! ИМХО, второе нужнее чаще. Кстати, есть подозрение, что там путаница какая-то. Ибо свойство для выходного лотка, а набор констант как раз из
> KilkennyCat © (03.12.08 00:43) [1]
.
Сегодня покопаюсь в исходниках QR.
Использовать чего другое не могу, ибо проект не мой.

← →
clickmaker © (2008-12-03 15:21) [11]

> Я не умею "сгенерить ртф". Я не умею вывести на печать "сгенерированный
> ртф" в виде набора таблиц.

есть еще Excel )

← →
KilkennyCat © (2008-12-03 15:31) [12]

> Германн © (03.12.08 02:49) [9]
>
> Но мне пока и того, что я умею, хватает. Ведь платят! :)

Эх, а мне не платят... Наверное, потому что, нехватает.

← →
Anatoly Podgoretsky © (2008-12-03 15:35) [13]

> KilkennyCat (03.12.2008 15:31:12) [12]

Мировой кризис.

← →
KilkennyCat © (2008-12-03 15:50) [14]

> Anatoly Podgoretsky ©

Возьмете меня к себе на работу?

← →
Anatoly Podgoretsky © (2008-12-03 16:06) [15]

> KilkennyCat (03.12.2008 15:50:14) [14]

У нас тоже экономия.

← →
asail (2008-12-03 20:21) [16]

Извините, что перебиваю... :)
Проблему разрешил - там, оказывается, в QR есть массив кодов для разных типов лотков. Беда в том что эти значения не совсем соответствуют кодам лотков в принтерах, причем у разных принтеров они РАЗНЫЕ! Так, например, "Tray 1" в HP4100 имеет код 260, а в Lexmark E350d - 279. А в QR все известные ему коды находятся в диапазоне 1..14. Так-что перед печатью надо слать:
Rep.PrinterSettings.UseCustomBinCode := True; Rep.PrinterSettings.CustomBinCode := TrayId;
Ну, а дальше задача свелась к определению возможных кодов лотков для каждого конкретного типа принтера (я ее решил аж двумя способами).

← →
asail (2008-12-03 20:22) [17]

> Эх, а мне не платят...

А у нас сегодня несколько человек разом уволили... :(

← →
Германн © (2008-12-04 00:17) [18]

> . А в QR все известные ему коды находятся в диапазоне 1.
> .14.

Вот-вот. Я помню просьбу автора QR присылать ему сведения о принтерах разной системы. Хотел объять необъятное. Вот Ворд, к примеру, не пытается сам задавать параметры принтеру.

← →
sammi (2009-02-03 14:59) [19]

Удалено модератором

← →
имя (2009-02-05 04:58) [20]

Удалено модератором

← →
имя (2009-02-05 07:16) [21]

Удалено модератором

← →
имя (2009-02-05 09:34) [22]

Удалено модератором

← →
имя (2009-02-05 21:05) [23]

Удалено модератором

← →
имя (2009-02-06 00:50) [24]

Удалено модератором

← →
имя (2009-02-06 00:57) [25]

Удалено модератором

← →
имя (2009-02-06 01:00) [26]

Удалено модератором

Не рабтает смена лотка в QuickReport Найти похожие ветки