Index: PlanScan/Main.dfm
===================================================================
diff -u -r294 -r346
--- PlanScan/Main.dfm	(.../Main.dfm)	(revision 294)
+++ PlanScan/Main.dfm	(.../Main.dfm)	(revision 346)
@@ -11,6 +11,7 @@
   Font.Name = 'Tahoma'
   Font.Style = []
   OldCreateOrder = False
+  Position = poScreenCenter
   OnClose = FormClose
   OnCreate = FormCreate
   OnShow = FormShow
@@ -30,7 +31,7 @@
     Top = 0
     Width = 635
     Height = 336
-    ActivePage = tsGebruikers
+    ActivePage = tsDnaCodes
     Align = alClient
     TabOrder = 1
     object tsDnaCodes: TTabSheet
@@ -180,6 +181,10 @@
       Caption = 'Gebruikers'
       ImageIndex = 1
       OnShow = tsGebruikersShow
+      ExplicitLeft = 0
+      ExplicitTop = 0
+      ExplicitWidth = 0
+      ExplicitHeight = 0
       object Panel1: TPanel
         Left = 500
         Top = 0
@@ -250,6 +255,7 @@
     Top = 192
   end
   object cdsDnaCodes: TClientDataSet
+    Active = True
     Aggregates = <>
     FieldDefs = <
       item
@@ -292,6 +298,17 @@
     StoreDefs = True
     Left = 32
     Top = 240
+    Data = {
+      320100009619E0BD010000001800000007000000000003000000320112636473
+      446E61436F646573446E61436F64650100490000000100055749445448020002
+      000A0011636473446E61436F64657350616C6C65740100490000000100055749
+      445448020002000A0016636473446E61436F646573546F656C65766572696E67
+      0100490000000100055749445448020002000A0011636473446E61436F646573
+      5374617475730100490000000100055749445448020002000A0010636473446E
+      61436F6465734261746368010049000000010005574944544802000200060017
+      636473446E61436F6465735363616E74696A6473746970010049000000010005
+      574944544802000200140014636473446E61436F646573496E697469616C656E
+      01004900000001000557494454480200020003000000}
   end
   object cdsGebruikers: TClientDataSet
     Aggregates = <>