--- dao/DelphiScanner/Main.dfm	2016/05/31 11:50:42	3038
+++ dao/DelphiScanner/Main.dfm	2016/06/01 13:25:34	3039
@@ -3823,6 +3823,21 @@
     Proportional = True
     Transparent = True
   end
+  object KommentarST: TLabel
+    Left = 24
+    Top = 200
+    Width = 763
+    Height = 104
+    AutoSize = False
+    Caption = '<Kommentar>'
+    Font.Charset = DEFAULT_CHARSET
+    Font.Color = clWindowText
+    Font.Height = -32
+    Font.Name = 'Tahoma'
+    Font.Style = []
+    ParentFont = False
+    WordWrap = True
+  end
   object btnNulstil: TButton
     Left = 712
     Top = 29
@@ -3832,7 +3847,7 @@
       'Nulstiller en fejlmelding s'#229' programmet er klar til n'#230'ste scanni' +
       'ng'
     Caption = 'Nulstil'
-    TabOrder = 16
+    TabOrder = 15
     Visible = False
     OnClick = btnNulstilClick
   end
@@ -3849,7 +3864,7 @@
     BevelOuter = bvLowered
     ParentBackground = False
     ParentColor = True
-    TabOrder = 7
+    TabOrder = 6
   end
   object StregkodeST: TStaticText
     Left = 126
@@ -3891,7 +3906,7 @@
   end
   object BoghandlerNavnST: TStaticText
     Left = 24
-    Top = 147
+    Top = 149
     Width = 254
     Height = 43
     Margins.Left = 5
@@ -3909,7 +3924,7 @@
   end
   object chkSporgEfterKunde: TCheckBox
     Left = 24
-    Top = 257
+    Top = 312
     Width = 446
     Height = 26
     Hint = 
@@ -3923,27 +3938,9 @@
     TabOrder = 3
     OnClick = chkSporgEfterKundeClick
   end
-  object KommentarST: TStaticText
-    Left = 24
-    Top = 204
-    Width = 215
-    Height = 43
-    Margins.Left = 5
-    Margins.Top = 5
-    Margins.Right = 5
-    Margins.Bottom = 5
-    Caption = '<Kommentar>'
-    Font.Charset = DEFAULT_CHARSET
-    Font.Color = clWindowText
-    Font.Height = -32
-    Font.Name = 'Tahoma'
-    Font.Style = []
-    ParentFont = False
-    TabOrder = 4
-  end
   object radioStorPakke: TRadioButton
     Left = 216
-    Top = 285
+    Top = 340
     Width = 170
     Height = 26
     Hint = 'Markeres n'#229'r der skal scannes en stor pakke'
@@ -3952,12 +3949,12 @@
     Margins.Right = 5
     Margins.Bottom = 5
     Caption = 'Stor pakke'
-    TabOrder = 5
+    TabOrder = 4
     OnClick = radioStorPakkeClick
   end
   object radioLillePakke: TRadioButton
     Left = 24
-    Top = 285
+    Top = 340
     Width = 170
     Height = 26
     Hint = 'Markeres n'#229'r der skal scannes en lille pakke'
@@ -3966,44 +3963,44 @@
     Margins.Right = 5
     Margins.Bottom = 5
     Caption = 'Lille pakke'
-    TabOrder = 6
+    TabOrder = 5
     OnClick = radioLillePakkeClick
   end
   object ListBox1: TListBox
     Left = 8
-    Top = 391
+    Top = 430
     Width = 874
     Height = 163
     Hint = 'Log vindue viser handlinger og meddelelser fra programmet'
     Style = lbOwnerDrawFixed
     Anchors = [akLeft, akTop, akRight]
     ItemHeight = 19
-    TabOrder = 9
+    TabOrder = 8
     OnDrawItem = ListBox1DrawItem
   end
   object BtnDownloadKontrolfil: TButton
     Left = 904
-    Top = 445
+    Top = 484
     Width = 88
     Height = 47
     Hint = 'Hent rute kontrol filen fra DAO ftp server'
     Anchors = [akTop, akRight]
     Caption = 'Download kontrol fil'
     Enabled = False
-    TabOrder = 10
+    TabOrder = 9
     WordWrap = True
     OnClick = BtnDownloadKontrolfilClick
   end
   object ListBox2: TListBox
     Left = 8
-    Top = 560
+    Top = 600
     Width = 874
-    Height = 277
+    Height = 237
     Hint = 'Status vindue viser hvad der endnu ikke er scannet'
     Style = lbOwnerDrawFixed
     Anchors = [akLeft, akTop, akRight, akBottom]
     ItemHeight = 19
-    TabOrder = 11
+    TabOrder = 10
     OnDrawItem = ListBox1DrawItem
   end
   object BtnOpdaterListen: TButton
@@ -4015,32 +4012,32 @@
     Anchors = [akRight, akBottom]
     Caption = 'Opdater listen'
     Enabled = False
-    TabOrder = 12
+    TabOrder = 11
     WordWrap = True
     OnClick = BtnOpdaterListenClick
   end
   object BtnUploadLogfil: TButton
     Left = 904
-    Top = 391
+    Top = 430
     Width = 88
     Height = 47
     Hint = 'Sender log filen til DAO ftp server'
     Anchors = [akTop, akRight]
     Caption = 'Upload  log fil'
     Enabled = False
-    TabOrder = 13
+    TabOrder = 12
     WordWrap = True
     OnClick = BtnUploadLogfilClick
   end
   object BtnDownloadRuteskiftFil: TButton
     Left = 904
-    Top = 498
+    Top = 537
     Width = 88
     Height = 47
     Hint = 'Henter ruteskift fil fra DAO ftp server'
     Anchors = [akTop, akRight]
     Caption = 'Download ruteskift fil'
-    TabOrder = 14
+    TabOrder = 13
     Visible = False
     WordWrap = True
     OnClick = BtnDownloadRuteskiftFilClick
@@ -4052,17 +4049,17 @@
     Height = 23
     Hint = 'Viser hvad programmet forventer i input feltet'
     Caption = 'Stregkode'
-    TabOrder = 15
+    TabOrder = 14
     Visible = False
   end
   object chkAltidPrintLabel: TCheckBox
     Left = 505
-    Top = 261
+    Top = 316
     Width = 446
     Height = 26
     Hint = 'Markeres n'#229'r der '#248'nskes print af pakkelabel med ruteinformation'
     Caption = 'Altid printe pakkelabel'
-    TabOrder = 17
+    TabOrder = 16
     OnClick = chkAltidPrintLabelClick
   end
   object BtnEKLoverforsel: TButton
@@ -4074,7 +4071,7 @@
     Anchors = [akRight, akBottom]
     Caption = 'Overf'#248'r   til EKL'
     Enabled = False
-    TabOrder = 18
+    TabOrder = 17
     WordWrap = True
     OnClick = BtnEKLoverforselClick
   end
@@ -4090,16 +4087,16 @@
     Font.Name = 'Tahoma'
     Font.Style = []
     ParentFont = False
-    TabOrder = 19
+    TabOrder = 18
   end
   object chkScanTjekkode: TCheckBox
     Left = 24
-    Top = 310
+    Top = 365
     Width = 353
     Height = 26
     Hint = 'Markeres n'#229'r der ogs'#229' skal scannes en tjekkode label'
     Caption = 'Scan ogs'#229' tjekkoden'
-    TabOrder = 20
+    TabOrder = 19
     OnClick = chkScanTjekkodeClick
   end
   object PanelValgA: TPanel
@@ -4112,7 +4109,7 @@
     Anchors = [akTop, akRight]
     Caption = '   Automatisk valg'
     ParentBackground = False
-    TabOrder = 21
+    TabOrder = 20
     OnClick = PanelValgAClick
   end
   object PanelValg1: TPanel
@@ -4127,12 +4124,12 @@
     Anchors = [akTop, akRight]
     Caption = '   DAO NAT X-PRESS'
     ParentBackground = False
-    TabOrder = 22
+    TabOrder = 21
     OnClick = PanelValg1Click
   end
   object PanelValg2: TPanel
     Left = 807
-    Top = 101
+    Top = 100
     Width = 185
     Height = 41
     Hint = 
@@ -4140,9 +4137,9 @@
       'rneres til leverand'#248'ren fra scanningsstedet'
     Alignment = taLeftJustify
     Anchors = [akTop, akRight]
-    Caption = '   Retur fra DAO'
+    Caption = '   NatX /Retur fra DAO'
     ParentBackground = False
-    TabOrder = 23
+    TabOrder = 22
     OnClick = PanelValg2Click
   end
   object PanelValg3: TPanel
@@ -4155,9 +4152,9 @@
       'rneres til leverand'#248'ren fra kunden'
     Alignment = taLeftJustify
     Anchors = [akTop, akRight]
-    Caption = '   Retur fra kunde'
+    Caption = '   NatX /Retur fra kunde'
     ParentBackground = False
-    TabOrder = 24
+    TabOrder = 23
     OnClick = PanelValg3Click
   end
   object PanelValg4: TPanel
@@ -4170,7 +4167,7 @@
     Anchors = [akTop, akRight]
     Caption = '   DAO DIREKTE'
     ParentBackground = False
-    TabOrder = 25
+    TabOrder = 24
     OnClick = PanelValg4Click
   end
   object PanelValg5: TPanel
@@ -4183,7 +4180,7 @@
     Anchors = [akTop, akRight]
     Caption = '   DAO PAKKESHOP'
     ParentBackground = False
-    TabOrder = 26
+    TabOrder = 25
     OnClick = PanelValg5Click
   end
   object PanelValg6: TPanel
@@ -4198,12 +4195,12 @@
     Anchors = [akTop, akRight]
     Caption = '   Retur fra pakkeshop'
     ParentBackground = False
-    TabOrder = 27
+    TabOrder = 26
     OnClick = PanelValg6Click
   end
   object Button1: TButton
     Left = 436
-    Top = 401
+    Top = 440
     Width = 125
     Height = 38
     Margins.Left = 5
@@ -4211,13 +4208,13 @@
     Margins.Right = 5
     Margins.Bottom = 5
     Caption = 'Tjek stregkode'
-    TabOrder = 8
+    TabOrder = 7
     Visible = False
     OnClick = Button1Click
   end
   object StaticTextManglendePakker: TStaticText
     Left = 528
-    Top = 294
+    Top = 349
     Width = 272
     Height = 52
     Hint = 
@@ -4233,7 +4230,7 @@
     Font.Name = 'Tahoma'
     Font.Style = []
     ParentFont = False
-    TabOrder = 28
+    TabOrder = 27
   end
   object PanelManglendePakker1: TPanel
     Left = 953
@@ -4250,7 +4247,7 @@
     Font.Style = []
     ParentBackground = False
     ParentFont = False
-    TabOrder = 29
+    TabOrder = 28
     Visible = False
   end
   object PanelManglendePakker2: TPanel
@@ -4268,7 +4265,7 @@
     Font.Style = []
     ParentBackground = False
     ParentFont = False
-    TabOrder = 30
+    TabOrder = 29
     Visible = False
   end
   object PanelManglendePakker3: TPanel
@@ -4286,7 +4283,7 @@
     Font.Style = []
     ParentBackground = False
     ParentFont = False
-    TabOrder = 31
+    TabOrder = 30
     Visible = False
   end
   object PanelManglendePakker4: TPanel
@@ -4304,7 +4301,7 @@
     Font.Style = []
     ParentBackground = False
     ParentFont = False
-    TabOrder = 32
+    TabOrder = 31
     Visible = False
   end
   object PanelManglendePakker5: TPanel
@@ -4322,7 +4319,7 @@
     Font.Style = []
     ParentBackground = False
     ParentFont = False
-    TabOrder = 33
+    TabOrder = 32
     Visible = False
   end
   object PanelManglendePakker6: TPanel
@@ -4340,12 +4337,12 @@
     Font.Style = []
     ParentBackground = False
     ParentFont = False
-    TabOrder = 34
+    TabOrder = 33
     Visible = False
   end
   object PanelValg7: TPanel
     Left = 806
-    Top = 338
+    Top = 377
     Width = 185
     Height = 41
     Hint = 
@@ -4355,24 +4352,24 @@
     Anchors = [akTop, akRight]
     Caption = '   Indleveringskode'
     ParentBackground = False
-    TabOrder = 35
+    TabOrder = 34
     OnClick = PanelValg7Click
   end
   object chkForstorTilDirekte: TCheckBox
     Left = 24
-    Top = 342
+    Top = 397
     Width = 238
     Height = 22
     Caption = 'For stor til DAO Direkte'
-    TabOrder = 36
+    TabOrder = 35
   end
   object chkEmballageRepareret: TCheckBox
     Left = 268
-    Top = 342
+    Top = 397
     Width = 181
     Height = 22
     Caption = 'Emballage Repareret'
-    TabOrder = 37
+    TabOrder = 36
   end
   object IdHTTP1: TIdHTTP
     AllowCookies = True
@@ -4391,21 +4388,21 @@
     Request.Ranges = <>
     HTTPOptions = [hoForceEncodeParams]
     Left = 88
-    Top = 384
+    Top = 423
   end
   object XMLDocument1: TXMLDocument
     Left = 200
-    Top = 424
+    Top = 463
     DOMVendorDesc = 'MSXML'
   end
   object ApplicationEvents1: TApplicationEvents
     OnIdle = ApplicationEvents1Idle
     Left = 336
-    Top = 392
+    Top = 431
   end
   object MainMenu1: TMainMenu
     Left = 136
-    Top = 408
+    Top = 447
     object Afslut1: TMenuItem
       Caption = 'Afslut'
       object Lukprogrammet1: TMenuItem
@@ -4563,12 +4560,12 @@
     ProxySettings.ProxyType = fpcmNone
     ProxySettings.Port = 0
     Left = 264
-    Top = 392
+    Top = 431
   end
   object Timer1: TTimer
     Interval = 60000
     OnTimer = Timer1Timer
     Left = 40
-    Top = 392
+    Top = 431
   end
 end