После ввода пароля открыть одну форму и закрыть другую

@Михаил199356712 · Регистрация: 08.11.2015

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

Всем добрый вечер народ помогите плиз)
Надо чтобы после ввода пароля открывалась первая форма и скрывалась 8
делал так но выдаёт ошибку

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
if(Edit1->Text =="Avtomagazin6412")
{
Label2->Caption = "Пароль введён верно";
Button1->Enabled = false;
 
 
 
}
if(Edit1->Text !="Avtomagazin6412" && Edit1->Text !="")
Form8->Hide();
Form1->Show();
{
MessageDlg("Пароль неверный", mtInformation, TMsgDlgButtons() << mbOK, 0);
}
if(Edit1->Text =="")
{
MessageDlg("Введите пароль", mtInformation, TMsgDlgButtons() << mbOK, 0);
}
Edit1->SetFocus();

@nmcf · 08.11.2015, 23:41

Скобку из 12-й строки перемести в правильное место.

@Михаил199356712 · 09.11.2015, 16:53 **[ТС]**

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

Скобку из 12-й строки перемести в правильное место.

Да я как только не ставил он ошибку выдаёт(

@Почтальон · 09.11.2015, 18:18

И так пробовали ?

C++
1
2
3
4
5
6
if(Edit1->Text !="Avtomagazin6412" && Edit1->Text !="")
{
Form8->Hide();
Form1->Show();
MessageDlg("Пароль неверный", mtInformation, TMsgDlgButtons() << mbOK, 0);
}

@BillyM · 10.11.2015, 14:19

а попробуйте открыть через ShowModal()?

@Михаил199356712 · 10.11.2015, 14:29 **[ТС]**

всем спасибо попробую

@NextGen25 · 27.11.2015, 13:21

Сообщение от Почтальон

if(Edit1->Text !="Avtomagazin6412" && Edit1->Text !="")
{
Form8->Hide();
Form1->Show();
MessageDlg("Пароль неверный", mtInformation, TMsgDlgButtons() << mbOK, 0);
}

Так тоже делал не получается(

@Почтальон · 27.11.2015, 13:38

Что не получается ???

@NextGen25 · 27.11.2015, 13:40

Сообщение от Почтальон

Что не получается ???

Он после ввода пароля, даже не правильного сразу идёт к этим строчкам

C++
1
2
Form8->Hide();
Form1->Show();

и открывает их ,даже если не вводишь пароль

@demon_7 · 27.11.2015, 13:46

Сообщение от Михаил199356712

Надо чтобы после ввода пароля открывалась первая форма и скрывалась 8

C++
1
2
3
4
5
6
if(Edit1->Text !="Avtomagazin6412" && Edit1->Text !="")
{
Form8->Hide();
Form1->Show();
MessageDlg("Пароль неверный", mtInformation, TMsgDlgButtons() << mbOK, 0);
}

А в коде, Вы делаете наоборот...при неверном пароле проводите манипуляции...
Или я что то не так понял?

Добавлено через 3 минуты
Слепил из Ваших строк. Проверьте

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
if(Edit1->Text =="Avtomagazin6412")
{
Label2->Caption = "Пароль введён верно";
Button1->Enabled = false;
Form8->Hide();
Form1->Show(); 
}
else
{
MessageDlg("Пароль неверный", mtInformation, TMsgDlgButtons() << mbOK, 0);
}
if(Edit1->Text =="")
Edit1->SetFocus();
{
MessageDlg("Введите пароль", mtInformation, TMsgDlgButtons() << mbOK, 0);
Edit1->SetFocus();
}

@NextGen25 · 27.11.2015, 13:47

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

if(Edit1->Text =="Avtomagazin6412")
{
Label2->Caption = "Пароль введён верно";
Button1->Enabled = false;
Form8->Hide();
Form1->Show();
}
else
{
MessageDlg("Пароль неверный", mtInformation, TMsgDlgButtons() << mbOK, 0);
}
if(Edit1->Text =="")
Edit1->SetFocus();
{
MessageDlg("Введите пароль", mtInformation, TMsgDlgButtons() << mbOK, 0);
Edit1->SetFocus();
}

только что сам так сделал, выводит ошибку

@demon_7 · 27.11.2015, 13:48

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

только что сам так сделал, выводит ошибку

хорошо. Разбирайтесь.

@NextGen25 · 27.11.2015, 13:48

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

только что сам так сделал, выводит ошибку

Вот она

@Sasha · 27.11.2015, 13:52

правильно ошибка и выводит. Ты пытаешься поставить SetFocus на компонент который находится в скрытом окне, а это есть не допустимо

@demon_7 · 27.11.2015, 13:54

У меня работает

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
if(Edit1->Text =="Avtomagazin6412")
{
Label2->Caption = "Пароль введён верно";
Button1->Enabled = false;
Form8->Hide();
Form1->Show(); 
}
else
{
MessageDlg("Пароль неверный", mtInformation, TMsgDlgButtons() << mbOK, 0);
Edit1->SetFocus();
}
if(Edit1->Text =="")
{
MessageDlg("Введите пароль", mtInformation, TMsgDlgButtons() << mbOK, 0);
Edit1->SetFocus();
}

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

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

правильно ошибка и выводит. Ты пытаешься поставить SetFocus на компонент который находится в скрытом окне, а это есть не допустимо

Именно, я когда лепил промахнулся 1ой строкой.

@NextGen25 · 27.11.2015, 14:00

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

правильно ошибка и выводит. Ты пытаешься поставить SetFocus на компонент который находится в скрытом окне, а это есть не допустимо

Спасибо!))

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

f(Edit1->Text =="Avtomagazin6412")
{
Label2->Caption = "Пароль введён верно";
Button1->Enabled = false;
Form8->Hide();
Form1->Show();
}
else
{
MessageDlg("Пароль неверный", mtInformation, TMsgDlgButtons() << mbOK, 0);
Edit1->SetFocus();
}
if(Edit1->Text =="")
{
MessageDlg("Введите пароль", mtInformation, TMsgDlgButtons() << mbOK, 0);
Edit1->SetFocus();
}

Спасибо, теперь всё заработало, else не заметил и без него пытался запустить, спасибки ВАМ!)

@D1973 · 27.11.2015, 16:38

Не по теме:

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

спасибки ВАМ!)

И не у кого из "помогаторов" в "репе" не прибавилось... Неблагодарный народ пошел

@volvo · 27.11.2015, 16:47

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

И не у кого из "помогаторов" в "репе" не прибавилось...

Потому что ни один из "помогаторов" не сказал ТС-у, что то, что он делает - изначально неправильно. Нужно добавлять вызов формы для ввода пароля в файл проекта, и вообще не создавать остальные формы до тех пор, пока авторизация не будет пройдена. Тогда проблема решится сама собой, как только пользователь нажмет Ok на форме авторизации - она закроется, создастся главная (и все остальные тоже) форма, и главная форма будет показана.

Все, что "помогаторы" сделали - помогли выточить треугольное колесо для велосипеда. И ТС с этого велосипеда благополучно упадет...

@NextGen25 · 27.11.2015, 16:50

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

И не у кого из "помогаторов" в "репе" не прибавилось... Неблагодарный народ пошел

Что нужно сделать для того, чтобы в репе прибавилось?

@D1973 · 27.11.2015, 17:55

volvo, я 100% согласен... Тема по поводу ввода пароля озвучена 100500 раз (в том числе и Вами многажды...) Тем не менее, вопрос возникает снова и снова... Более чем уверен, что это связано с нежеланием (неумением) ТС-ов пользоваться поиском...
Может быть имеет смысл вынести эту тему в шапку, так, как Вы вынесли тему о классах-перехватчиках? И Вам респектище, и нам, грешным, есть чему поучиться и куда как проще новичков носом тыкать будет

Новые блоги и статьи Все статьи Все блоги /
http://iceja.net/ математические сервисы iceja 20.01.2026 Обновила свой сайт http:/ / iceja. net/ , приделала Fast Fourier Transform экстраполяцию сигналов. Однако предсказывает далеко не каждый сигнал (см ограничения http:/ / iceja. net/ fourier/ docs ). Также. . .	http://iceja.net/ сервер решения полиномов iceja 18.01.2026 Выкатила http:/ / iceja. net/ сервер решения полиномов (находит действительные корни полиномов методом Штурма). На сайте документация по API, но скажу прямо VPS слабенький и 200 000 полиномов. . .	Расчёт переходных процессов в цепи постоянного тока igorrr37 16.01.2026 / * Дана цепь постоянного тока с R, L, C, k(ключ), U, E, J. Программа составляет систему уравнений по 1 и 2 законам Кирхгофа, решает её и находит переходные токи и напряжения на элементах схемы. . . .	Восстановить юзерскрипты Greasemonkey из бэкапа браузера damix 15.01.2026 Если восстановить из бэкапа профиль Firefox после переустановки винды, то список юзерскриптов в Greasemonkey будет пустым. Но восстановить их можно так. Для этого понадобится консольная утилита. . .
Сукцессия микоризы: основная теория в виде двух уравнений. anaschu 11.01.2026 https:/ / rutube. ru/ video/ 7a537f578d808e67a3c6fd818a44a5c4/	WordPad для Windows 11 Jel 10.01.2026 WordPad для Windows 11 — это приложение, которое восстанавливает классический текстовый редактор WordPad в операционной системе Windows 11. После того как Microsoft исключила WordPad из. . .	Classic Notepad for Windows 11 Jel 10.01.2026 Old Classic Notepad for Windows 11 Приложение для Windows 11, позволяющее пользователям вернуть классическую версию текстового редактора «Блокнот» из Windows 10. Программа предоставляет более. . .	Почему дизайн решает? Neotwalker 09.01.2026 В современном мире, где конкуренция за внимание потребителя достигла пика, дизайн становится мощным инструментом для успеха бренда. Это не просто красивый внешний вид продукта или сайта — это. . .

@nmcf 7804 / 6568 / 2988 Регистрация: 14.04.2014 Сообщений: 28,705
	08.11.2015, 23:41
	Скобку из 12-й строки перемести в правильное место. 0

@BillyM 0 / 0 / 2 Регистрация: 14.10.2015 Сообщений: 47
	10.11.2015, 14:19
	а попробуйте открыть через ShowModal()? 0

@Михаил199356712 1 / 1 / 0 Регистрация: 08.11.2015 Сообщений: 21
	10.11.2015, 14:29 [ТС]
	всем спасибо попробую 0

@Почтальон управление сложностью 1693 / 1306 / 259 Регистрация: 22.03.2015 Сообщений: 7,545 Записей в блоге: 5
	27.11.2015, 13:38
	Что не получается ??? 0

@Sasha 4956 / 2420 / 531 Регистрация: 05.06.2008 Сообщений: 7,518 Записей в блоге: 3
	27.11.2015, 13:52
	правильно ошибка и выводит. Ты пытаешься поставить SetFocus на компонент который находится в скрытом окне, а это есть не допустимо 0

@D1973 Модератор 9910 / 6447 / 2455 Регистрация: 21.01.2014 Сообщений: 27,366 Записей в блоге: 3
	27.11.2015, 17:55
	volvo, я 100% согласен... Тема по поводу ввода пароля озвучена 100500 раз (в том числе и Вами многажды...) Тем не менее, вопрос возникает снова и снова... Более чем уверен, что это связано с нежеланием (неумением) ТС-ов пользоваться поиском... Может быть имеет смысл вынести эту тему в шапку, так, как Вы вынесли тему о классах-перехватчиках? И Вам респектище, и нам, грешным, есть чему поучиться и куда как проще новичков носом тыкать будет 1