Index: PlanScan/Main.dfm
===================================================================
diff -u -r362 -r363
--- PlanScan/Main.dfm	(.../Main.dfm)	(revision 362)
+++ PlanScan/Main.dfm	(.../Main.dfm)	(revision 363)
@@ -93,7 +93,7 @@
         Font.Name = 'Tahoma'
         Font.Style = []
         ParentFont = False
-        Transparent = False
+        Transparent = True
         Layout = tlCenter
         OnClick = lblWegwerppalletClick
         ExplicitTop = 40
@@ -113,7 +113,7 @@
         Font.Name = 'Tahoma'
         Font.Style = []
         ParentFont = False
-        Transparent = False
+        Transparent = True
         Layout = tlCenter
         OnClick = lblDnaCodesClick
         ExplicitWidth = 165
@@ -132,7 +132,7 @@
         Font.Name = 'Tahoma'
         Font.Style = []
         ParentFont = False
-        Transparent = False
+        Transparent = True
         Layout = tlCenter
         OnClick = lblGebruikersClick
         ExplicitWidth = 165
@@ -147,7 +147,6 @@
     Align = alClient
     BevelOuter = bvNone
     TabOrder = 1
-    ExplicitWidth = 513
     object pcFrames: TPageControl
       Left = 0
       Top = 0
@@ -156,64 +155,83 @@
       ActivePage = tsDnaCodes
       Align = alClient
       TabOrder = 0
-      ExplicitWidth = 513
       object tsDnaCodes: TTabSheet
         Caption = 'DnaCodes'
         TabVisible = False
-        ExplicitWidth = 505
         inline frmDnaCodes: TfrmDnaCodes
           Left = 0
           Top = 0
           Width = 918
           Height = 398
           Align = alClient
           TabOrder = 0
-          ExplicitWidth = 505
-          ExplicitHeight = 398
+          ExplicitTop = -82
           inherited dbgDnaCodes: TDBGrid
             Width = 791
             Height = 325
+            Columns = <
+              item
+                Expanded = False
+                FieldName = 'DnaCode'
+                Visible = True
+              end
+              item
+                Expanded = False
+                FieldName = 'Pallet'
+                Visible = True
+              end
+              item
+                Expanded = False
+                FieldName = 'Toelevering'
+                Visible = True
+              end
+              item
+                Expanded = False
+                FieldName = 'Status'
+                Visible = True
+              end
+              item
+                Expanded = False
+                FieldName = 'Batch'
+                Visible = True
+              end
+              item
+                Expanded = False
+                FieldName = 'Scantijdstip'
+                Visible = True
+              end
+              item
+                Expanded = False
+                FieldName = 'Initialen'
+                Visible = True
+              end
+              item
+                Expanded = False
+                FieldName = 'Ladecode'
+                Visible = True
+              end>
           end
           inherited pnlActies: TPanel
             Left = 791
             Height = 325
-            ExplicitLeft = 378
-            ExplicitHeight = 357
-            inherited btnMaatwerketiket: TButton
-              Top = 105
-              ExplicitTop = 105
-            end
-            inherited btnKlantEtiket: TButton
-              Top = 136
-              ExplicitTop = 136
-            end
-            inherited btnProboxetiket: TButton
-              Top = 167
-              ExplicitTop = 167
-            end
           end
           inherited pnlZoekKnoppen: TPanel
             Width = 918
-            ExplicitWidth = 505
-            inherited btnZoeken: TButton
-              OnClick = frmDnaCodesbtnZoekenClick
-            end
           end
         end
       end
       object tsGebruikers: TTabSheet
         Caption = 'Gebruikers'
         ImageIndex = 1
         TabVisible = False
-        ExplicitWidth = 505
         inline frmGebruikers: TfrmGebruikers
           Left = 0
           Top = 0
           Width = 918
           Height = 398
           Align = alClient
           TabOrder = 0
-          ExplicitWidth = 505
+          ExplicitWidth = 918
           ExplicitHeight = 398
           inherited dbgGebruikers: TDBGrid
             Width = 791
@@ -222,7 +240,7 @@
           inherited Panel1: TPanel
             Left = 791
             Height = 398
-            ExplicitLeft = 378
+            ExplicitLeft = 791
             ExplicitHeight = 398
           end
         end