Ограничение прав доступа

@vasadisim · Регистрация: 19.12.2011

Студворк — интернет-сервис помощи студентам

Есть программа, 1 окно авторизация, два выбора админ и пользователь, админу доступен dbnavigator, а пользователю нужно чтобы был доступен только на одной форме. Суть проблемы: после выбора пользователя, открывается окно меню, при клике на пункт меню открывается форма на которой расположен bdnavigator. Вопрос как мне отключить его видимость, прописав в юните для регистрации. (что прописать?)
Form3.DBNavigator1.Visible:=False; не прокатывает.

@korep · 04.07.2014, 18:03

пунктменю.enable = false

Добавлено через 30 секунд
это залочит нажатие кнопки

@vasadisim · 04.07.2014, 18:08 **[ТС]**

korep, мне нужен просмотр этой формы, но не нужна полная блокировка

@korep · 04.07.2014, 18:11

тогда таким же образом заблокируйте все на форме, это свойство есть у всех элементов

@vasadisim · 04.07.2014, 18:36 **[ТС]**

Delphi
1
2
Form3.DataSource1.Enabled:=False;
Form3.DBNavigator1.Enabled:=False;

Что-то не получается. Я думаю из-за того что при клике на пункт меню происходит создание формы, и

Delphi
1
2
Form3.DataSource1.Enabled:=False;
Form3.DBNavigator1.Enabled:=False;

уже не учитывается

Добавлено через 15 минут
Есть у кого какие идеи?

@korep · 04.07.2014, 18:42

так на методе формы onShow и делайте

@vasadisim · 04.07.2014, 18:57 **[ТС]**

как это реализовать? можно пример, просто не очень понимаю

@korep · 04.07.2014, 19:07

1. выберите объект на форме (саму форму)
2. слева внизу экрана окно там две вкладки выбираете Events
3. Ищите onShow в списке
4. DblClick по соседней пустой области и пишите код

@vasadisim · 04.07.2014, 19:16 **[ТС]**

korep, Спасибо большое, все получилось) Тема закрыта

Новые блоги и статьи Все статьи Все блоги /
Thinkpad X220 Tablet — это лучший бюджетный ноутбук для учёбы, точка. Programma_Boinc 23.12.2025 Рецензия / Мнение/ Перевод Нашел на реддите интересную статью под названием The Thinkpad X220 Tablet is the best budget school laptop period . Ниже её машинный перевод. Thinkpad X220 Tablet —. . .	PhpStorm 2025.3: WSL Terminal всегда стартует в ~ and_y87 14.12.2025 PhpStorm 2025. 3: WSL Terminal всегда стартует в ~ (home), игнорируя директорию проекта Симптом: После обновления до PhpStorm 2025. 3 встроенный терминал WSL открывается в домашней директории. . .	Как объединить две одинаковые БД Access с разными данными VikBal 11.12.2025 Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.	Новый ноутбук volvo 07.12.2025 Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro	Музыка, написанная Искусственным Интеллектом volvo 04.12.2025 Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .
От async/await к виртуальным потокам в Python IndentationError 23.11.2025 Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .	Поиск "дружественных имён" СОМ портов Argus19 22.11.2025 Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .	Сколько Государство потратило денег на меня, обеспечивая инсулином. Programma_Boinc 20.11.2025 Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .	Ломающие изменения в C#.NStar Alpha Etyuhibosecyu 20.11.2025 Уже можно не только тестировать, но и пользоваться C#. NStar - писать оконные приложения, содержащие надписи, кнопки, текстовые поля и даже изображения, например, моя игра "Три в ряд" написана на этом. . .	Мысли в слух kumehtar 18.11.2025 Кстати, совсем недавно имел разговор на тему медитаций с людьми. И обнаружил, что они вообще не понимают что такое медитация и зачем она нужна. Самые базовые вещи. Для них это - когда просто люди. . .

@vasadisim 1 / 1 / 0 Регистрация: 19.12.2011 Сообщений: 96

	Ограничение прав доступа 04.07.2014, 17:59. Показов 2614. Ответов 8 Метки нет (Все метки) Есть программа, 1 окно авторизация, два выбора админ и пользователь, админу доступен dbnavigator, а пользователю нужно чтобы был доступен только на одной форме. Суть проблемы: после выбора пользователя, открывается окно меню, при клике на пункт меню открывается форма на которой расположен bdnavigator. Вопрос как мне отключить его видимость, прописав в юните для регистрации. (что прописать?) Form3.DBNavigator1.Visible:=False; не прокатывает. 0

@korep 52 / 45 / 18 Регистрация: 06.01.2013 Сообщений: 626
	04.07.2014, 18:03
	пунктменю.enable = false Добавлено через 30 секунд это залочит нажатие кнопки 0

@vasadisim 1 / 1 / 0 Регистрация: 19.12.2011 Сообщений: 96
	04.07.2014, 18:08 [ТС]
	korep, мне нужен просмотр этой формы, но не нужна полная блокировка 0

@korep 52 / 45 / 18 Регистрация: 06.01.2013 Сообщений: 626
	04.07.2014, 18:11
	тогда таким же образом заблокируйте все на форме, это свойство есть у всех элементов 0

@korep 52 / 45 / 18 Регистрация: 06.01.2013 Сообщений: 626
	04.07.2014, 18:42
	так на методе формы onShow и делайте 0

@vasadisim 1 / 1 / 0 Регистрация: 19.12.2011 Сообщений: 96
	04.07.2014, 18:57 [ТС]
	как это реализовать? можно пример, просто не очень понимаю 0

@korep 52 / 45 / 18 Регистрация: 06.01.2013 Сообщений: 626
	04.07.2014, 19:07
	Сообщение было отмечено vasadisim как решение Решение 1. выберите объект на форме (саму форму) 2. слева внизу экрана окно там две вкладки выбираете Events 3. Ищите onShow в списке 4. DblClick по соседней пустой области и пишите код 1

@vasadisim 1 / 1 / 0 Регистрация: 19.12.2011 Сообщений: 96
	04.07.2014, 19:16 [ТС]
	korep, Спасибо большое, все получилось) Тема закрыта 0

Ограничение прав доступа

Решение