Index: AAPClient/UI/HernoemPalletScherm.dfm
===================================================================
diff -u -r150 -r152
--- AAPClient/UI/HernoemPalletScherm.dfm	(.../HernoemPalletScherm.dfm)	(revision 150)
+++ AAPClient/UI/HernoemPalletScherm.dfm	(.../HernoemPalletScherm.dfm)	(revision 152)
@@ -1,6 +1,4 @@
 inherited fmHernoemPalletScherm: TfmHernoemPalletScherm
-  ExplicitWidth = 320
-  ExplicitHeight = 240
   PixelsPerInch = 96
   TextHeight = 19
   inherited pnlDrieKnoppen: TPanel
@@ -12,10 +10,11 @@
     Left = 0
     Top = 57
     Width = 480
-    Height = 301
+    Height = 451
     Align = alClient
     BevelOuter = bvNone
     TabOrder = 3
+    ExplicitHeight = 301
     object lblPallet: TLabel
       Left = 107
       Top = 10
@@ -33,52 +32,54 @@
   end
   object pcHernoemPallet: TPageControl [3]
     Left = 0
-    Top = 358
+    Top = 57
     Width = 480
-    Height = 150
-    ActivePage = tsOudeCode
-    Align = alBottom
+    Height = 451
+    ActivePage = tsResultaat
+    Align = alClient
     Style = tsFlatButtons
     TabOrder = 2
+    ExplicitTop = 358
+    ExplicitHeight = 150
     object tsOudeCode: TTabSheet
       Caption = 'tsOudeCode'
       TabVisible = False
-      ExplicitLeft = 0
-      ExplicitTop = 0
-      ExplicitWidth = 0
-      ExplicitHeight = 0
+      ExplicitHeight = 140
       object lblOudeCode: TLabel
-        Left = 3
-        Top = 38
-        Width = 218
-        Height = 19
+        Left = 13
+        Top = 158
+        Width = 446
+        Height = 85
         Alignment = taCenter
         Caption = 'Scan oude pallet- of DNA-code'
         Font.Charset = DEFAULT_CHARSET
         Font.Color = clWindowText
-        Font.Height = -16
+        Font.Height = -32
         Font.Name = 'Tahoma'
         Font.Style = []
         ParentFont = False
         WordWrap = True
       end
       object edtOudeCode: TEdit
-        Left = 59
-        Top = 73
-        Width = 121
-        Height = 27
+        Left = 64
+        Top = 249
+        Width = 345
+        Height = 47
         CharCase = ecUpperCase
+        Font.Charset = DEFAULT_CHARSET
+        Font.Color = clWindowText
+        Font.Height = -32
+        Font.Name = 'Tahoma'
+        Font.Style = []
+        ParentFont = False
         TabOrder = 0
       end
     end
     object tsResultaat: TTabSheet
       Caption = 'tsResultaat'
       ImageIndex = 1
       TabVisible = False
-      ExplicitLeft = 0
-      ExplicitTop = 33
-      ExplicitWidth = 0
-      ExplicitHeight = 113
+      ExplicitHeight = 140
       object sgToeleveringData: TStringGrid
         Left = 4
         Top = 18
@@ -146,31 +147,34 @@
       Caption = 'tsNieuweCode'
       ImageIndex = 2
       TabVisible = False
-      ExplicitLeft = 0
-      ExplicitTop = 33
-      ExplicitWidth = 0
-      ExplicitHeight = 113
+      ExplicitHeight = 140
       object lblNieuweCode: TLabel
-        Left = 3
-        Top = 38
-        Width = 161
-        Height = 38
+        Left = 13
+        Top = 158
+        Width = 446
+        Height = 85
         Alignment = taCenter
         Caption = 'Scan nieuwe pallet- of DNA-code'
         Font.Charset = DEFAULT_CHARSET
         Font.Color = clWindowText
-        Font.Height = -16
+        Font.Height = -32
         Font.Name = 'Tahoma'
         Font.Style = []
         ParentFont = False
         WordWrap = True
       end
       object edtNieuweCode: TEdit
-        Left = 59
-        Top = 73
-        Width = 121
-        Height = 27
+        Left = 64
+        Top = 249
+        Width = 345
+        Height = 47
         CharCase = ecUpperCase
+        Font.Charset = DEFAULT_CHARSET
+        Font.Color = clWindowText
+        Font.Height = -32
+        Font.Name = 'Tahoma'
+        Font.Style = []
+        ParentFont = False
         TabOrder = 0
       end
     end