Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > БД в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 17.05.2018, 11:07   #11
SuweR
Пользователь
 
Регистрация: 11.05.2017
Сообщений: 17
По умолчанию

У меня эта программа для защиты курсовой, мне сказали сделать распределение прав доступа
SuweR вне форума Ответить с цитированием
Старый 17.05.2018, 11:41   #12
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,238
По умолчанию

Цитата:
Сообщение от SuweR Посмотреть сообщение
У меня эта программа для защиты курсовой
в курсовой тоже надо делать всё хорошо и надёжно.

Цитата:
Сообщение от SuweR Посмотреть сообщение
мне сказали сделать распределение прав доступа
ага. я это уже понял.
Делайте, я не против. Даже помогу, чем смогу.
Serge_Bliznykov вне форума Ответить с цитированием
Старый 17.05.2018, 11:53   #13
SuweR
Пользователь
 
Регистрация: 11.05.2017
Сообщений: 17
По умолчанию

А что вместо Usermode написать?
SuweR вне форума Ответить с цитированием
Старый 17.05.2018, 11:58   #14
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,238
По умолчанию

Цитата:
Сообщение от SuweR Посмотреть сообщение
А что вместо Usermode написать?
скажу, когда Вы ответите на мой вопрос

Цитата:
Сообщение от Serge_Bliznykov Посмотреть сообщение
3) я Вас спрашивал, где у Вас хранятся права пользователя?
Цитата:
Сообщение от Serge_Bliznykov
как Вы отличаете пользователя/админа/руководителя друг от друга.
Как?
Никак не отличаете?
Serge_Bliznykov вне форума Ответить с цитированием
Старый 17.05.2018, 12:02   #15
SuweR
Пользователь
 
Регистрация: 11.05.2017
Сообщений: 17
По умолчанию

В базе данных, в таблице users, есть поля Login и Pass, в поле Login как раз и находятся User, Guide и Admin, а в поле Pass пароль от них
SuweR вне форума Ответить с цитированием
Старый 17.05.2018, 13:30   #16
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,238
По умолчанию

Цитата:
Сообщение от SuweR Посмотреть сообщение
в поле Login как раз и находятся User, Guide и Admin
о, как запущено. А если, ВДРУГ, нужно будет ещё одного или двух пользователей добавить? А логин User уже занят. Всё, задача не имеет решения?!

Мой совет, не привязывайтесь к логину.
Не хотите нормальную систему, не надо, но хотя бы минимальную универсальность и гибкость система должна же иметь!

Добавьте в таблицу users ещё одно поле, например, USERRIGHTS
вот туда и записывайте ваши "User, Guide и Admin"

тогда
в Glavnoe_Okno добавить переменную usermode:
Код:
type
  TForm2 = class(TForm)
    ....
  private
    { Private declarations }
  public
    { Public declarations }
    usermode : string; 
  end;

а при проверке логина/пароля заполнять эту переменную

Код:
     DataModule1.adoquery1.sql.add('select PASS, USERRIGHTS from users where login='+#39+Log.Text+#39);
     DataModule1.adoquery1.Open;
     if DataModule1.Adoquery1.isEmpty then
        showmessage('Ïîëüçîâàòåëü'+Log.Text+'íå íàéäåí') 
    else
      if DataModule1.Adoquery1.FieldbyName('PASS').value = Password.Text then begin
         Glavnoe_Okno.usermode := DataModule1.Adoquery1.FieldbyName('USERRIGHTS').value;
         Glavnoe_Okno.Show;
      end
      else
           showmessage('Ïàðîëü íå âåðíûé');
   DataModule1.adoquery1.Close;


p.s. кстати, английское слова Guide (Гид) выбрано не очень удачно.
это больше "руководство, гид, путеводитель, проводник, экскурсовод, ориентир"
(руководство тут больше в смысле инструкция по использованию).
Serge_Bliznykov вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

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

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Ошибка Cannot focus a disabled or invisible window. sedoq Общие вопросы Delphi 3 01.02.2012 07:45
Button.Visible lblondy Компоненты Delphi 3 08.06.2011 21:47
Visible [Smarik] Помощь студентам 2 28.03.2008 18:01