Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Exception [D6, XP]


Quart ©   (2007-09-19 15:46:00) 

Пожскажите, как обработать ошибку, возникающую при запуске приложения;
понимаю, что для этих целей есть try-exception, но все было бы просто, если бы ошибка возникала по нажатию кнопки, когда приложение уже запущено.
А ошибка такая "Exception EPrinter in module название_программы.exe at 0002DEFE. Printer selected is not valid".


Германн   (2007-09-19 17:02:00) [1]


> С QR, вроде, действительно такая фигня была.

У QR проблемы с принтерами генетические.


evvcom   (2007-09-19 17:00:00) [2]

Тогда уж лучше виртуальный PDFPrinter


Ega23   (2007-09-19 16:16:00) [3]

С QR, вроде, действительно такая фигня была. Типа, Preview не будет работать, пока хотя бв одного принтера нету. Помню, по-быстрому обошли её, задав виртуальный принтер с параметром печати в файл.


Quart   (2007-09-19 16:13:00) [4]

Честно говоря, я никак не настраивал QuickRep на поиск принтеров.
Видимо, он по умолчанию так настроен. А как настроить так, чтобы прога не ругалась?
Если подскажете как, был бы очень признателен.


stone   (2007-09-19 16:02:00) [5]


> Quart   (19.09.07 15:59) [4]

А почему бы их в таком случае не искать непосредственно перед запуском QuickRep1.Preview. Да и какой вообще смысл в этом поиске.  QuickReport и так будет работать только с принтерами, зарегистрированными в твоей системе.


Quart   (2007-09-19 15:59:00) [6]

Понимаете, на форме есть QuickRep; по нажатию кнопки на форме выполняется QuickRep1.Preview. А доступные принтеры каждый раз при запуске приложения ищутся по сети. Видимо, когда прога их не видит и происходит ошибка.


umbra   (2007-09-19 15:57:00) [7]

uses ...., Printers, ......;

{...........................................}

procedure TForm1.ApplicationEvents1Exception(Sender: TObject;
 E: Exception);
begin
 if E is EPrinter then
   begin
     {делаете что хотите}
   end;
end;


Anatoly Podgoretsky   (2007-09-19 15:53:00) [8]

> stone  (19.09.2007 15:52:01)  [1]

Да еще к несуществующему


stone   (2007-09-19 15:52:00) [9]

а зачем у тебя программа при запуске сразу обращается к принтеру?


Наверх

Титульная страница Поиск, карта сайта Написать письмо