|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Форма при удачной авторизации
В общем реализую программу. Но есть пара вопросов, надеюсь на помощь специалистов:
1. Авторизация имеет 2 ветки авторизации (к примеру акк заказчика и акк исполнителя), аккаунт для входа определяется радиобаттоном. При успешной авторизации пользователь попадает в нужный кабинет. Вопрос: Как сделать кабинет для работы, чтобы пропала форма авторизации и появилась вторая форма кабинета? У меня форма авторизации не пропадает, а висит модульно под кабинетом. Я так понимаю нужно прописать "закрытие 1 формы", но где именно? |
#2
|
|||
|
|||
Как - то так
Код:
project Project1; uses Forms, UnitPassword in "UnitPassword.pas" {FormPassword}, UnitCustomer in "UnitCustomer.pas" {FormCustomer}, UnitExecutor in "UnitExecutor.pas" {FormExecutor}; begin Application.Initialize; Application.CreateForm(TFormPassword,FormPassword); FormPassword.Show; FormPassword.Update; // внутри предусмотрите кнопку закрытия формы if FormPassword.RadioButton1.ItemIndex = 0 then begin Application.CreateForm(TFormCustomer ,FormCustomer ); FormCustomer.Update; end else if FormPassword.RadioButton1.ItemIndex = 1 then begin Application.CreateForm(TFormExecutor ,FormExecutor); FormExecutor.Update; end else Halt; FormPassword.Free; Application.Run; end. |
Этот пользователь сказал Спасибо icWasya за это полезное сообщение: | ||
alikoder (26.05.2013)
|