Форум: "Базы";
Текущий архив: 2003.11.24;
Скачать: [xml.tar.bz2];
ВнизОбход системной ошибки Найти похожие ветки
← →
чайник (2003-11-05 08:39) [0]Уважаемые мастера, помогите пожалуйста. Создаю диалог проверки имени пользователя и пароля. Как обойти состояние при неверном вводе имени или пароля, чтобы вместо системного сообщения выдать свое. Делаю следующим образом:
procedure TF1.Button1Click(Sender: TObject);
begin
lname:=f1.edit1.text;
lpwd:=f1.edit2.Text;
try
dat1.params.Clear;
dat1.Params.Add("User Name="+lname);
dat1.params.add("Password="+lpwd);
Dat1.connected:=true;
f1.hide;
gl.showmodal;
Except
On EDBEngineError do ShowMessage("вам нет доступа");
End;
end;
сначало выдает системное сообщение а потом при нажатии на run мое. Спасибо.
← →
ЮЮ (2003-11-05 08:43) [1]>сначало выдает системное сообщение
Это только в среде IDE. Запусти ехе-шник и его не увидишь
← →
Mike_Goblin (2003-11-05 08:44) [2]Меню Tools/Debuger Options закдадка Language Exception
сбросить флажок Stop on Delphi Exception. И будет Вам счастье :)
← →
ЮЮ (2003-11-05 08:46) [3]Да, возможность не замечать собсвенные ошибки - истинное счастье :-)
← →
чайник (2003-11-05 08:46) [4]Спасибо всем большое.
← →
Mike_Goblin (2003-11-05 08:51) [5]2 ЮЮ
А возможность их правильно обрабатывать в коде это просто нирвана :))))
← →
ЮЮ (2003-11-05 08:55) [6]2 Mike_Goblin © (05.11.03 08:51) [5]
> ... это просто нирвана
недостижимая при сброшенном флажке Stop on Delphi Exception :-( Или, наоборот, вечная ???
← →
Mike_Goblin (2003-11-05 09:19) [7]Применение в коде секций try except и try finally и написание в обработчике TApplication.OnException кода создания лога необработанных ошибок является сложнейшей задачей, требующей неимоверных усилий программиста и нетривиальных приемов программирования. :))) Как я при этом обхожусь без флажка Stop on Delphi Exception сам не знаю :))))
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2003.11.24;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.009 c