Index: PlanScan/Main.dfm
===================================================================
diff -u -r357 -r362
--- PlanScan/Main.dfm	(.../Main.dfm)	(revision 357)
+++ PlanScan/Main.dfm	(.../Main.dfm)	(revision 362)
@@ -3,7 +3,7 @@
   Top = 0
   Caption = 'PlanScan'
   ClientHeight = 408
-  ClientWidth = 698
+  ClientWidth = 1111
   Color = clBtnFace
   Font.Charset = DEFAULT_CHARSET
   Font.Color = clWindowText
@@ -25,9 +25,6 @@
     Align = alLeft
     BevelOuter = bvNone
     TabOrder = 0
-    ExplicitLeft = 8
-    ExplicitTop = 73
-    ExplicitHeight = 41
     object pnlNaam: TPanel
       Left = 0
       Top = 0
@@ -145,47 +142,42 @@
   object pnlFrames: TPanel
     Left = 185
     Top = 0
-    Width = 513
+    Width = 926
     Height = 408
     Align = alClient
     BevelOuter = bvNone
     TabOrder = 1
-    ExplicitLeft = 208
-    ExplicitTop = 169
-    ExplicitWidth = 185
-    ExplicitHeight = 41
+    ExplicitWidth = 513
     object pcFrames: TPageControl
       Left = 0
       Top = 0
-      Width = 513
+      Width = 926
       Height = 408
-      ActivePage = tsGebruikers
+      ActivePage = tsDnaCodes
       Align = alClient
       TabOrder = 0
+      ExplicitWidth = 513
       object tsDnaCodes: TTabSheet
         Caption = 'DnaCodes'
         TabVisible = False
-        ExplicitTop = 24
-        ExplicitWidth = 281
-        ExplicitHeight = 165
+        ExplicitWidth = 505
         inline frmDnaCodes: TfrmDnaCodes
           Left = 0
           Top = 0
-          Width = 505
+          Width = 918
           Height = 398
           Align = alClient
           TabOrder = 0
-          ExplicitWidth = 281
-          ExplicitHeight = 165
+          ExplicitWidth = 505
+          ExplicitHeight = 398
           inherited dbgDnaCodes: TDBGrid
-            Width = 378
-            Height = 357
+            Width = 791
+            Height = 325
           end
           inherited pnlActies: TPanel
-            Left = 378
-            Height = 357
-            ExplicitLeft = 384
-            ExplicitTop = 47
+            Left = 791
+            Height = 325
+            ExplicitLeft = 378
             ExplicitHeight = 357
             inherited btnMaatwerketiket: TButton
               Top = 105
@@ -201,36 +193,37 @@
             end
           end
           inherited pnlZoekKnoppen: TPanel
-            Width = 505
-            ExplicitWidth = 281
+            Width = 918
+            ExplicitWidth = 505
+            inherited btnZoeken: TButton
+              OnClick = frmDnaCodesbtnZoekenClick
+            end
           end
         end
       end
       object tsGebruikers: TTabSheet
         Caption = 'Gebruikers'
         ImageIndex = 1
         TabVisible = False
-        ExplicitTop = 24
-        ExplicitWidth = 281
-        ExplicitHeight = 165
+        ExplicitWidth = 505
         inline frmGebruikers: TfrmGebruikers
           Left = 0
           Top = 0
-          Width = 505
+          Width = 918
           Height = 398
           Align = alClient
           TabOrder = 0
-          ExplicitWidth = 513
-          ExplicitHeight = 408
+          ExplicitWidth = 505
+          ExplicitHeight = 398
           inherited dbgGebruikers: TDBGrid
-            Width = 378
+            Width = 791
             Height = 398
           end
           inherited Panel1: TPanel
-            Left = 378
+            Left = 791
             Height = 398
-            ExplicitLeft = 386
-            ExplicitHeight = 408
+            ExplicitLeft = 378
+            ExplicitHeight = 398
           end
         end
       end