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

Вниз

Как вызвать окно ввода логина и пароля в БД   Найти похожие ветки 

← →
TSV   (2002-01-29 10:34) [3]

ИМХО, лучше просто закрыть приложение при неправильном вводе пароля. Я делаю вот так:

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;

Удачи.

---

Страницы: 1 вся ветка

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

Наверх

Память: 0.43 MB
Время: 0.003 c