Открытие второй формы только после ввода пароля на первой

@Настя_111 · Регистрация: 12.05.2010

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

Приветик всем
у мня тут проблемка помогите пожалуста

мне нада чтобы при нажатии на кнопку BitBtn1, она запрашивала пароль, а после ввода пароля открывала вторую форму. А без пароля неоткрывала.

@FuKingBrain · 30.11.2010, 10:24

Создай форму в которой будешь спрашивать пароль. При клике по кнопки, сначала фызывай форму для ввода пароля, а потом всё то что нужно.

@Lord_Voodoo · 30.11.2010, 10:28

Настя_111, ну и в чем собственно проблема?

@Настя_111 · 30.11.2010, 12:49 **[ТС]**

Я создала форму
при нажатии на кнопку, я там прописала Form2.ShowModal;
у меня открывается следующая, а как сделать чтобы перед открытием спрашивала пароль

@Lord_Voodoo · 30.11.2010, 12:52

Настя_111, создайте форму для авторизации и делайте ей showmodal в событии OnCreate или конструкторе главной формы

@Настя_111 · 06.12.2010, 20:34 **[ТС]**

Lord_Voodoo вы непонимаете, я уже все это зделала
мне нада чтобы при открытии той формы которой я прописала ShowModal она неоткрывалась пока небудет введен пароль

@Vangok · 06.12.2010, 20:54

Так в авторизации будет логин и пароль?
Сколько пользователей будет иметь доступ?
Будут ли у них пользователей права: Администратор Модер Пользователь
Если всего того что я назвал не будет, то пишите условие

Delphi
1
2
if (edit1.text<>'') and (edit11.text='Пароль') then Form2.ShowModal
else exit;

В случае же если будут участвовать все 3 пункта то необходимо определиться с базой: XML, MS Access, MSSQL, MYSQL, Oracle и т.д.
Создавать дополнительную форму для регистрации пользователей, делать все возможные проверки на поля.
И простым SQL запросом выполнять авторизацию пользователя.

@PresAlexandr · 06.12.2010, 20:57

Не по теме:

Vangok, ну ты жжешь :umnik:

@Vangok · 06.12.2010, 21:02

Сообщение от PresAlexandr

Не по теме:

Vangok, ну ты жжешь :umnik:

А че я описал реальные вещи, как на самомделе все это делается)

@PresAlexandr · 06.12.2010, 21:06

Не по теме:

Сообщение от Vangok

А че я описал реальные вещи, как на самомделе все это делается)

Я согласен, что всё вышенаписанное Вами имеет место, но не в данном случае )) Не переутруждайтесь %-)

P.S. Извините за флуд, вырвалось =)

@Vangok · 06.12.2010, 21:07

Сообщение от Vangok

Так в авторизации будет логин и пароль?
Сколько пользователей будет иметь доступ?
Будут ли у них пользователей права: Администратор Модер Пользователь
Если всего того что я назвал не будет, то пишите условие

Delphi
1
2
if (edit1.text<>'') and (edit11.text='Пароль') then Form2.ShowModal
else exit;

В случае же если будут участвовать все 3 пункта то необходимо определиться с базой: XML, MS Access, MSSQL, MYSQL, Oracle и т.д.
Создавать дополнительную форму для регистрации пользователей, делать все возможные проверки на поля.
И простым SQL запросом выполнять авторизацию пользователя.

А еще забыл добавить Писать это условие надо на форме авторизации у кнопки TBitBtn или TButton

@Настя_111 · 13.12.2010, 23:03 **[ТС]**

Спасибо Vangok
а как зделать чтобы вместо видемого пароля были звездочки

@schdub · 13.12.2010, 23:28

У Edit1 находите свойство PasswordChar. По умолчанию оно равно #0, и меняете на интересующий символ, в данном случае *.

Добавлено через 2 минуты

Сообщение от Vangok

Delphi
1
if (edit1.text<>'') and (edit11.text='Пароль')

Vangok, а почему Editы разные?

@Vangok · 14.12.2010, 16:14

Сообщение от Oleg

У Edit1 находите свойство PasswordChar. По умолчанию оно равно #0, и меняете на интересующий символ, в данном случае *.

Добавлено через 2 минуты

Vangok, а почему Editы разные?

Ну я чуть чуть ошибся))

@Настя_111 · 14.12.2010, 16:26 **[ТС]**

спасибо Oleg
очень помог

Добавлено через 5 минут
а подскажите пожалуста
как сделать чтобы если пароль неверный выскакивало окошко - "Неверный пароль"
или если он невведен - "введите пароль"

@Romantik_FM · 14.12.2010, 17:16

Настя_111, можно так

Delphi
1
2
3
4
5
6
if edit1.text<>'пароль' then
Begin
ShowMessage('Пароль не верный');
Edit1.SetFocus;
exit;
End;

@schdub · 14.12.2010, 19:05

Сообщение от Настя_111

как сделать чтобы если пароль неверный выскакивало окошко - "Неверный пароль" или если он невведен - "введите пароль"

Delphi
1
2
3
4
5
6
  if Edit1.Text = '' then
    ShowMessage('Введите пароль!')
  else if Edit1.Text <> 'пароль' then
    ShowMessage('Пароль не верный!')
  else
    ShowMessage('Вы ввели ВЕРНЫЙ пароль.');

Добавлено через 7 минут
Но стоит заметить, что вот так вот хранить пароль в программе нельзя. Его очень легко подсмотреть, как в откомпилированной программе, так и в исходном тексте. Т.е. ресурс, к которому данный пароль легко подвержен компрометации. Поэтому необходимо использовать алгоритмы шифрования, а лучше однонаправленного хеширования (MD5, например). Или на крайний случай, алгоритмы XOR-шифрования, например, как здесь шифрование файла.

@Настя_111 · 14.12.2010, 21:59 **[ТС]**

спасибо Oleg

Новые блоги и статьи Все статьи Все блоги /
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 Кстати, совсем недавно имел разговор на тему медитаций с людьми. И обнаружил, что они вообще не понимают что такое медитация и зачем она нужна. Самые базовые вещи. Для них это - когда просто люди. . .	Создание Single Page Application на фреймах krapotkin 16.11.2025 Статья исключительно для начинающих. Подходы оригинальностью не блещут. В век Веб все очень привыкли к дизайну Single-Page-Application . Быстренько разберем подход "на фреймах". Мы делаем одну. . .

@Настя_111 4 / 4 / 0 Регистрация: 12.05.2010 Сообщений: 159

	Открытие второй формы только после ввода пароля на первой 29.11.2010, 21:40. Показов 3073. Ответов 17 Метки нет (Все метки) Приветик всем у мня тут проблемка помогите пожалуста мне нада чтобы при нажатии на кнопку BitBtn1, она запрашивала пароль, а после ввода пароля открывала вторую форму. А без пароля неоткрывала. 0

@FuKingBrain 53 / 52 / 22 Регистрация: 29.11.2010 Сообщений: 143
	30.11.2010, 10:24
	Создай форму в которой будешь спрашивать пароль. При клике по кнопки, сначала фызывай форму для ввода пароля, а потом всё то что нужно. 0

@Lord_Voodoo Почетный модератор 8785 / 2538 / 144 Регистрация: 07.03.2007 Сообщений: 11,873
	30.11.2010, 10:28
	Настя_111, ну и в чем собственно проблема? 0

@Настя_111 4 / 4 / 0 Регистрация: 12.05.2010 Сообщений: 159
	30.11.2010, 12:49 [ТС]
	Я создала форму при нажатии на кнопку, я там прописала Form2.ShowModal; у меня открывается следующая, а как сделать чтобы перед открытием спрашивала пароль 0

@Lord_Voodoo Почетный модератор 8785 / 2538 / 144 Регистрация: 07.03.2007 Сообщений: 11,873
	30.11.2010, 12:52
	Настя_111, создайте форму для авторизации и делайте ей showmodal в событии OnCreate или конструкторе главной формы 0

@Настя_111 4 / 4 / 0 Регистрация: 12.05.2010 Сообщений: 159
	06.12.2010, 20:34 [ТС]
	Lord_Voodoo вы непонимаете, я уже все это зделала мне нада чтобы при открытии той формы которой я прописала ShowModal она неоткрывалась пока небудет введен пароль 0

@PresAlexandr
	06.12.2010, 20:57
	Не по теме: Vangok, ну ты жжешь :umnik: 0

@Настя_111 4 / 4 / 0 Регистрация: 12.05.2010 Сообщений: 159
	13.12.2010, 23:03 [ТС]
	Спасибо Vangok а как зделать чтобы вместо видемого пароля были звездочки 0

@Настя_111 4 / 4 / 0 Регистрация: 12.05.2010 Сообщений: 159
	14.12.2010, 16:26 [ТС]
	спасибо Oleg очень помог Добавлено через 5 минут а подскажите пожалуста как сделать чтобы если пароль неверный выскакивало окошко - "Неверный пароль" или если он невведен - "введите пароль" 0

@Настя_111 4 / 4 / 0 Регистрация: 12.05.2010 Сообщений: 159
	14.12.2010, 21:59 [ТС]
	спасибо Oleg 0