Index: AAPClient/UI/BestaandePalletScherm.pas
===================================================================
diff -u -r219 -r222
--- AAPClient/UI/BestaandePalletScherm.pas	(.../BestaandePalletScherm.pas)	(revision 219)
+++ AAPClient/UI/BestaandePalletScherm.pas	(.../BestaandePalletScherm.pas)	(revision 222)
@@ -22,6 +22,7 @@
     pnlRework: TPanel;
     imgRework: TImage;
     lblRework: TLabel;
+    lblBestaandePallet: TLabel;
     procedure FormShow(Sender: TObject);
     procedure actHomeExecute(Sender: TObject);
     procedure actPalletExecute(Sender: TObject);
@@ -81,6 +82,7 @@
   UiContext.ImagesScherm.ilAlgemeen128.GetIcon(10, imgRework.Picture.Icon);
   UiContext.ImagesScherm.ilAlgemeen128.GetIcon(9, imgExtraToelevering.Picture.Icon);
   UiContext.ImagesScherm.ilAlgemeen128.GetIcon(2, imgAnnuleren.Picture.Icon);
+  lblBestaandePallet.Caption := 'Bestaande pallet: '+UiContext.Pallet;
   inherited;
 end;
 
Index: AAPClient/UI/BestaandePalletScherm.dfm
===================================================================
diff -u -r160 -r222
--- AAPClient/UI/BestaandePalletScherm.dfm	(.../BestaandePalletScherm.dfm)	(revision 160)
+++ AAPClient/UI/BestaandePalletScherm.dfm	(.../BestaandePalletScherm.dfm)	(revision 222)
@@ -1,5 +1,7 @@
 inherited fmBestaandePalletScherm: TfmBestaandePalletScherm
   Caption = 'fmBestaandePalletScherm'
+  ExplicitWidth = 480
+  ExplicitHeight = 640
   PixelsPerInch = 96
   TextHeight = 19
   object lblPalletCode: TLabel [0]
@@ -9,12 +11,30 @@
     Height = 19
     AutoSize = False
   end
+  object lblBestaandePallet: TLabel [1]
+    Left = 0
+    Top = 57
+    Width = 480
+    Height = 39
+    Align = alTop
+    Alignment = taCenter
+    Caption = 'Bestaande pallet: %s'
+    Color = clBtnFace
+    Font.Charset = DEFAULT_CHARSET
+    Font.Color = clWindowText
+    Font.Height = -32
+    Font.Name = 'Tahoma'
+    Font.Style = []
+    ParentColor = False
+    ParentFont = False
+    ExplicitWidth = 301
+  end
   inherited pnlDrieKnoppen: TPanel
     Visible = False
   end
-  object pnlAnnuleren: TPanel [3]
+  object pnlAnnuleren: TPanel [4]
     Left = 256
-    Top = 304
+    Top = 320
     Width = 157
     Height = 185
     BevelOuter = bvNone
@@ -49,9 +69,9 @@
       ExplicitTop = 134
     end
   end
-  object pnlExtraToelevering: TPanel [4]
+  object pnlExtraToelevering: TPanel [5]
     Left = 60
-    Top = 304
+    Top = 320
     Width = 157
     Height = 185
     BevelOuter = bvNone
@@ -87,9 +107,9 @@
       ExplicitTop = 134
     end
   end
-  object pnlHuidigeToelevering: TPanel [5]
+  object pnlHuidigeToelevering: TPanel [6]
     Left = 60
-    Top = 96
+    Top = 112
     Width = 157
     Height = 183
     BevelOuter = bvNone
@@ -125,9 +145,9 @@
       ExplicitTop = 134
     end
   end
-  object pnlRework: TPanel [6]
+  object pnlRework: TPanel [7]
     Left = 256
-    Top = 96
+    Top = 112
     Width = 157
     Height = 183
     BevelOuter = bvNone