Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > Базы данных
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 05.10.2013, 20:52
Ghost_91aa Ghost_91aa вне форума
Прохожий
 
Регистрация: 10.11.2012
Сообщения: 6
Репутация: 10
По умолчанию Авторизация перед запуском программы

Здравствуйте. Нужно реализовать авторизацию, от того какой пользователь авторизуется будет зависеть какие возможности программа предоставит пользователю. Пользователи хранятся в таблице users БД FB.
В интернете нашел такой способ реализации, который как раз подходит мне: http://delphiru.ru/interface/117-dis...orm-is-created

Проблема в том, что DataModule создается после благополучной авторизации, а чтобы авторизоваться нужно сначала подключиться к БД. Возможно ли как то подключиться к БД заранее? Если да, то как?
Ответить с цитированием
  #2  
Старый 05.10.2013, 21:05
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,096
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Можно просто создать DataModule вручную в момент создания главной формы. Т.е. "выкидываешь" модуль данных из списка автосоздания, а в OnCreate главной формы пишешь что-то типа такого:
Код:
procedure TMainForm.FormCreate(Sender : TObject);
begin
  DataModule1 := TDataModule1.Create(Application);
  ...
end;
Ответить с цитированием
  #3  
Старый 05.10.2013, 21:09
Ghost_91aa Ghost_91aa вне форума
Прохожий
 
Регистрация: 10.11.2012
Сообщения: 6
Репутация: 10
По умолчанию

Спасибо, вот именно это меня и интересует.
Вот только главное форма создается после того как в форме Login выполнится условие, значит нужно к ней OnCreate писать?

Последний раз редактировалось Ghost_91aa, 05.10.2013 в 21:11.
Ответить с цитированием
  #4  
Старый 05.10.2013, 22:11
Аватар для Uniq!
Uniq! Uniq! вне форума
Местный
 
Регистрация: 29.09.2010
Сообщения: 539
Версия Delphi: Delphi XE3
Репутация: 374
По умолчанию

Вот уважаемый Freeman рассказывал мне, как организовать показ
дополнительной формы (авторизации в вашем случае) перед тем, как основная форма станет доступной.
Тема для чтения

Последний раз редактировалось Uniq!, 05.10.2013 в 22:28.
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра
Комбинированный вид Комбинированный вид

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 04:20.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025