|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
27.09.2007, 15:12 | #1 |
Пользователь
Регистрация: 27.09.2007
Сообщений: 18
|
Вопрос по Менюшке ограничение прав доступа
Всем привет, решил спросить у вас Денверистов )))))) проблема в следующем:
Я написал прогу грубо говоря справочник на базе, и мне нужно сделать чтобы пользователи при запуске программы выбирали себя и вводили пароль. Затем у пользователей есть права на доступ к менюшке тоесть где то открыта вкладка где то закрыта, вот суть как мне это реализовать, в принцепе догадываюсь но я уверен что я не смогу сам за денверить Ребят помогите чем сможете мож исходник есть у кого-нибудь или подскажите где взять ))))) буду за много благодарен…… |
27.09.2007, 15:23 | #2 |
Старожил
Регистрация: 13.12.2006
Сообщений: 3,859
|
Казалось бы причем здесь сети...
ICQ не для вопросов, а для предложений. Для вопросов используйте форум
IRC канал клуба программистов|Мои статьи |
27.09.2007, 15:57 | #3 |
Пользователь
Регистрация: 27.09.2007
Сообщений: 18
|
так это же типо через сетку )))
|
28.09.2007, 11:31 | #4 |
Армия Рассейская
Форумчанин
Регистрация: 06.12.2006
Сообщений: 175
|
А каукую базу собираешься использовать? Если Intebaase или MySQL, MSSQL. то они поддерживают создание пользователей с разными правами.
Сделаем ночь ярче!!! - Ракетные войска стратегического назначения
Центральный клуб туристов РВСН |
28.09.2007, 12:13 | #5 |
детский тренер
Форумчанин
Регистрация: 08.06.2007
Сообщений: 532
|
если тебе нужно ограничить доступ к самой базе, то их ті определяешь при создании базі.... Если тебе нужно в соответствии с введеннім именем юзера изменять доступ к клмпонентам формі, например, закладок и т.д... То тебе нужно передать имя пользователя в форму и анализировать его:
if user='Ромашка' then Button1.Enabled:=false; или case используй...
Я злой и страФный серррый воФк, и в пАрАсятах знаю толк - ppp ppp pp p pp pp
|
28.09.2007, 13:59 | #6 |
Пользователь
Регистрация: 27.09.2007
Сообщений: 18
|
нет мне доступ к базе не нужно, просто пользователь выбрал себя и у него дапустим (1 это показать только Меню файл) и все остальный вкладки не рабоатют, я понел что там нужночерез иф только не пойму как с базой про анализировать тоетсь сравнение с 1 или там 2 или 3 и в зависемости у пользователя в поле стоит 1 то показывает. вот
|
28.09.2007, 16:23 | #7 |
Форумчанин
Регистрация: 16.04.2007
Сообщений: 298
|
Вот примерный алгоритм. У Вас БД Oracle (гулять, так гулять). В ней создаем таблицу, ну, например UsersApplication (пользователи приложения), в которую будут заноситься пользователи, с полями типа: UserID, UserName и т.д. После этого создаем еще одну таблицу UserRightApplication (права пользователей для приложения) с полями UserID, MenuName, IsUserRight (boolean), которая будет связывать меню приложения с пользователем и правами на использование. Дальше в своей программе, после запуска, пробегаешься по всем пунктам меню, и смотришь в БД, какой пункт данному пользователю доступен, ну и включаешь соответственно те, которые доступны и отключаешь те, которые недоступны.
На других БД, думаю ситуация будет точно такой же. Если идея непонятна, то что же, обращайтесь, разьясню.
Не надо ничего усложнять. Все достаточно тривиально.
|
01.10.2007, 09:37 | #8 |
Пользователь
Регистрация: 27.09.2007
Сообщений: 18
|
Вот смотрите я сделал чтобы пользователь выбрал себя и показал все позиции тоетсь я не чего не пытался сделать по провам доступа
procedure TForm9.Edit1KeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); var par: String; id : Integer; begin If Not(DBLookupComboBox1.Text='') then begin If key=13 then begin id:=DBLookupComboBox1.KeyValue; With IBDataSet1 do begin par:=FieldValues['PAROL']; if Not(Edit1.Text=par) then begin Form9.ModalResult:=mrCancel; ShowMessage('тыры пыры пароль не верен'); end else begin Form9.ModalResult:=mrOk; Form1.Show; Form9.Hide; end; end; end; end else Form9.ModalResult:=mrCancel; end; А как теперь сделать чтоб по провам? |
01.10.2007, 10:58 | #9 | |
Форумчанин
Регистрация: 16.04.2007
Сообщений: 298
|
Цитата:
Не надо ничего усложнять. Все достаточно тривиально.
|
|
01.10.2007, 11:23 | #10 |
Пользователь
Регистрация: 27.09.2007
Сообщений: 18
|
так чето не выходит ты там написал вася пубкин)))))))) я так думаю это не рационально потомучто парава должы браться из базы
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Вопрос авторских прав | SG13 | Свободное общение | 4 | 18.12.2009 01:14 |
Просмотр прав на папку | AstraBon | Безопасность, Шифрование | 0 | 10.06.2008 08:46 |
В чем я не прав?С++ | diden | Помощь студентам | 3 | 23.05.2008 18:32 |
Назначение прав пользователя | Seqular | Безопасность, Шифрование | 1 | 04.08.2007 16:48 |