Как при нажатии на кнопку (Log In), закрыть окно авторизации (Form1) и открыть основную программу (Form2)?
Код:
procedure TForm1.LogInButtonClick(Sender: TObject);
var
pw:string;
begin
pw := 'NXJ';
if PasswordEdit.Text = pw then
begin
Form1.Close; {вот эта строка полностью закрывает программу}
Form2.Show();
end
else
ShowMessage('Wrong password');
end;