Компьютерный форум
Правила
Вернуться   Компьютерный форум > Форум программистов > Программирование под Windows > Delphi
Перезагрузить страницу Авторизация
Ответ
 
Опции темы Опции просмотра
  (#1 (permalink)) Старый
staziah2 staziah2 вне форума
Member
 
Сообщений: 18
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Регистрация: 24.03.2015
По умолчанию Авторизация - 20.05.2015, 08:12

Добрый день! Понимаю что,это тема заезжена вдоль и поперек,но видимо пока не доходит до меня. Имеется wwDBLookupCombo,Edit,Button. БД:MSSQL 2000. Так вот,здесь надо,чтобы 76 отдел имел полный доступ,то бишь 76 отдел это как бы admin, а остальные цеха и отделы это пользователи. И мне надо,чтобы 76 отдел мог смотреть всё,а другие в ту же форму,но ограниченно.
Вот код:
delphi Код:
procedure TForm7.Button1Click(Sender: TObject);
var login,parol:String;
begin
login:=Form7.wwDBLookupCombo1.Text;
parol:=Form7.Edit1.Text;
begin
  DM.ADOQuery1.Close;
  DM.ADOQuery1.SQL.Clear;
  DM.ADOQuery1.SQL.Add('select * from [password] where ((Cex='''+login+''')and (parol='''+parol+'''))');
  DM.ADOQuery1.Open;
   if not DM.ADOQuery1.IsEmpty then
    begin
    Form3.Show;                        //это могут просматривать пользователи
     Form3.D1.Visible:=false;
   
      end
   else
   begin
    MessageDlg('Неправильно введено отдел или пароль',mtError,[mbOK],0);
   end;
  end;
 end;
Ну никак не могу сообразить,что нужно прописать,что 76 отдел мог смотреть все формы(главная форма Form3,а от этой формы и идут другие формы).
Ответить с цитированием
Ads
Ответ

Опции темы
Опции просмотра

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

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Trackbacks are Вкл.
Pingbacks are Вкл.
Refbacks are Выкл.


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Слетает авторизация RustyIron О сайте и форуме 3 20.01.2013 18:04
Автоматическая авторизация ВоВаНС Софт и программы 18 09.07.2012 12:59
(VBS) Авторизация и скачивание файла NotFound Программирование под Windows 0 22.12.2011 23:49
Авторизация программы в приложении JanS C++ Builder 1 26.07.2010 16:50
Windows авторизация в ASP.NET van.der.er .NET 0 01.12.2008 15:16
Авторизация на PHP+MySQL? DENIM_DIM PHP 2 04.04.2008 16:23
Авторизация пользователя imported_Ivo .NET 5 15.11.2007 13:15
Авторизация на входе Lesh PHP 1 15.04.2005 12:53
phpBB - авторизация Diver PHP 9 01.02.2005 14:41
Авторизация zornig PHP 1 07.10.2004 16:07
Авторизация на сайте se7en PHP 4 09.06.2004 01:27
[b]Повторная авторизация[/b] kostyan PHP 1 06.05.2004 19:18



Powered by vBulletin® Version 3.8.7
Copyright ©2000 - 2018, Jelsoft Enterprises Ltd.
Нardforum.ru - компьютерный форум и программирование, форум программистов