Index: AAPClient/UI/DrieKnoppenScherm.pas
===================================================================
diff -u -r63 -r65
--- AAPClient/UI/DrieKnoppenScherm.pas	(.../DrieKnoppenScherm.pas)	(revision 63)
+++ AAPClient/UI/DrieKnoppenScherm.pas	(.../DrieKnoppenScherm.pas)	(revision 65)
@@ -5,7 +5,7 @@
 uses
   Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
   Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, Vcl.ActnList, Images,
-  Vcl.ImgList;
+  Vcl.ImgList, UiContext;
 
 type
   TfmDrieKnoppenScherm = class(TForm)
@@ -28,11 +28,12 @@
     procedure FormCreate(Sender: TObject);
   private
     fImagesScherm: TImagesScherm;
+    fUiContext: TUiContext;
   protected
     function ComputerName: String;
     function ToonPopupScherm(Melding, Actie1: String; Actie2: String = ''): TModalResult;
   public
-    { Public declarations }
+    property UiContext: TUiContext Read fUiContext Write fUiContext;
   end;
 
 var
@@ -74,6 +75,8 @@
     btnRechtsOnder.Visible := true;
   end;
 
+  lblGebruiker.Caption := UiContext.Initialen;
+
   if lblGebruiker.Caption <> '' then begin
     lblGebruiker.Visible := true;
   end;