Index: PlanScan/Main.dfm
===================================================================
diff -u -r396 -r673
--- PlanScan/Main.dfm	(.../Main.dfm)	(revision 396)
+++ PlanScan/Main.dfm	(.../Main.dfm)	(revision 673)
@@ -20,15 +20,15 @@
   object pnlLinks: TPanel
     Left = 0
     Top = 0
-    Width = 185
+    Width = 200
     Height = 408
     Align = alLeft
     BevelOuter = bvNone
     TabOrder = 0
     object pnlNaam: TPanel
       Left = 0
       Top = 0
-      Width = 185
+      Width = 200
       Height = 169
       Align = alTop
       BevelOuter = bvNone
@@ -50,27 +50,11 @@
         Font.Style = []
         ParentFont = False
       end
-      object lblUitloggen: TLabel
-        Left = 58
-        Top = 98
-        Width = 68
-        Height = 19
-        Alignment = taCenter
-        AutoSize = False
-        Caption = 'Uitloggen'
-        Font.Charset = DEFAULT_CHARSET
-        Font.Color = clWhite
-        Font.Height = -16
-        Font.Name = 'Tahoma'
-        Font.Style = []
-        ParentFont = False
-        OnClick = lblUitloggenClick
-      end
     end
     object pnlKnoppen: TPanel
       Left = 0
       Top = 169
-      Width = 185
+      Width = 200
       Height = 239
       Align = alClient
       BevelOuter = bvNone
@@ -79,14 +63,14 @@
       Padding.Right = 20
       ParentBackground = False
       TabOrder = 1
-      object lblWegwerppallet: TLabel
+      object lblKlantinstellingen: TLabel
         Left = 20
         Top = 80
-        Width = 145
+        Width = 160
         Height = 40
         Align = alTop
         AutoSize = False
-        Caption = 'Wegwerppallet'
+        Caption = 'Klantinstellingen'
         Font.Charset = DEFAULT_CHARSET
         Font.Color = clWhite
         Font.Height = -21
@@ -95,14 +79,13 @@
         ParentFont = False
         Transparent = True
         Layout = tlCenter
-        OnClick = lblWegwerppalletClick
-        ExplicitTop = 40
-        ExplicitWidth = 165
+        OnClick = lblKlantinstellingenClick
+        ExplicitWidth = 159
       end
       object lblDnaCodes: TLabel
         Left = 20
         Top = 0
-        Width = 145
+        Width = 160
         Height = 40
         Align = alTop
         AutoSize = False
@@ -121,7 +104,7 @@
       object lblGebruikers: TLabel
         Left = 20
         Top = 40
-        Width = 145
+        Width = 160
         Height = 40
         Align = alTop
         AutoSize = False
@@ -140,17 +123,17 @@
     end
   end
   object pnlFrames: TPanel
-    Left = 185
+    Left = 200
     Top = 0
-    Width = 926
+    Width = 911
     Height = 408
     Align = alClient
     BevelOuter = bvNone
     TabOrder = 1
     object pcFrames: TPageControl
       Left = 0
       Top = 0
-      Width = 926
+      Width = 911
       Height = 408
       ActivePage = tsDnaCodes
       Align = alClient
@@ -161,14 +144,14 @@
         inline frmDnaCodes: TfrmDnaCodes
           Left = 0
           Top = 0
-          Width = 918
+          Width = 903
           Height = 398
           Align = alClient
           TabOrder = 0
-          ExplicitWidth = 918
+          ExplicitWidth = 903
           ExplicitHeight = 398
           inherited dbgDnaCodes: TDBGrid
-            Width = 791
+            Width = 776
             Height = 325
             Columns = <
               item
@@ -210,17 +193,26 @@
                 Expanded = False
                 FieldName = 'Ladecode'
                 Visible = True
+              end
+              item
+                Expanded = False
+                FieldName = 'ParentDnaCode'
+                Visible = True
               end>
           end
           inherited pnlActies: TPanel
-            Left = 791
+            Left = 776
             Height = 325
-            ExplicitLeft = 791
+            ExplicitLeft = 776
             ExplicitHeight = 325
           end
           inherited pnlZoekKnoppen: TPanel
-            Width = 918
-            ExplicitWidth = 918
+            Width = 903
+            ExplicitWidth = 903
+            inherited btnZoeken: TButton
+              Left = 712
+              ExplicitLeft = 712
+            end
           end
         end
       end
@@ -231,20 +223,20 @@
         inline frmGebruikers: TfrmGebruikers
           Left = 0
           Top = 0
-          Width = 918
+          Width = 903
           Height = 398
           Align = alClient
           TabOrder = 0
-          ExplicitWidth = 918
+          ExplicitWidth = 903
           ExplicitHeight = 398
           inherited dbgGebruikers: TDBGrid
-            Width = 791
+            Width = 776
             Height = 398
           end
           inherited Panel1: TPanel
-            Left = 791
+            Left = 776
             Height = 398
-            ExplicitLeft = 791
+            ExplicitLeft = 776
             ExplicitHeight = 398
           end
         end
@@ -256,21 +248,21 @@
         inline frmKlantinstellingen: TfrmKlantinstellingen
           Left = 0
           Top = 0
-          Width = 918
+          Width = 903
           Height = 398
           Align = alClient
           TabOrder = 0
-          ExplicitWidth = 918
+          ExplicitWidth = 903
           ExplicitHeight = 398
           inherited dbgKlantinstellingen: TDBGrid
-            Width = 791
+            Width = 776
             Height = 398
           end
           inherited Panel1: TPanel
-            Left = 791
+            Left = 776
             Height = 398
-            ExplicitLeft = 799
-            ExplicitHeight = 408
+            ExplicitLeft = 776
+            ExplicitHeight = 398
           end
         end
       end