![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
IbDatabase [D5, IB6.x, ]
Venus © (2001-12-06 10:23:00)Помогите!
Как мне обработать ошибку ввода пароля при Connected? На какое собитие вешать ?
Как где выловить нажатие пользователем Cansel, чтобы дальше не загружался проект.
Заранее спасибо!
Venus (2001-12-06 10:47:00) [1]Спасибо
TSV (2001-12-06 10:37:00) [2]Вот мой код для 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;
Удачи.