[poli-smen]

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

Вопрос таков как встроить сюда что бы при нажатии на кнопку открывалась Form2. Все подключено. И в базе access логин и пароль задан!
При входе выкидывает с проги!

Код:

.....
      If UserQuery.FieldByName('Пароль').AsString=PasswordEdit.Text then begin
         login:=LowerCase(LoginEdit.Text);
         If UserQuery.FieldByName('Доступ').AsString='True' then  Dostup:=true//есть доступ
            else Dostup:=false;
             Close;
.....

Метод Close закрывает форму. Закрытие главной формы автоматически завершает всё приложение.