Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];




Вниз

IbDatabase 


Venus   (2001-12-06 10:23) [0]

Помогите!
Как мне обработать ошибку ввода пароля при Connected? На какое собитие вешать ?
Как где выловить нажатие пользователем Cansel, чтобы дальше не загружался проект.

Заранее спасибо!



TSV   (2001-12-06 10:37) [1]

Вот мой код для TDatabase. LoginPrompt = True.

procedure TDataModule1.DataModuleCreate(Sender: TObject);
begin
try
// открытие БД
Database1.Open;
except
on E: Exception do
begin
MessageBeep(MB_ICONEXCLAMATION);
MessageDlg("Ошибка открытия БД. Приложение будет закрыто." +
#13#13 + E.Message, mtError, [mbOk], 0);
Application.Terminate;
Exit;
end;
end; // try
end;

Удачи.



Venus   (2001-12-06 10:47) [2]

Спасибо




Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.71 MB
Время: 0.035 c
3-21956           Севостьянов Игорь     2001-12-05 17:56  2002.01.08  
Программно выполнить SHUTDOWN IMMEDIATE


14-22378          модератор             2001-11-08 07:51  2002.01.08  
>Merilin


1-22018           DelphiG               2001-12-18 01:51  2002.01.08  
Печать текста из Memo! У меня что то не так....


3-21945           asafr                 2001-12-04 18:11  2002.01.08  
FastReport. frBand.Visible


4-22460           Dimich                2001-11-01 08:49  2002.01.08  
Люди-HELP!!! Дисер горит!!!