Текущий архив: 2007.04.15;
Скачать: CL | DM;
Вниз
TPrintDialog + отсутствие принтеров в системе Найти похожие ветки
← →
Darvin © (2007-03-26 14:02) [0]Здравствуйте!
У меня таким образом организован процесс печати:
if PrintDialog.Execute then begin
try
Printer.BeginDoc;
try
...
<Прорисовка на канве принтера>
...
finally
Printer.EndDoc;
end;
end;
except
<Сообщение об ошибке при печати>
end;
Когда принтер подсоединен, все прекрасно работает, но когда в системе нет ни одного принтера, при вызове PrintDialog.Execute возникает ошибка: There is no default printer currently selected и программа "вылетает". Как сделать корректно обработку подобной ситуации с PrintDialog?
← →
RASkov (2007-03-26 14:07) [1]Printer.Printers.Count
← →
RASkov (2007-03-26 14:08) [2]или Printer.PrinterIndex проверять....
← →
Darvin © (2007-03-26 14:11) [3]а диалог это сам не отрабатывает?
← →
Darvin © (2007-03-26 14:32) [4]Обращение к Printer.PrinterIndex в этой ситуации также выдает ошибку.
← →
RASkov (2007-03-26 14:44) [5]> [4] Darvin © (26.03.07 14:32)
А Printer.Printers.Count что говорит? не хочу удалять принтеры для проверки....
Страницы: 1 вся ветка
Текущий архив: 2007.04.15;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.047 c
