Вниз
Скачать: CL | DM;

Как красиво обработать отказ от логина к базе?   Найти похожие ветки 

← →
Filat ©   (2003-05-02 16:18) [0]

т.е. если пользователь вместо ввода пароля нажал ESC то появляется сообщение об ошибке, а как это сделать красиво, скажем, не хошь ... ну и пшел ... :))))


← →
Filat ©   (2003-05-03 15:10) [1]

Неужели никто такого не делал? Быть такого не может ... :))))


← →
Zacho ©   (2003-05-03 15:55) [2]


> Filat © (03.05.03 15:10)

Все делали. Просто твой вопрос слишком абстрактный. Без информации о том, как именно ты делаешь подключение к базе - ответить на него невозможно.


← →
Filat ©   (2003-05-07 15:31) [3]

IBDatabase1.Connected:=True;
IBTransaction1.Active:=True;
IBTable1.Active:=True;
IBTable2.Active:=True;
IBTable3.Active:=True;

Так вот, при IBDatabase1.Connected:=True; появляется диалоговое окно ввода логина и пароля. Ну вот, юзер вместо ввода нажал ESC, появляется сообщение об ошибке, так вот, как вместо этого сообщения вывести своё, понятное и красивое?


← →
Danilka ©   (2003-05-07 15:40) [4]

Filat © (07.05.03 15:31)

1 путь, типа этого:
IBDatabase1.Connected:=True;
if IBDatabase1.Connected=True then begin
IBTransaction1.Active:=True;
IBTable1.Active:=True;
IBTable2.Active:=True;
IBTable3.Active:=True;
end;

2 путь более правильный:
сделай LoginPrompt:=false;
нарисуй свою форму запроса имени/пароля, можно сделать выбор базы, можно прикрутить выпадающий список юзеров, вообще, кучу всяких "красивостей". Если на этой форме нажата кнопка OK, то пишешь user_name и password в параметры IBDatabase1 и все остальное, как у тебя было.


← →
WarLord ©   (2003-05-07 15:51) [5]

try
IBDatabase1.Connected:=True;
IBTransaction1.Active:=True;
IBTable1.Active:=True;
IBTable2.Active:=True;
IBTable3.Active:=True;
except
ShowMessage("Спасибо, до свидания");
exit;
end;


← →
Filat ©   (2003-05-07 16:36) [6]

WarLord <- Работает, спасибо! Супер, ... и почему сам недотумкал .... мабуть мало опыта :((
Ещё раз спасибо!


← →
WarLord ©   (2003-05-07 16:39) [7]


> Filat ©

опыт - дело наживное ;)



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

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



Память: 0.46 MB
Время: 0.012 c
14-95114
Yorick
2003-05-11 23:01
2003.05.29
ОС на Delphi


14-95081
Дмитрий К.К.
2003-05-10 13:39
2003.05.29
Именинники 10 мая


1-94825
Raduga
2003-05-19 14:52
2003.05.29
определение объема занимаемой памяти


14-95015
Slawic
2003-05-12 23:28
2003.05.29
Виртуальная память


1-94968
edicon
2003-05-18 19:23
2003.05.29
Опять ExcelApplication




   Наверх