Index: AAPClient/UI/LoginScherm2.pas
===================================================================
diff -u -r195 -r227
--- AAPClient/UI/LoginScherm2.pas	(.../LoginScherm2.pas)	(revision 195)
+++ AAPClient/UI/LoginScherm2.pas	(.../LoginScherm2.pas)	(revision 227)
@@ -13,14 +13,14 @@
     btnLogin: TButton;
     edtPincode: TEdit;
     edtInitialen: TEdit;
-    btnAfmelden: TButton;
+    imgAfmelden: TImage;
     procedure FormShow(Sender: TObject);
     procedure edtInitialenKeyUp(Sender: TObject; var Key: Word;
       Shift: TShiftState);
     procedure edtPincodeKeyUp(Sender: TObject; var Key: Word;
       Shift: TShiftState);
     procedure actVolgendeExecute(Sender: TObject);
-    procedure btnAfmeldenClick(Sender: TObject);
+    procedure imgAfmeldenClick(Sender: TObject);
   private
     procedure SetStatusLoginButton;
     procedure HuidigeGebruikerAfmelden;
@@ -59,12 +59,6 @@
   end;
 end;
 
-procedure TfmLoginScherm2.btnAfmeldenClick(Sender: TObject);
-begin
-  Self.ModalResult := mrAbort;
-  HuidigeGebruikerAfmelden;
-end;
-
 procedure TfmLoginScherm2.edtInitialenKeyUp(Sender: TObject; var Key: Word;
   Shift: TShiftState);
 begin
@@ -98,6 +92,13 @@
   TAgent.Create(UiContext).GebruikerAfmelden();
 end;
 
+procedure TfmLoginScherm2.imgAfmeldenClick(Sender: TObject);
+begin
+  inherited;
+  Self.ModalResult := mrAbort;
+  HuidigeGebruikerAfmelden;
+end;
+
 procedure TfmLoginScherm2.SetContext;
 begin
   UiContext.Initialen := edtInitialen.Text;