Index: AAPClient/UI/UiContext.pas
===================================================================
diff -u -r247 -r301
--- AAPClient/UI/UiContext.pas	(.../UiContext.pas)	(revision 247)
+++ AAPClient/UI/UiContext.pas	(.../UiContext.pas)	(revision 301)
@@ -28,6 +28,7 @@
     fDesktopMode: boolean;
     fIsDirecteLeveringPopupGetoond: boolean;
     fIsWegwerpPalletPopupGetoond: boolean;
+    fServerName: string;
   public
     Property Initialen: String Read fInitialen Write fInitialen;
     Property LoginCode: String Read fLoginCode Write fLoginCode;
@@ -39,6 +40,7 @@
     Property DesktopMode: boolean Read fDesktopMode Write fDesktopMode;
     Property IsDirecteLeveringPopupGetoond: boolean Read fIsDirecteLeveringPopupGetoond Write fIsDirecteLeveringPopupGetoond;
     Property IsWegwerpPalletPopupGetoond: boolean Read fIsWegwerpPalletPopupGetoond Write fIsWegwerpPalletPopupGetoond;
+    Property ServerName: string Read fServerName Write fServerName;
   end;
 
 implementation