Index: AAPClient/UI/LoginScherm.pas
===================================================================
diff -u -r4 -r5
--- AAPClient/UI/LoginScherm.pas	(.../LoginScherm.pas)	(revision 4)
+++ AAPClient/UI/LoginScherm.pas	(.../LoginScherm.pas)	(revision 5)
@@ -60,6 +60,7 @@
         ShowMessage(Response.Header.Omschrijving);
       end else begin
         lblGebruiker.Caption := edtInitialen.Text;
+        lblGebruiker.Visible := true;
       end;
     finally
       Response.Free;
Index: AAPClient/Win32/Debug/DrieKnoppenScherm.dcu
===================================================================
diff -u -r1 -r5
Binary files differ
Index: AAPClient/Win32/Debug/ProScan.exe
===================================================================
diff -u -r4 -r5
Binary files differ
Index: AAPClient/UI/DrieKnoppenScherm.pas
===================================================================
diff -u -r1 -r5
--- AAPClient/UI/DrieKnoppenScherm.pas	(.../DrieKnoppenScherm.pas)	(revision 1)
+++ AAPClient/UI/DrieKnoppenScherm.pas	(.../DrieKnoppenScherm.pas)	(revision 5)
@@ -39,6 +39,7 @@
   actLinksOnder := nil;
   actCentraalOnder := nil;
   actRechtsOnder := nil;
+  lblGebruiker.Visible := false;
 end;
 
 procedure TfmDrieKnoppenScherm.FormShow(Sender: TObject);
@@ -59,6 +60,10 @@
     btnRechtsOnder.Caption := actRechtsOnder.Caption;
   end;
 
+  if lblGebruiker.Caption <> '' then begin
+    lblGebruiker.Visible := true;
+  end;
+  
 end;
 
 end.
Index: AAPClient/UI/DrieKnoppenScherm.dfm
===================================================================
diff -u -r1 -r5
--- AAPClient/UI/DrieKnoppenScherm.dfm	(.../DrieKnoppenScherm.dfm)	(revision 1)
+++ AAPClient/UI/DrieKnoppenScherm.dfm	(.../DrieKnoppenScherm.dfm)	(revision 5)
@@ -21,7 +21,6 @@
     Width = 71
     Height = 25
     AutoSize = False
-    Caption = 'WWW'
     Font.Charset = DEFAULT_CHARSET
     Font.Color = clWindowText
     Font.Height = -21