--- dao/DelphiScanner/Main.dfm 2016/07/27 15:25:24 3073 +++ dao/DelphiScanner/Main.dfm 2016/09/22 13:12:23 3117 @@ -2,7 +2,7 @@ Left = 300 Top = 131 Caption = 'Scanning af pakker' - ClientHeight = 897 + ClientHeight = 854 ClientWidth = 1065 Color = clBtnFace Constraints.MinHeight = 750 @@ -3629,7 +3629,7 @@ OnKeyPress = FormKeyPress DesignSize = ( 1065 - 897) + 854) PixelsPerInch = 96 TextHeight = 19 object Image1: TImage @@ -3867,8 +3867,8 @@ TabOrder = 6 end object StregkodeST: TStaticText - Left = 126 - Top = 30 + Left = 122 + Top = 29 Width = 197 Height = 43 Margins.Left = 5 @@ -3888,7 +3888,7 @@ end object RuteNummerST: TStaticText Left = 24 - Top = 95 + Top = 96 Width = 238 Height = 43 Margins.Left = 5 @@ -3990,13 +3990,12 @@ TabOrder = 9 WordWrap = True OnClick = BtnDownloadKontrolfilClick - ExplicitLeft = 904 end object ListBox2: TListBox Left = 8 - Top = 656 + Top = 655 Width = 939 - Height = 220 + Height = 225 Hint = 'Status vindue viser hvad der endnu ikke er scannet' Style = lbOwnerDrawFixed Anchors = [akLeft, akTop, akRight, akBottom] @@ -4006,7 +4005,7 @@ end object BtnOpdaterListen: TButton Left = 969 - Top = 832 + Top = 833 Width = 88 Height = 47 Hint = 'Henter oplysning om de pakker der endnu ikke er scannet modtaget' @@ -4016,8 +4015,6 @@ TabOrder = 11 WordWrap = True OnClick = BtnOpdaterListenClick - ExplicitLeft = 904 - ExplicitTop = 793 end object BtnUploadLogfil: TButton Left = 969 @@ -4031,7 +4028,6 @@ TabOrder = 12 WordWrap = True OnClick = BtnUploadLogfilClick - ExplicitLeft = 904 end object BtnDownloadRuteskiftFil: TButton Left = 969 @@ -4045,7 +4041,6 @@ Visible = False WordWrap = True OnClick = BtnDownloadRuteskiftFilClick - ExplicitLeft = 904 end object PakkeshopText1: TStaticText Left = 712 @@ -4068,8 +4063,8 @@ OnClick = chkAltidPrintLabelClick end object BtnEKLoverforsel: TButton - Left = 970 - Top = 779 + Left = 969 + Top = 780 Width = 88 Height = 47 Hint = 'Overf'#248'r de scannede pakker til EKL systemet' @@ -4079,8 +4074,6 @@ TabOrder = 17 WordWrap = True OnClick = BtnEKLoverforselClick - ExplicitLeft = 905 - ExplicitTop = 740 end object PrinterstatusStaticText1: TStaticText Left = 119 @@ -4119,7 +4112,6 @@ ParentBackground = False TabOrder = 20 OnClick = PanelValgAClick - ExplicitLeft = 807 end object PanelValg1: TPanel Left = 872 @@ -4135,7 +4127,6 @@ ParentBackground = False TabOrder = 21 OnClick = PanelValg1Click - ExplicitLeft = 807 end object PanelValg2: TPanel Left = 872 @@ -4151,7 +4142,6 @@ ParentBackground = False TabOrder = 22 OnClick = PanelValg2Click - ExplicitLeft = 807 end object PanelValg3: TPanel Left = 872 @@ -4167,7 +4157,6 @@ ParentBackground = False TabOrder = 23 OnClick = PanelValg3Click - ExplicitLeft = 807 end object PanelValg4: TPanel Left = 872 @@ -4181,7 +4170,6 @@ ParentBackground = False TabOrder = 24 OnClick = PanelValg4Click - ExplicitLeft = 807 end object PanelValg5: TPanel Left = 872 @@ -4195,7 +4183,6 @@ ParentBackground = False TabOrder = 25 OnClick = PanelValg5Click - ExplicitLeft = 807 end object PanelValg6: TPanel Left = 872 @@ -4211,7 +4198,6 @@ ParentBackground = False TabOrder = 26 OnClick = PanelValg6Click - ExplicitLeft = 807 end object Button1: TButton Left = 675 @@ -4246,7 +4232,6 @@ Font.Style = [] ParentFont = False TabOrder = 27 - ExplicitLeft = 528 end object PanelManglendePakker1: TPanel Left = 1018 @@ -4265,7 +4250,6 @@ ParentFont = False TabOrder = 28 Visible = False - ExplicitLeft = 953 end object PanelManglendePakker2: TPanel Left = 1019 @@ -4284,7 +4268,6 @@ ParentFont = False TabOrder = 29 Visible = False - ExplicitLeft = 954 end object PanelManglendePakker3: TPanel Left = 1019 @@ -4303,7 +4286,6 @@ ParentFont = False TabOrder = 30 Visible = False - ExplicitLeft = 954 end object PanelManglendePakker4: TPanel Left = 1019 @@ -4322,7 +4304,6 @@ ParentFont = False TabOrder = 31 Visible = False - ExplicitLeft = 954 end object PanelManglendePakker5: TPanel Left = 1019 @@ -4341,7 +4322,6 @@ ParentFont = False TabOrder = 32 Visible = False - ExplicitLeft = 954 end object PanelManglendePakker6: TPanel Left = 1019 @@ -4360,7 +4340,6 @@ ParentFont = False TabOrder = 33 Visible = False - ExplicitLeft = 954 end object PanelValg7: TPanel Left = 871 @@ -4376,7 +4355,6 @@ ParentBackground = False TabOrder = 34 OnClick = PanelValg7Click - ExplicitLeft = 806 end object chkForstorTilDirekte: TCheckBox Left = 24 @@ -4393,6 +4371,7 @@ Height = 22 Caption = 'Emballage Repareret' TabOrder = 36 + OnClick = chkEmballageRepareretClick end object chkUdenforSpecifikation: TCheckBox Left = 24 @@ -4401,6 +4380,7 @@ Height = 17 Caption = 'Pakke over m'#229'l - returneres' TabOrder = 37 + OnClick = chkUdenforSpecifikationClick end object IdHTTP1: TIdHTTP AllowCookies = True