Админка на Delphi

[fobass]

Здравствуйте уважаемые программисты. Я пишу дипломную работу (наконец-то)
У меня маленькое, проблема. И так есть БД на SQL-SERVER 2005, есть таблица ”Пользователи” где есть паля
Код >int; Имя>varchar;Фамилия>varchar;Логин>v archar;Пароль>varchar; Access>int;
На Delphi 7 есть форма, все связано все показывает. При загрузки запускается форма где просит аутоидентификацию юзера. Есть админ (может быть несколько админов) он может удалять, изменять и.т.д . записи в БД и юзеров . Вот здесь и проблема, мне надо идентифицировать юзеров и админов
Т.е когда зашел юзер то некоторые элементы главной формы (кнопки, всякие админские панели и.т.д) вскрывались .
И еще.
И при добавлении нового юзера (см. Рис.1) на вкладке ”Прочее” (см. Рис.2) в CheckListBox1'е есть все таблицы этой БД. Мне надо чтоб при CheckListBox1.Selected[0] юзер смог видеть только таблицу ”Товары” и смог удалять записи при CheckBox1.Checked=true;
Как решить мне вот эти две проблемы.

[Lauraldo]

Может добавить поле IsAdmin в таблицу? Или использовать для этого уже имеющееся поле Access - для чего-то оно ведь надо.

И ифом, ифом - он и вторую проблему заодно решит.

З.Ы. Аутентификация (authentification). Аутоидентификацию комиссия не поймет)))

[mihali4]

А что, такие строки не работают ?

CheckListBox1.ItemEnabled[1]:=False;
CheckListBox1.ItemEnabled[2]:=False;
CheckListBox1.ItemEnabled[3]:=False;
CheckListBox1.ItemEnabled[4]:=False;

Или вы в свойствах используемых компонентов принципиально разбираться не хотите ?