Index: AAPClient/Win32/Debug/ProScan.exe
===================================================================
diff -u -r16 -r17
Binary files differ
Index: AAPClient/ProScanMain.pas
===================================================================
diff -u -r16 -r17
--- AAPClient/ProScanMain.pas	(.../ProScanMain.pas)	(revision 16)
+++ AAPClient/ProScanMain.pas	(.../ProScanMain.pas)	(revision 17)
@@ -27,7 +27,7 @@
 implementation
 
 uses
-  LoginScherm, GebruikerService, HomeScherm;
+  LoginScherm, GebruikerService, HomeScherm, DrieKnoppenScherm;
 
 {$R *.dfm}
 
@@ -58,6 +58,8 @@
 
 
   while fModalResult <> mrAbort do begin
+    (fHuidigScherm as TfmDrieKnoppenScherm).lblGebruiker.Caption := fInitialen;
+
     //LoginScherm tonen
     if fHuidigScherm.ClassType = TfmLoginScherm then begin
       fModalResult := fHuidigScherm.ShowModal;
@@ -69,6 +71,7 @@
         fLoginCode := (fHuidigScherm as TfmLoginScherm).GeefLoginCode();
         fHuidigScherm := fHomeScherm;
       end;
+      continue;
     end;
 
     //HomeScherm tonen
@@ -81,6 +84,7 @@
         HuidigeGebruikerAfmelden;
         fHuidigScherm := fLoginScherm;
       end;
+      continue;
     end;
   end;
 
Index: AAPClient/Win32/Debug/ProScanMain.dcu
===================================================================
diff -u -r16 -r17
Binary files differ