0 / 0 / 0
Регистрация: 02.08.2012
Сообщений: 5
1

Видимость кнопки в зависимости от Авторизации

02.08.2012, 14:30. Показов 2367. Ответов 2
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Здравствуйте! Я только начинаю программировать в Delphi! Прошу помочь мне с 1 проблемкой! Суть проблемы такова: Есть программа, для входа в которую нужна авторизация! Нужно сделать так, чтобы при входе Админа в последующих Формах кнопки были видны, а при входе остальных нет! Написал я это так:

begin
dostup:=False;
begin
if (edt1.Text='Admin') and (edt2.text='asqwer') then
dostup:=True;
Form2.frm9.btn1.Visible := True;

if (edt1.Text='USER') and (edt2.text='11111') then
dostup:=True;
Form2.frm9.btn1.Visible := False;

end;

if dostup then
begin
Form2.Show
end
else
Form3.show;

end;

Кнопка находится на Форме 2 в Фрэйме 9! При запуске программы кнопка не видна никому! По умолчанию кнопка выставлена как Visible false! Помогите плиз)
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
02.08.2012, 14:30
Ответы с готовыми решениями:

Видимость кнопки в зависимости от роли пользователя
Если у меня такой код, как сделать чтобы показывала кнопка у одного пользователя using System;...

Видимость кнопки в зависимости от статуса пользователя
Ребят привет. В общем дело в следующем. У меня около 20 форм, при открытии программы он запрашивает...

Видимость и не видимость кнопки на форме
Как, в Лазарус, сделать так, чтобы на форме кнопка сначала была не видна, а при наведении на то...

Видимость компонентов в зависимости от состояния CheckBox
Здравствуйте, ув. форумчане! У меня один нелепый вопрос с каким я не могу разобраться вот у меня...

2
210 / 169 / 24
Регистрация: 24.04.2012
Сообщений: 615
02.08.2012, 15:28 2
Лучший ответ Сообщение было отмечено xLEOx как решение

Решение

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
begin
  dostup:=False;
  if (edt1.Text='Admin') and (edt2.text='asqwer') then
  begin
    dostup:=True;
    Form2.frm9.btn1.Visible := True;
  end;
  if (edt1.Text='USER') and (edt2.text='11111') then
    dostup:=True;
  if dostup then
     Form2.Show
  else
    Form3.show;
end;
0
0 / 0 / 0
Регистрация: 02.08.2012
Сообщений: 5
03.08.2012, 06:52  [ТС] 3
Вставил ваш код, но не помогло((( Не видно кнопки при входе Администратором(((( Может быть у кнопки свойства какие-нибудь выставлены были??
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
03.08.2012, 06:52
Помогаю со студенческими работами здесь

Видимость объекта в зависимости от состояния CheckBox
Как сделать чтобы при отмеченном флажке Visible ставился на True, а на снятом флажке на False

Видимость кнопки
Добрый день! Нужна помощь, в накладной при сумме <1000 должна статьyt видимой кнопка ввод на...

Видимость кнопки
Всем привет, возникли проблемы с QT (новичок). Есть кнопка, посылает сигнал clicked самой себе, вот...

Видимость свойства объекта в PropertyGrid в зависимости от двух других свойств
Организовать видимость свойства объекта в PropertyGrid в зависимости от другого свойства можно...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru