Скачать: CL | DM;

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

← →
Dima Kopachev   (2002-01-29 01:06) [0]

Как вызывать это окно так, чтобы после неправильного вводапароля я опять попадал на него или в состояние, предшествующее вызову этого окошка

---

← →
Olfi ©   (2002-01-29 01:51) [1]

Странный вопрос... Если ты ввёл ниправильный пароль или логин, то это окно и так появляется снова.

---

← →
panov ©   (2002-01-29 07:15) [2]

>Dima Kopachev (29.01.02 01:06)
while not Database.Connected do Database.Open;

---

← →
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;

Удачи.

---

← →
Dima Kopachev   (2002-01-29 10:41) [4]

У меня в БД есть несколько таблиц. При открытиии БД я ввожу пароль и логин и после я делаю активной таблицу:
DM->Query1->Active=true;
Опять вылезает окошко с просьбой ввести логин и пароль. Ведь я уже ввел все что нужно первый раз при соединении с БД.

---

← →
TSV ©   (2002-01-29 10:48) [5]

Могу ошибаться, но по-моему, ты не используешь компонент TDatabase. Отсюда эти грабли.

---

← →
Dima Kopachev   (2002-01-29 11:30) [6]

Использую. У меня есть datamodule. На него положил TDataSource,
TDatabase, TQuery. В TDatabase прописал:
SERVER NAME=C:\MastApp\DB\dbmast.gdb
USER NAME=SYSDBA
PASSWORD=masterkey
Отключил галку Login Promt. До запуска программы TQuery->Active=false. Когда запускаю программу подключаюся к БД, а потом DM->Query1->Active=true. 2 раза приходится вводить пароль и логин (в 2 окошка).

---

← →
Desdechado ©   (2002-01-29 11:39) [7]

в каждой query.databasename пропиши имя своего TDatabase, а то сейчас они у тебя сами по себе к БД подключаются

---

← →
TSV ©   (2002-01-29 11:47) [8]

Вот и я то же самое имел в виду.

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.006 c