Index: ProScan/UI/DnaCodeScherm.dfm
===================================================================
diff -u -r628 -r694
--- ProScan/UI/DnaCodeScherm.dfm	(.../DnaCodeScherm.dfm)	(revision 628)
+++ ProScan/UI/DnaCodeScherm.dfm	(.../DnaCodeScherm.dfm)	(revision 694)
@@ -2,8 +2,6 @@
   ActiveControl = edtDnaCode
   Caption = 'fmDnaCodeScherm'
   OnActivate = FormActivate
-  ExplicitWidth = 480
-  ExplicitHeight = 640
   PixelsPerInch = 96
   TextHeight = 19
   object lblToeleveringData: TLabel [0]
@@ -97,8 +95,8 @@
     ParentFont = False
   end
   object imgDirecteLevering: TImage [7]
-    Left = 327
-    Top = 219
+    Left = 311
+    Top = 180
     Width = 32
     Height = 32
     Visible = False
@@ -117,8 +115,8 @@
     ParentFont = False
   end
   object imgWegwerpPallet: TImage [9]
-    Left = 365
-    Top = 219
+    Left = 349
+    Top = 180
     Width = 32
     Height = 32
     Visible = False
@@ -142,8 +140,8 @@
     Height = 64
   end
   object imgExport: TImage [13]
-    Left = 403
-    Top = 219
+    Left = 387
+    Top = 180
     Width = 32
     Height = 32
     Visible = False
@@ -162,7 +160,21 @@
     Font.Style = [fsBold]
     ParentFont = False
   end
-  object edtDnaCode: TEdit [17]
+  object imgBlumXs: TImage [15]
+    Left = 311
+    Top = 218
+    Width = 32
+    Height = 32
+    Visible = False
+  end
+  object imgKartonnenPallet: TImage [16]
+    Left = 349
+    Top = 218
+    Width = 32
+    Height = 32
+    Visible = False
+  end
+  object edtDnaCode: TEdit [19]
     Left = 68
     Top = 341
     Width = 345
@@ -179,7 +191,7 @@
     TabOrder = 2
     OnKeyPress = edtDnaCodeKeyPress
   end
-  object btnInfo: TButton [18]
+  object btnInfo: TButton [20]
     Left = 68
     Top = 408
     Width = 345
@@ -197,9 +209,6 @@
     OnClick = btnInfoClick
   end
   inherited alAlgemeen: TActionList
-    inherited actHome: TAction
-      OnExecute = actHomeExecute
-    end
     inherited actPallet: TAction
       OnExecute = actPalletExecute
     end