← →
Quart
(2007-09-13 10:39)
[0]
Проблема такая: Есть программа в ней используется QReport для создания отчетов и просмотра его. Программа при запуске выдает сообщение: «Exception EPrinter in module название_программы.exe at 0002DEFE. Printer selected is not valid». После этого программа вылетает.
Как сделать программно проверку на доступность принтера при запуске программы или отключить эту проверку, что-бы ошибка не вылетала? Или может быть есть какие-нибудь еще решения этой проблемы?
← →
Sergey13 ©
(2007-09-13 10:41)
[1]
У меня бывало нечто похожее когда в системе небыло установлено ни одного принтера.
← →
Johnmen ©
(2007-09-13 10:52)
[2]
Если программа написана реально на D6 с QR версии 3.xx соответственно, то данной проблемы быть не должно.
← →
Виталий Панасенко ©
(2007-09-13 11:36)
[3]
Принет не достпен либо
> Sergey13 © (13.09.07 10:41) [1]
← →
PEAKTOP ©
(2007-09-13 13:27)
[4]
> У меня бывало нечто похожее когда в системе небыло установлено ни одного принтера.
Или принтер сетевой, который не сразу откликается …
Исходные данные:
- модуль печати, написанный на Delphi 7, запускается из-под IIS 7.5, на сервере WIN 2008R2
- сетевой принтер HP P2050(установлен принтером по умолчанию)
- работа идет в терминальной сессии
вылетает по ошибке «Exception EPrinter in module print.exe at 00084612. There is no default printer currently selected. «
Похожие найденные проблемы:
http://www.delphikingdom.com/asp/answer.asp?IDAnswer=55205
https://stackoverflow.com/questions/2579946/quickreport-throws-there-is-no-default-printer-currently-selected-exception
Задача: обеспечить нормальную работу
«Копать» по идее можно с 2-х сторон: Дельфи и сервер 2008.
Мои раскопки пока ни к чему не привели. Очень нужна помощь.
Добавление: пользователи в терминале подключают и свои принтеры с помощью ScrewDrivers4.
На сервере 2003 все работало.
CoInitialize(nil);
ADOQuery1 := TADOQuery.Create(nil);
Ini := TIniFile.Create(ExtractFilePath(ParamStr(0)) + 'Him.ini');
ADOQuery1.ConnectionString := Ini.ReadString('Parameters', 'ConnectionString', '');
PrinterName := Ini.ReadString('Parameters', 'PrinterName', '');
...
PrinterNotFound := True;
for i := 0 to printer.Printers.Count - 1 do
if Printer.Printers[i] = PrinterName then
begin
Printer.PrinterIndex := i;
PrinterNotFound := False;
end;
Торговля
-
kms
- Сообщения: 2
- Зарегистрирован: Пн, 31 июл 2017, 06:52
Торговля
После отпуска не запускается программа, появляется надпись: Exception EPrinter in module toros.exe at 0005250E.
There is no default printer currently selected. Что она означает и что нужно делать?
-
kms
- Сообщения: 2
- Зарегистрирован: Пн, 31 июл 2017, 06:52
Re: Торговля
Непрочитанное сообщение
kms » Пн, 31 июл 2017, 07:36
kms писал(а):После отпуска не запускается программа, появляется надпись: Exception EPrinter in module toros.exe at 0005250E.
There is no default printer currently selected. Что она означает и что нужно делать?
Проблема устранена. Перевел и понял.