Index: AAPClient/UI/LoginScherm2.pas
===================================================================
diff -u -r240 -r241
--- AAPClient/UI/LoginScherm2.pas	(.../LoginScherm2.pas)	(revision 240)
+++ AAPClient/UI/LoginScherm2.pas	(.../LoginScherm2.pas)	(revision 241)
@@ -57,7 +57,8 @@
   finally
     Response.Free;
   end;
-  (Self.Parent.Parent.Parent As TfmProScanHoofdscherm).NavigeerNaar(Self.ModalResult);
+  PostMessage(Self.Handle,WM_Close,0,0);
+  (Self.Parent.Parent As TfmProScanHoofdscherm).NavigeerNaar(Self.ModalResult);
 end;
 
 procedure TfmLoginScherm2.edtInitialenKeyUp(Sender: TObject; var Key: Word;
@@ -97,7 +98,7 @@
 begin
   inherited;
   HuidigeGebruikerAfmelden;
-  (Self.Parent.Parent.Parent As TfmProScanHoofdscherm).NavigeerNaar(mrAbort);
+  (Self.Parent.Parent As TfmProScanHoofdscherm).NavigeerNaar(mrAbort);
 end;
 
 procedure TfmLoginScherm2.SetContext;