/[projects]/dao/DelphiScanner/Main.dfm
ViewVC logotype

Diff of /dao/DelphiScanner/Main.dfm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 2650 by torben, Thu Aug 20 20:58:26 2015 UTC revision 3073 by torben, Wed Jul 27 15:25:24 2016 UTC
# Line 2  object MainForm: TMainForm Line 2  object MainForm: TMainForm
2    Left = 300    Left = 300
3    Top = 131    Top = 131
4    Caption = 'Scanning af pakker'    Caption = 'Scanning af pakker'
5    ClientHeight = 858    ClientHeight = 897
6    ClientWidth = 1000    ClientWidth = 1065
7    Color = clBtnFace    Color = clBtnFace
8    Constraints.MinHeight = 750    Constraints.MinHeight = 750
9    Constraints.MinWidth = 1000    Constraints.MinWidth = 1000
# Line 3628  object MainForm: TMainForm Line 3628  object MainForm: TMainForm
3628    OnDestroy = FormDestroy    OnDestroy = FormDestroy
3629    OnKeyPress = FormKeyPress    OnKeyPress = FormKeyPress
3630    DesignSize = (    DesignSize = (
3631      1000      1065
3632      858)      897)
3633    PixelsPerInch = 96    PixelsPerInch = 96
3634    TextHeight = 19    TextHeight = 19
3635    object Image1: TImage    object Image1: TImage
# Line 3823  object MainForm: TMainForm Line 3823  object MainForm: TMainForm
3823      Proportional = True      Proportional = True
3824      Transparent = True      Transparent = True
3825    end    end
3826    object PakkeshopNulstil: TButton    object KommentarST: TLabel
3827        Left = 24
3828        Top = 200
3829        Width = 763
3830        Height = 104
3831        AutoSize = False
3832        Caption = '<Kommentar>'
3833        Font.Charset = DEFAULT_CHARSET
3834        Font.Color = clWindowText
3835        Font.Height = -32
3836        Font.Name = 'Tahoma'
3837        Font.Style = []
3838        ParentFont = False
3839        WordWrap = True
3840      end
3841      object btnNulstil: TButton
3842      Left = 712      Left = 712
3843      Top = 29      Top = 29
3844      Width = 88      Width = 88
# Line 3832  object MainForm: TMainForm Line 3847  object MainForm: TMainForm
3847        'Nulstiller en fejlmelding s'#229' programmet er klar til n'#230'ste scanni' +        'Nulstiller en fejlmelding s'#229' programmet er klar til n'#230'ste scanni' +
3848        'ng'        'ng'
3849      Caption = 'Nulstil'      Caption = 'Nulstil'
3850      TabOrder = 16      TabOrder = 15
3851      Visible = False      Visible = False
3852      OnClick = PakkeshopNulstilClick      OnClick = btnNulstilClick
3853    end    end
3854    object Panel1: TPanel    object Panel1: TPanel
3855      Left = 119      Left = 119
# Line 3849  object MainForm: TMainForm Line 3864  object MainForm: TMainForm
3864      BevelOuter = bvLowered      BevelOuter = bvLowered
3865      ParentBackground = False      ParentBackground = False
3866      ParentColor = True      ParentColor = True
3867      TabOrder = 7      TabOrder = 6
3868    end    end
3869    object StregkodeST: TStaticText    object StregkodeST: TStaticText
3870      Left = 126      Left = 126
# Line 3891  object MainForm: TMainForm Line 3906  object MainForm: TMainForm
3906    end    end
3907    object BoghandlerNavnST: TStaticText    object BoghandlerNavnST: TStaticText
3908      Left = 24      Left = 24
3909      Top = 147      Top = 149
3910      Width = 254      Width = 254
3911      Height = 43      Height = 43
3912      Margins.Left = 5      Margins.Left = 5
# Line 3907  object MainForm: TMainForm Line 3922  object MainForm: TMainForm
3922      ParentFont = False      ParentFont = False
3923      TabOrder = 2      TabOrder = 2
3924    end    end
3925    object CheckBox1: TCheckBox    object chkSporgEfterKunde: TCheckBox
3926      Left = 24      Left = 24
3927      Top = 261      Top = 312
3928      Width = 446      Width = 446
3929      Height = 26      Height = 26
3930      Hint =      Hint =
# Line 3921  object MainForm: TMainForm Line 3936  object MainForm: TMainForm
3936      Margins.Bottom = 5      Margins.Bottom = 5
3937      Caption = 'Sp'#248'rg efter kundenummer ved ukendte pakker'      Caption = 'Sp'#248'rg efter kundenummer ved ukendte pakker'
3938      TabOrder = 3      TabOrder = 3
3939      OnClick = CheckBox1Click      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  
3940    end    end
3941    object RadioButton1: TRadioButton    object radioStorPakke: TRadioButton
3942      Left = 216      Left = 216
3943      Top = 285      Top = 340
3944      Width = 170      Width = 170
3945      Height = 26      Height = 26
3946      Hint = 'Markeres n'#229'r der skal scannes en stor pakke'      Hint = 'Markeres n'#229'r der skal scannes en stor pakke'
# Line 3952  object MainForm: TMainForm Line 3949  object MainForm: TMainForm
3949      Margins.Right = 5      Margins.Right = 5
3950      Margins.Bottom = 5      Margins.Bottom = 5
3951      Caption = 'Stor pakke'      Caption = 'Stor pakke'
3952      TabOrder = 5      TabOrder = 4
3953      OnClick = RadioButton1Click      OnClick = radioStorPakkeClick
3954    end    end
3955    object RadioButton2: TRadioButton    object radioLillePakke: TRadioButton
3956      Left = 24      Left = 24
3957      Top = 285      Top = 340
3958      Width = 170      Width = 170
3959      Height = 26      Height = 26
3960      Hint = 'Markeres n'#229'r der skal scannes en lille pakke'      Hint = 'Markeres n'#229'r der skal scannes en lille pakke'
# Line 3966  object MainForm: TMainForm Line 3963  object MainForm: TMainForm
3963      Margins.Right = 5      Margins.Right = 5
3964      Margins.Bottom = 5      Margins.Bottom = 5
3965      Caption = 'Lille pakke'      Caption = 'Lille pakke'
3966      TabOrder = 6      TabOrder = 5
3967      OnClick = RadioButton2Click      OnClick = radioLillePakkeClick
3968    end    end
3969    object ListBox1: TListBox    object ListBox1: TListBox
3970      Left = 8      Left = 8
3971      Top = 391      Top = 486
3972      Width = 874      Width = 939
3973      Height = 163      Height = 163
3974      Hint = 'Log vindue viser handlinger og meddelelser fra programmet'      Hint = 'Log vindue viser handlinger og meddelelser fra programmet'
3975      Style = lbOwnerDrawFixed      Style = lbOwnerDrawFixed
3976      Anchors = [akLeft, akTop, akRight]      Anchors = [akLeft, akTop, akRight]
3977      ItemHeight = 19      ItemHeight = 19
3978      TabOrder = 9      TabOrder = 8
3979      OnDrawItem = ListBox1DrawItem      OnDrawItem = ListBox1DrawItem
3980    end    end
3981    object DownloadButton01: TButton    object BtnDownloadKontrolfil: TButton
3982      Left = 904      Left = 969
3983      Top = 445      Top = 484
3984      Width = 88      Width = 88
3985      Height = 47      Height = 47
3986      Hint = 'Hent rute kontrol filen fra DAO ftp server'      Hint = 'Hent rute kontrol filen fra DAO ftp server'
3987      Anchors = [akTop, akRight]      Anchors = [akTop, akRight]
3988      Caption = 'Download kontrol fil'      Caption = 'Download kontrol fil'
3989      Enabled = False      Enabled = False
3990      TabOrder = 10      TabOrder = 9
3991      WordWrap = True      WordWrap = True
3992      OnClick = DownloadButton01Click      OnClick = BtnDownloadKontrolfilClick
3993        ExplicitLeft = 904
3994    end    end
3995    object ListBox2: TListBox    object ListBox2: TListBox
3996      Left = 8      Left = 8
3997      Top = 560      Top = 656
3998      Width = 874      Width = 939
3999      Height = 277      Height = 220
4000      Hint = 'Status vindue viser hvad der endnu ikke er scannet'      Hint = 'Status vindue viser hvad der endnu ikke er scannet'
4001      Style = lbOwnerDrawFixed      Style = lbOwnerDrawFixed
4002      Anchors = [akLeft, akTop, akRight, akBottom]      Anchors = [akLeft, akTop, akRight, akBottom]
4003      ItemHeight = 19      ItemHeight = 19
4004      TabOrder = 11      TabOrder = 10
4005      OnDrawItem = ListBox1DrawItem      OnDrawItem = ListBox1DrawItem
     ExplicitHeight = 169  
4006    end    end
4007    object OpdaterListenButton01: TButton    object BtnOpdaterListen: TButton
4008      Left = 905      Left = 969
4009      Top = 790      Top = 832
4010      Width = 88      Width = 88
4011      Height = 47      Height = 47
4012      Hint = 'Henter oplysning om de pakker der endnu ikke er scannet modtaget'      Hint = 'Henter oplysning om de pakker der endnu ikke er scannet modtaget'
4013      Anchors = [akRight, akBottom]      Anchors = [akRight, akBottom]
4014      Caption = 'Opdater listen'      Caption = 'Opdater listen'
4015      Enabled = False      Enabled = False
4016      TabOrder = 12      TabOrder = 11
4017      WordWrap = True      WordWrap = True
4018      OnClick = OpdaterListenButton01Click      OnClick = BtnOpdaterListenClick
4019      ExplicitTop = 604      ExplicitLeft = 904
4020    end      ExplicitTop = 793
4021    object UploadButton01: TButton    end
4022      Left = 904    object BtnUploadLogfil: TButton
4023      Top = 391      Left = 969
4024        Top = 430
4025      Width = 88      Width = 88
4026      Height = 47      Height = 47
4027      Hint = 'Sender log filen til DAO ftp server'      Hint = 'Sender log filen til DAO ftp server'
4028      Anchors = [akTop, akRight]      Anchors = [akTop, akRight]
4029      Caption = 'Upload  log fil'      Caption = 'Upload  log fil'
4030      Enabled = False      Enabled = False
4031      TabOrder = 13      TabOrder = 12
4032      WordWrap = True      WordWrap = True
4033      OnClick = UploadButton01Click      OnClick = BtnUploadLogfilClick
4034        ExplicitLeft = 904
4035    end    end
4036    object DownloadButton03: TButton    object BtnDownloadRuteskiftFil: TButton
4037      Left = 904      Left = 969
4038      Top = 498      Top = 537
4039      Width = 88      Width = 88
4040      Height = 47      Height = 47
4041      Hint = 'Henter ruteskift fil fra DAO ftp server'      Hint = 'Henter ruteskift fil fra DAO ftp server'
4042      Anchors = [akTop, akRight]      Anchors = [akTop, akRight]
4043      Caption = 'Download ruteskift fil'      Caption = 'Download ruteskift fil'
4044      TabOrder = 14      TabOrder = 13
4045      Visible = False      Visible = False
4046      WordWrap = True      WordWrap = True
4047      OnClick = DownloadButton03Click      OnClick = BtnDownloadRuteskiftFilClick
4048        ExplicitLeft = 904
4049    end    end
4050    object PakkeshopText1: TStaticText    object PakkeshopText1: TStaticText
4051      Left = 712      Left = 712
# Line 4054  object MainForm: TMainForm Line 4054  object MainForm: TMainForm
4054      Height = 23      Height = 23
4055      Hint = 'Viser hvad programmet forventer i input feltet'      Hint = 'Viser hvad programmet forventer i input feltet'
4056      Caption = 'Stregkode'      Caption = 'Stregkode'
4057      TabOrder = 15      TabOrder = 14
4058      Visible = False      Visible = False
4059    end    end
4060    object CheckBox2: TCheckBox    object chkAltidPrintLabel: TCheckBox
4061      Left = 505      Left = 505
4062      Top = 261      Top = 316
4063      Width = 446      Width = 446
4064      Height = 26      Height = 26
4065      Hint = 'Markeres n'#229'r der '#248'nskes print af pakkelabel med ruteinformation'      Hint = 'Markeres n'#229'r der '#248'nskes print af pakkelabel med ruteinformation'
4066      Caption = 'Altid printe pakkelabel'      Caption = 'Altid printe pakkelabel'
4067      TabOrder = 17      TabOrder = 16
4068      OnClick = CheckBox2Click      OnClick = chkAltidPrintLabelClick
4069    end    end
4070    object EKLoverforsel: TButton    object BtnEKLoverforsel: TButton
4071      Left = 905      Left = 970
4072      Top = 740      Top = 779
4073      Width = 88      Width = 88
4074      Height = 47      Height = 47
4075      Hint = 'Overf'#248'r de scannede pakker til EKL systemet'      Hint = 'Overf'#248'r de scannede pakker til EKL systemet'
4076      Anchors = [akRight, akBottom]      Anchors = [akRight, akBottom]
4077      Caption = 'Overf'#248'r   til EKL'      Caption = 'Overf'#248'r   til EKL'
4078      Enabled = False      Enabled = False
4079      TabOrder = 18      TabOrder = 17
4080      WordWrap = True      WordWrap = True
4081      OnClick = EKLoverforselClick      OnClick = BtnEKLoverforselClick
4082      ExplicitTop = 554      ExplicitLeft = 905
4083        ExplicitTop = 740
4084    end    end
4085    object PrinterstatusStaticText1: TStaticText    object PrinterstatusStaticText1: TStaticText
4086      Left = 119      Left = 119
# Line 4093  object MainForm: TMainForm Line 4094  object MainForm: TMainForm
4094      Font.Name = 'Tahoma'      Font.Name = 'Tahoma'
4095      Font.Style = []      Font.Style = []
4096      ParentFont = False      ParentFont = False
4097      TabOrder = 19      TabOrder = 18
4098    end    end
4099    object CheckBox3: TCheckBox    object chkScanTjekkode: TCheckBox
4100      Left = 24      Left = 64
4101      Top = 310      Top = 537
4102      Width = 353      Width = 353
4103      Height = 26      Height = 26
4104      Hint = 'Markeres n'#229'r der ogs'#229' skal scannes en tjekkode label'      Hint = 'Markeres n'#229'r der ogs'#229' skal scannes en tjekkode label'
4105      Caption = 'Scan ogs'#229' tjekkoden'      Caption = 'Scan ogs'#229' tjekkoden'
4106      TabOrder = 20      TabOrder = 19
4107      OnClick = CheckBox3Click      Visible = False
4108        OnClick = chkScanTjekkodeClick
4109    end    end
4110    object PanelValgA: TPanel    object PanelValgA: TPanel
4111      Left = 808      Left = 872
4112      Top = 7      Top = 7
4113      Width = 185      Width = 185
4114      Height = 41      Height = 41
# Line 4115  object MainForm: TMainForm Line 4117  object MainForm: TMainForm
4117      Anchors = [akTop, akRight]      Anchors = [akTop, akRight]
4118      Caption = '   Automatisk valg'      Caption = '   Automatisk valg'
4119      ParentBackground = False      ParentBackground = False
4120      TabOrder = 21      TabOrder = 20
4121      OnClick = PanelValgAClick      OnClick = PanelValgAClick
4122        ExplicitLeft = 807
4123    end    end
4124    object PanelValg1: TPanel    object PanelValg1: TPanel
4125      Left = 808      Left = 872
4126      Top = 59      Top = 59
4127      Width = 185      Width = 185
4128      Height = 41      Height = 41
# Line 4129  object MainForm: TMainForm Line 4132  object MainForm: TMainForm
4132      Alignment = taLeftJustify      Alignment = taLeftJustify
4133      Anchors = [akTop, akRight]      Anchors = [akTop, akRight]
4134      Caption = '   DAO NAT X-PRESS'      Caption = '   DAO NAT X-PRESS'
4135      TabOrder = 22      ParentBackground = False
4136        TabOrder = 21
4137      OnClick = PanelValg1Click      OnClick = PanelValg1Click
4138        ExplicitLeft = 807
4139    end    end
4140    object PanelValg2: TPanel    object PanelValg2: TPanel
4141      Left = 808      Left = 872
4142      Top = 101      Top = 100
4143      Width = 185      Width = 185
4144      Height = 41      Height = 41
4145      Hint =      Hint =
# Line 4142  object MainForm: TMainForm Line 4147  object MainForm: TMainForm
4147        'rneres til leverand'#248'ren fra scanningsstedet'        'rneres til leverand'#248'ren fra scanningsstedet'
4148      Alignment = taLeftJustify      Alignment = taLeftJustify
4149      Anchors = [akTop, akRight]      Anchors = [akTop, akRight]
4150      Caption = '   Retur fra DAO'      Caption = '   NatX /Retur fra DAO'
4151      TabOrder = 23      ParentBackground = False
4152        TabOrder = 22
4153      OnClick = PanelValg2Click      OnClick = PanelValg2Click
4154        ExplicitLeft = 807
4155    end    end
4156    object PanelValg3: TPanel    object PanelValg3: TPanel
4157      Left = 808      Left = 872
4158      Top = 143      Top = 143
4159      Width = 185      Width = 185
4160      Height = 41      Height = 41
# Line 4156  object MainForm: TMainForm Line 4163  object MainForm: TMainForm
4163        'rneres til leverand'#248'ren fra kunden'        'rneres til leverand'#248'ren fra kunden'
4164      Alignment = taLeftJustify      Alignment = taLeftJustify
4165      Anchors = [akTop, akRight]      Anchors = [akTop, akRight]
4166      Caption = '   Retur fra kunde'      Caption = '   NatX /Retur fra kunde'
4167      TabOrder = 24      ParentBackground = False
4168        TabOrder = 23
4169      OnClick = PanelValg3Click      OnClick = PanelValg3Click
4170        ExplicitLeft = 807
4171    end    end
4172    object PanelValg4: TPanel    object PanelValg4: TPanel
4173      Left = 808      Left = 872
4174      Top = 196      Top = 196
4175      Width = 185      Width = 185
4176      Height = 41      Height = 41
# Line 4169  object MainForm: TMainForm Line 4178  object MainForm: TMainForm
4178      Alignment = taLeftJustify      Alignment = taLeftJustify
4179      Anchors = [akTop, akRight]      Anchors = [akTop, akRight]
4180      Caption = '   DAO DIREKTE'      Caption = '   DAO DIREKTE'
4181      TabOrder = 25      ParentBackground = False
4182        TabOrder = 24
4183      OnClick = PanelValg4Click      OnClick = PanelValg4Click
4184        ExplicitLeft = 807
4185    end    end
4186    object PanelValg5: TPanel    object PanelValg5: TPanel
4187      Left = 808      Left = 872
4188      Top = 249      Top = 249
4189      Width = 185      Width = 185
4190      Height = 41      Height = 41
# Line 4181  object MainForm: TMainForm Line 4192  object MainForm: TMainForm
4192      Alignment = taLeftJustify      Alignment = taLeftJustify
4193      Anchors = [akTop, akRight]      Anchors = [akTop, akRight]
4194      Caption = '   DAO PAKKESHOP'      Caption = '   DAO PAKKESHOP'
4195      TabOrder = 26      ParentBackground = False
4196        TabOrder = 25
4197      OnClick = PanelValg5Click      OnClick = PanelValg5Click
4198        ExplicitLeft = 807
4199    end    end
4200    object PanelValg6: TPanel    object PanelValg6: TPanel
4201      Left = 808      Left = 872
4202      Top = 291      Top = 291
4203      Width = 185      Width = 185
4204      Height = 41      Height = 41
# Line 4195  object MainForm: TMainForm Line 4208  object MainForm: TMainForm
4208      Alignment = taLeftJustify      Alignment = taLeftJustify
4209      Anchors = [akTop, akRight]      Anchors = [akTop, akRight]
4210      Caption = '   Retur fra pakkeshop'      Caption = '   Retur fra pakkeshop'
4211      TabOrder = 27      ParentBackground = False
4212        TabOrder = 26
4213      OnClick = PanelValg6Click      OnClick = PanelValg6Click
4214        ExplicitLeft = 807
4215    end    end
4216    object Button1: TButton    object Button1: TButton
4217      Left = 436      Left = 675
4218      Top = 401      Top = 435
4219      Width = 125      Width = 125
4220      Height = 38      Height = 38
4221      Margins.Left = 5      Margins.Left = 5
# Line 4208  object MainForm: TMainForm Line 4223  object MainForm: TMainForm
4223      Margins.Right = 5      Margins.Right = 5
4224      Margins.Bottom = 5      Margins.Bottom = 5
4225      Caption = 'Tjek stregkode'      Caption = 'Tjek stregkode'
4226      TabOrder = 8      TabOrder = 7
4227      Visible = False      Visible = False
4228      OnClick = Button1Click      OnClick = Button1Click
4229    end    end
4230    object StaticTextManglendePakker: TStaticText    object StaticTextManglendePakker: TStaticText
4231      Left = 528      Left = 593
4232      Top = 294      Top = 349
4233      Width = 272      Width = 272
4234      Height = 52      Height = 52
4235      Hint =      Hint =
# Line 4230  object MainForm: TMainForm Line 4245  object MainForm: TMainForm
4245      Font.Name = 'Tahoma'      Font.Name = 'Tahoma'
4246      Font.Style = []      Font.Style = []
4247      ParentFont = False      ParentFont = False
4248      TabOrder = 28      TabOrder = 27
4249        ExplicitLeft = 528
4250    end    end
4251    object PanelManglendePakker1: TPanel    object PanelManglendePakker1: TPanel
4252      Left = 953      Left = 1018
4253      Top = 54      Top = 54
4254      Width = 46      Width = 46
4255      Height = 23      Height = 23
# Line 4247  object MainForm: TMainForm Line 4263  object MainForm: TMainForm
4263      Font.Style = []      Font.Style = []
4264      ParentBackground = False      ParentBackground = False
4265      ParentFont = False      ParentFont = False
4266      TabOrder = 29      TabOrder = 28
4267      Visible = False      Visible = False
4268        ExplicitLeft = 953
4269    end    end
4270    object PanelManglendePakker2: TPanel    object PanelManglendePakker2: TPanel
4271      Left = 954      Left = 1019
4272      Top = 96      Top = 96
4273      Width = 46      Width = 46
4274      Height = 23      Height = 23
# Line 4265  object MainForm: TMainForm Line 4282  object MainForm: TMainForm
4282      Font.Style = []      Font.Style = []
4283      ParentBackground = False      ParentBackground = False
4284      ParentFont = False      ParentFont = False
4285      TabOrder = 30      TabOrder = 29
4286      Visible = False      Visible = False
4287        ExplicitLeft = 954
4288    end    end
4289    object PanelManglendePakker3: TPanel    object PanelManglendePakker3: TPanel
4290      Left = 954      Left = 1019
4291      Top = 137      Top = 137
4292      Width = 46      Width = 46
4293      Height = 23      Height = 23
# Line 4283  object MainForm: TMainForm Line 4301  object MainForm: TMainForm
4301      Font.Style = []      Font.Style = []
4302      ParentBackground = False      ParentBackground = False
4303      ParentFont = False      ParentFont = False
4304      TabOrder = 31      TabOrder = 30
4305      Visible = False      Visible = False
4306        ExplicitLeft = 954
4307    end    end
4308    object PanelManglendePakker4: TPanel    object PanelManglendePakker4: TPanel
4309      Left = 954      Left = 1019
4310      Top = 191      Top = 191
4311      Width = 46      Width = 46
4312      Height = 23      Height = 23
# Line 4301  object MainForm: TMainForm Line 4320  object MainForm: TMainForm
4320      Font.Style = []      Font.Style = []
4321      ParentBackground = False      ParentBackground = False
4322      ParentFont = False      ParentFont = False
4323      TabOrder = 32      TabOrder = 31
4324      Visible = False      Visible = False
4325        ExplicitLeft = 954
4326    end    end
4327    object PanelManglendePakker5: TPanel    object PanelManglendePakker5: TPanel
4328      Left = 954      Left = 1019
4329      Top = 244      Top = 244
4330      Width = 46      Width = 46
4331      Height = 23      Height = 23
# Line 4319  object MainForm: TMainForm Line 4339  object MainForm: TMainForm
4339      Font.Style = []      Font.Style = []
4340      ParentBackground = False      ParentBackground = False
4341      ParentFont = False      ParentFont = False
4342      TabOrder = 33      TabOrder = 32
4343      Visible = False      Visible = False
4344        ExplicitLeft = 954
4345    end    end
4346    object PanelManglendePakker6: TPanel    object PanelManglendePakker6: TPanel
4347      Left = 954      Left = 1019
4348      Top = 286      Top = 286
4349      Width = 46      Width = 46
4350      Height = 23      Height = 23
# Line 4337  object MainForm: TMainForm Line 4358  object MainForm: TMainForm
4358      Font.Style = []      Font.Style = []
4359      ParentBackground = False      ParentBackground = False
4360      ParentFont = False      ParentFont = False
4361      TabOrder = 34      TabOrder = 33
4362      Visible = False      Visible = False
4363        ExplicitLeft = 954
4364    end    end
4365    object PanelValg7: TPanel    object PanelValg7: TPanel
4366      Left = 807      Left = 871
4367      Top = 338      Top = 377
4368      Width = 185      Width = 185
4369      Height = 41      Height = 41
4370      Hint =      Hint =
# Line 4351  object MainForm: TMainForm Line 4373  object MainForm: TMainForm
4373      Alignment = taLeftJustify      Alignment = taLeftJustify
4374      Anchors = [akTop, akRight]      Anchors = [akTop, akRight]
4375      Caption = '   Indleveringskode'      Caption = '   Indleveringskode'
4376      TabOrder = 35      ParentBackground = False
4377        TabOrder = 34
4378      OnClick = PanelValg7Click      OnClick = PanelValg7Click
4379        ExplicitLeft = 806
4380      end
4381      object chkForstorTilDirekte: TCheckBox
4382        Left = 24
4383        Top = 374
4384        Width = 321
4385        Height = 22
4386        Caption = 'For stor til DAO Direkte (Shop/Direkte)'
4387        TabOrder = 35
4388      end
4389      object chkEmballageRepareret: TCheckBox
4390        Left = 24
4391        Top = 402
4392        Width = 181
4393        Height = 22
4394        Caption = 'Emballage Repareret'
4395        TabOrder = 36
4396      end
4397      object chkUdenforSpecifikation: TCheckBox
4398        Left = 24
4399        Top = 430
4400        Width = 254
4401        Height = 17
4402        Caption = 'Pakke over m'#229'l - returneres'
4403        TabOrder = 37
4404    end    end
4405    object IdHTTP1: TIdHTTP    object IdHTTP1: TIdHTTP
4406      AllowCookies = True      AllowCookies = True
# Line 4370  object MainForm: TMainForm Line 4418  object MainForm: TMainForm
4418      Request.Ranges.Units = 'bytes'      Request.Ranges.Units = 'bytes'
4419      Request.Ranges = <>      Request.Ranges = <>
4420      HTTPOptions = [hoForceEncodeParams]      HTTPOptions = [hoForceEncodeParams]
4421      Left = 88      Left = 128
4422      Top = 384      Top = 703
4423    end    end
4424    object XMLDocument1: TXMLDocument    object XMLDocument1: TXMLDocument
4425      Left = 200      Left = 240
4426      Top = 424      Top = 743
4427      DOMVendorDesc = 'MSXML'      DOMVendorDesc = 'MSXML'
4428    end    end
4429    object ApplicationEvents1: TApplicationEvents    object ApplicationEvents1: TApplicationEvents
4430      OnIdle = ApplicationEvents1Idle      OnIdle = ApplicationEvents1Idle
4431      Left = 336      Left = 376
4432      Top = 392      Top = 711
4433    end    end
4434    object MainMenu1: TMainMenu    object MainMenu1: TMainMenu
4435      Left = 136      Left = 176
4436      Top = 408      Top = 727
4437      object Afslut1: TMenuItem      object Afslut1: TMenuItem
4438        Caption = 'Afslut'        Caption = 'Afslut'
4439        object Lukprogrammet1: TMenuItem        object Lukprogrammet1: TMenuItem
# Line 4410  object MainForm: TMainForm Line 4458  object MainForm: TMainForm
4458          Caption = 'Scan ogs'#229' tjekkoden'          Caption = 'Scan ogs'#229' tjekkoden'
4459          OnClick = Scanogstjekkoden1Click          OnClick = Scanogstjekkoden1Click
4460        end        end
4461        object Automatisktjekkodestyring1: TMenuItem        object menuAutomatiskTjekkodeStyring: TMenuItem
4462          AutoCheck = True          AutoCheck = True
4463          Caption = 'Automatisk tjekkode styring'          Caption = 'Automatisk tjekkode styring'
4464          OnClick = Automatisktjekkodestyring1Click          OnClick = menuAutomatiskTjekkodeStyringClick
4465        end        end
4466        object N2: TMenuItem        object N2: TMenuItem
4467          Caption = '-'          Caption = '-'
4468        end        end
4469        object Automatiskvalg1: TMenuItem        object menuAutomatiskvalg1: TMenuItem
4470          AutoCheck = True          AutoCheck = True
4471          Caption = 'Automatisk valg af pakketype modtagelse'          Caption = 'Automatisk valg af pakketype modtagelse'
4472          OnClick = Automatiskvalg1Click          OnClick = menuAutomatiskvalg1Click
4473        end        end
4474        object Pakkernormal1: TMenuItem        object menuNatXpress1: TMenuItem
4475          AutoCheck = True          AutoCheck = True
4476          Caption = 'DAO NAT X-PRESS pakker'          Caption = 'DAO NAT X-PRESS pakker'
4477          RadioItem = True          RadioItem = True
4478          OnClick = Pakkernormal1Click          OnClick = menuNatXpress1Click
4479        end        end
4480        object ReturpakkerfraDAO1: TMenuItem        object menuNatxpressReturDAO1: TMenuItem
4481          AutoCheck = True          AutoCheck = True
4482          Caption = 'Returpakker fra DAO'          Caption = 'Returpakker fra DAO'
4483          RadioItem = True          RadioItem = True
4484          OnClick = ReturpakkerfraDAO1Click          OnClick = menuNatxpressReturDAO1Click
4485        end        end
4486        object Returpakkerfraboghandler1: TMenuItem        object menuNatxpressReturfraKunde1: TMenuItem
4487          AutoCheck = True          AutoCheck = True
4488          Caption = 'Returpakker fra kunde'          Caption = 'Returpakker fra kunde'
4489          RadioItem = True          RadioItem = True
4490          OnClick = Returpakkerfraboghandler1Click          OnClick = menuNatxpressReturfraKunde1Click
4491        end        end
4492        object Budlevering1: TMenuItem        object menuDaoDirekte1: TMenuItem
4493          AutoCheck = True          AutoCheck = True
4494          Caption = 'DAO DIREKTE pakker'          Caption = 'DAO DIREKTE pakker'
4495          RadioItem = True          RadioItem = True
4496          OnClick = Budlevering1Click          OnClick = menuDaoDirekte1Click
4497        end        end
4498        object Pakkeshoplevering1: TMenuItem        object menuPakkeshop1: TMenuItem
4499          AutoCheck = True          AutoCheck = True
4500          Caption = 'DAO PAKKESHOP pakker'          Caption = 'DAO PAKKESHOP pakker'
4501          RadioItem = True          RadioItem = True
4502          OnClick = Pakkeshoplevering1Click          OnClick = menuPakkeshop1Click
4503        end        end
4504        object Returpakkerfrapakkeshop1: TMenuItem        object menuPakkeshopRetur1: TMenuItem
4505          AutoCheck = True          AutoCheck = True
4506          Caption = 'Returpakker fra pakkeshop'          Caption = 'Returpakker fra pakkeshop'
4507          RadioItem = True          RadioItem = True
4508          OnClick = Returpakkerfrapakkeshop1Click          OnClick = menuPakkeshopRetur1Click
4509          end
4510          object menuIndlevering: TMenuItem
4511            Caption = 'Pakke med indleverings kode'
4512            RadioItem = True
4513            OnClick = menuIndleveringClick
4514        end        end
4515        object N4: TMenuItem        object N4: TMenuItem
4516          Caption = '-'          Caption = '-'
4517        end        end
4518        object Storepakker1: TMenuItem        object menuStorePakker: TMenuItem
4519          AutoCheck = True          AutoCheck = True
4520          Caption = 'Store pakker'          Caption = 'Store pakker'
4521          GroupIndex = 1          GroupIndex = 1
4522          RadioItem = True          RadioItem = True
4523          OnClick = Storepakker1Click          OnClick = menuStorePakkerClick
4524        end        end
4525        object Smpakker1: TMenuItem        object menuSmaaPakker: TMenuItem
4526          AutoCheck = True          AutoCheck = True
4527          Caption = 'Sm'#229' pakker'          Caption = 'Sm'#229' pakker'
4528          GroupIndex = 1          GroupIndex = 1
4529          RadioItem = True          RadioItem = True
4530          OnClick = Smpakker1Click          OnClick = menuSmaaPakkerClick
4531        end        end
4532      end      end
4533      object Hjlp1: TMenuItem      object Hjlp1: TMenuItem
# Line 4537  object MainForm: TMainForm Line 4590  object MainForm: TMainForm
4590      NATKeepAlive.IntervalMS = 0      NATKeepAlive.IntervalMS = 0
4591      ProxySettings.ProxyType = fpcmNone      ProxySettings.ProxyType = fpcmNone
4592      ProxySettings.Port = 0      ProxySettings.Port = 0
4593      Left = 264      Left = 304
4594      Top = 392      Top = 711
4595    end    end
4596    object Timer1: TTimer    object Timer1: TTimer
4597      Interval = 60000      Interval = 60000
4598      OnTimer = Timer1Timer      OnTimer = Timer1Timer
4599      Left = 40      Left = 80
4600      Top = 392      Top = 711
4601    end    end
4602  end  end
Legend:
Removed from v.2650  
changed lines
  Added in v.3073
  ViewVC Help
Powered by ViewVC 1.1.20