/[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 2698 by torben, Thu Sep 3 14:50:49 2015 UTC revision 3107 by torben, Tue Aug 23 14:08:44 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 = 883
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)      883)
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 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    object btnNulstil: TButton
3842      Left = 712      Left = 712
3843      Top = 29      Top = 29
# 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 = btnNulstilClick      OnClick = btnNulstilClick
3853    end    end
# 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 3909  object MainForm: TMainForm Line 3924  object MainForm: TMainForm
3924    end    end
3925    object chkSporgEfterKunde: TCheckBox    object chkSporgEfterKunde: TCheckBox
3926      Left = 24      Left = 24
3927      Top = 257      Top = 312
3928      Width = 446      Width = 446
3929      Height = 26      Height = 26
3930      Hint =      Hint =
# Line 3923  object MainForm: TMainForm Line 3938  object MainForm: TMainForm
3938      TabOrder = 3      TabOrder = 3
3939      OnClick = chkSporgEfterKundeClick      OnClick = chkSporgEfterKundeClick
3940    end    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  
3941    object radioStorPakke: 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 = radioStorPakkeClick      OnClick = radioStorPakkeClick
3954    end    end
3955    object radioLillePakke: 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 = radioLillePakkeClick      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 BtnDownloadKontrolfil: 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 = BtnDownloadKontrolfilClick      OnClick = BtnDownloadKontrolfilClick
3993    end    end
3994    object ListBox2: TListBox    object ListBox2: TListBox
3995      Left = 8      Left = 8
3996      Top = 560      Top = 655
3997      Width = 874      Width = 939
3998      Height = 277      Height = 225
3999      Hint = 'Status vindue viser hvad der endnu ikke er scannet'      Hint = 'Status vindue viser hvad der endnu ikke er scannet'
4000      Style = lbOwnerDrawFixed      Style = lbOwnerDrawFixed
4001      Anchors = [akLeft, akTop, akRight, akBottom]      Anchors = [akLeft, akTop, akRight, akBottom]
4002      ItemHeight = 19      ItemHeight = 19
4003      TabOrder = 11      TabOrder = 10
4004      OnDrawItem = ListBox1DrawItem      OnDrawItem = ListBox1DrawItem
4005    end    end
4006    object OpdaterListenButton01: TButton    object BtnOpdaterListen: TButton
4007      Left = 905      Left = 969
4008      Top = 790      Top = 833
4009      Width = 88      Width = 88
4010      Height = 47      Height = 47
4011      Hint = 'Henter oplysning om de pakker der endnu ikke er scannet modtaget'      Hint = 'Henter oplysning om de pakker der endnu ikke er scannet modtaget'
4012      Anchors = [akRight, akBottom]      Anchors = [akRight, akBottom]
4013      Caption = 'Opdater listen'      Caption = 'Opdater listen'
4014      Enabled = False      Enabled = False
4015      TabOrder = 12      TabOrder = 11
4016      WordWrap = True      WordWrap = True
4017      OnClick = OpdaterListenButton01Click      OnClick = BtnOpdaterListenClick
4018    end    end
4019    object BtnUploadLogfil: TButton    object BtnUploadLogfil: TButton
4020      Left = 904      Left = 969
4021      Top = 391      Top = 430
4022      Width = 88      Width = 88
4023      Height = 47      Height = 47
4024      Hint = 'Sender log filen til DAO ftp server'      Hint = 'Sender log filen til DAO ftp server'
4025      Anchors = [akTop, akRight]      Anchors = [akTop, akRight]
4026      Caption = 'Upload  log fil'      Caption = 'Upload  log fil'
4027      Enabled = False      Enabled = False
4028      TabOrder = 13      TabOrder = 12
4029      WordWrap = True      WordWrap = True
4030      OnClick = BtnUploadLogfilClick      OnClick = BtnUploadLogfilClick
4031    end    end
4032    object BtnDownloadRuteskiftFil: TButton    object BtnDownloadRuteskiftFil: TButton
4033      Left = 904      Left = 969
4034      Top = 498      Top = 537
4035      Width = 88      Width = 88
4036      Height = 47      Height = 47
4037      Hint = 'Henter ruteskift fil fra DAO ftp server'      Hint = 'Henter ruteskift fil fra DAO ftp server'
4038      Anchors = [akTop, akRight]      Anchors = [akTop, akRight]
4039      Caption = 'Download ruteskift fil'      Caption = 'Download ruteskift fil'
4040      TabOrder = 14      TabOrder = 13
4041      Visible = False      Visible = False
4042      WordWrap = True      WordWrap = True
4043      OnClick = BtnDownloadRuteskiftFilClick      OnClick = BtnDownloadRuteskiftFilClick
# Line 4052  object MainForm: TMainForm Line 4049  object MainForm: TMainForm
4049      Height = 23      Height = 23
4050      Hint = 'Viser hvad programmet forventer i input feltet'      Hint = 'Viser hvad programmet forventer i input feltet'
4051      Caption = 'Stregkode'      Caption = 'Stregkode'
4052      TabOrder = 15      TabOrder = 14
4053      Visible = False      Visible = False
4054    end    end
4055    object chkAltidPrintLabel: TCheckBox    object chkAltidPrintLabel: TCheckBox
4056      Left = 505      Left = 505
4057      Top = 261      Top = 316
4058      Width = 446      Width = 446
4059      Height = 26      Height = 26
4060      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'
4061      Caption = 'Altid printe pakkelabel'      Caption = 'Altid printe pakkelabel'
4062      TabOrder = 17      TabOrder = 16
4063      OnClick = chkAltidPrintLabelClick      OnClick = chkAltidPrintLabelClick
4064    end    end
4065    object BtnEKLoverforsel: TButton    object BtnEKLoverforsel: TButton
4066      Left = 905      Left = 969
4067      Top = 740      Top = 780
4068      Width = 88      Width = 88
4069      Height = 47      Height = 47
4070      Hint = 'Overf'#248'r de scannede pakker til EKL systemet'      Hint = 'Overf'#248'r de scannede pakker til EKL systemet'
4071      Anchors = [akRight, akBottom]      Anchors = [akRight, akBottom]
4072      Caption = 'Overf'#248'r   til EKL'      Caption = 'Overf'#248'r   til EKL'
4073      Enabled = False      Enabled = False
4074      TabOrder = 18      TabOrder = 17
4075      WordWrap = True      WordWrap = True
4076      OnClick = BtnEKLoverforselClick      OnClick = BtnEKLoverforselClick
4077    end    end
# Line 4090  object MainForm: TMainForm Line 4087  object MainForm: TMainForm
4087      Font.Name = 'Tahoma'      Font.Name = 'Tahoma'
4088      Font.Style = []      Font.Style = []
4089      ParentFont = False      ParentFont = False
4090      TabOrder = 19      TabOrder = 18
4091    end    end
4092    object chkScanTjekkode: TCheckBox    object chkScanTjekkode: TCheckBox
4093      Left = 24      Left = 64
4094      Top = 310      Top = 537
4095      Width = 353      Width = 353
4096      Height = 26      Height = 26
4097      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'
4098      Caption = 'Scan ogs'#229' tjekkoden'      Caption = 'Scan ogs'#229' tjekkoden'
4099      TabOrder = 20      TabOrder = 19
4100        Visible = False
4101      OnClick = chkScanTjekkodeClick      OnClick = chkScanTjekkodeClick
4102    end    end
4103    object PanelValgA: TPanel    object PanelValgA: TPanel
4104      Left = 807      Left = 872
4105      Top = 7      Top = 7
4106      Width = 185      Width = 185
4107      Height = 41      Height = 41
# Line 4112  object MainForm: TMainForm Line 4110  object MainForm: TMainForm
4110      Anchors = [akTop, akRight]      Anchors = [akTop, akRight]
4111      Caption = '   Automatisk valg'      Caption = '   Automatisk valg'
4112      ParentBackground = False      ParentBackground = False
4113      TabOrder = 21      TabOrder = 20
4114      OnClick = PanelValgAClick      OnClick = PanelValgAClick
4115    end    end
4116    object PanelValg1: TPanel    object PanelValg1: TPanel
4117      Left = 807      Left = 872
4118      Top = 59      Top = 59
4119      Width = 185      Width = 185
4120      Height = 41      Height = 41
# Line 4127  object MainForm: TMainForm Line 4125  object MainForm: TMainForm
4125      Anchors = [akTop, akRight]      Anchors = [akTop, akRight]
4126      Caption = '   DAO NAT X-PRESS'      Caption = '   DAO NAT X-PRESS'
4127      ParentBackground = False      ParentBackground = False
4128      TabOrder = 22      TabOrder = 21
4129      OnClick = PanelValg1Click      OnClick = PanelValg1Click
4130    end    end
4131    object PanelValg2: TPanel    object PanelValg2: TPanel
4132      Left = 807      Left = 872
4133      Top = 101      Top = 100
4134      Width = 185      Width = 185
4135      Height = 41      Height = 41
4136      Hint =      Hint =
# Line 4140  object MainForm: TMainForm Line 4138  object MainForm: TMainForm
4138        'rneres til leverand'#248'ren fra scanningsstedet'        'rneres til leverand'#248'ren fra scanningsstedet'
4139      Alignment = taLeftJustify      Alignment = taLeftJustify
4140      Anchors = [akTop, akRight]      Anchors = [akTop, akRight]
4141      Caption = '   Retur fra DAO'      Caption = '   NatX /Retur fra DAO'
4142      ParentBackground = False      ParentBackground = False
4143      TabOrder = 23      TabOrder = 22
4144      OnClick = PanelValg2Click      OnClick = PanelValg2Click
4145    end    end
4146    object PanelValg3: TPanel    object PanelValg3: TPanel
4147      Left = 807      Left = 872
4148      Top = 143      Top = 143
4149      Width = 185      Width = 185
4150      Height = 41      Height = 41
# Line 4155  object MainForm: TMainForm Line 4153  object MainForm: TMainForm
4153        'rneres til leverand'#248'ren fra kunden'        'rneres til leverand'#248'ren fra kunden'
4154      Alignment = taLeftJustify      Alignment = taLeftJustify
4155      Anchors = [akTop, akRight]      Anchors = [akTop, akRight]
4156      Caption = '   Retur fra kunde'      Caption = '   NatX /Retur fra kunde'
4157      ParentBackground = False      ParentBackground = False
4158      TabOrder = 24      TabOrder = 23
4159      OnClick = PanelValg3Click      OnClick = PanelValg3Click
4160    end    end
4161    object PanelValg4: TPanel    object PanelValg4: TPanel
4162      Left = 807      Left = 872
4163      Top = 196      Top = 196
4164      Width = 185      Width = 185
4165      Height = 41      Height = 41
# Line 4170  object MainForm: TMainForm Line 4168  object MainForm: TMainForm
4168      Anchors = [akTop, akRight]      Anchors = [akTop, akRight]
4169      Caption = '   DAO DIREKTE'      Caption = '   DAO DIREKTE'
4170      ParentBackground = False      ParentBackground = False
4171      TabOrder = 25      TabOrder = 24
4172      OnClick = PanelValg4Click      OnClick = PanelValg4Click
4173    end    end
4174    object PanelValg5: TPanel    object PanelValg5: TPanel
4175      Left = 807      Left = 872
4176      Top = 249      Top = 249
4177      Width = 185      Width = 185
4178      Height = 41      Height = 41
# Line 4183  object MainForm: TMainForm Line 4181  object MainForm: TMainForm
4181      Anchors = [akTop, akRight]      Anchors = [akTop, akRight]
4182      Caption = '   DAO PAKKESHOP'      Caption = '   DAO PAKKESHOP'
4183      ParentBackground = False      ParentBackground = False
4184      TabOrder = 26      TabOrder = 25
4185      OnClick = PanelValg5Click      OnClick = PanelValg5Click
4186    end    end
4187    object PanelValg6: TPanel    object PanelValg6: TPanel
4188      Left = 807      Left = 872
4189      Top = 291      Top = 291
4190      Width = 185      Width = 185
4191      Height = 41      Height = 41
# Line 4198  object MainForm: TMainForm Line 4196  object MainForm: TMainForm
4196      Anchors = [akTop, akRight]      Anchors = [akTop, akRight]
4197      Caption = '   Retur fra pakkeshop'      Caption = '   Retur fra pakkeshop'
4198      ParentBackground = False      ParentBackground = False
4199      TabOrder = 27      TabOrder = 26
4200      OnClick = PanelValg6Click      OnClick = PanelValg6Click
4201    end    end
4202    object Button1: TButton    object Button1: TButton
4203      Left = 436      Left = 675
4204      Top = 401      Top = 435
4205      Width = 125      Width = 125
4206      Height = 38      Height = 38
4207      Margins.Left = 5      Margins.Left = 5
# Line 4211  object MainForm: TMainForm Line 4209  object MainForm: TMainForm
4209      Margins.Right = 5      Margins.Right = 5
4210      Margins.Bottom = 5      Margins.Bottom = 5
4211      Caption = 'Tjek stregkode'      Caption = 'Tjek stregkode'
4212      TabOrder = 8      TabOrder = 7
4213      Visible = False      Visible = False
4214      OnClick = Button1Click      OnClick = Button1Click
4215    end    end
4216    object StaticTextManglendePakker: TStaticText    object StaticTextManglendePakker: TStaticText
4217      Left = 528      Left = 593
4218      Top = 294      Top = 349
4219      Width = 272      Width = 272
4220      Height = 52      Height = 52
4221      Hint =      Hint =
# Line 4233  object MainForm: TMainForm Line 4231  object MainForm: TMainForm
4231      Font.Name = 'Tahoma'      Font.Name = 'Tahoma'
4232      Font.Style = []      Font.Style = []
4233      ParentFont = False      ParentFont = False
4234      TabOrder = 28      TabOrder = 27
4235    end    end
4236    object PanelManglendePakker1: TPanel    object PanelManglendePakker1: TPanel
4237      Left = 953      Left = 1018
4238      Top = 54      Top = 54
4239      Width = 46      Width = 46
4240      Height = 23      Height = 23
# Line 4250  object MainForm: TMainForm Line 4248  object MainForm: TMainForm
4248      Font.Style = []      Font.Style = []
4249      ParentBackground = False      ParentBackground = False
4250      ParentFont = False      ParentFont = False
4251      TabOrder = 29      TabOrder = 28
4252      Visible = False      Visible = False
4253    end    end
4254    object PanelManglendePakker2: TPanel    object PanelManglendePakker2: TPanel
4255      Left = 954      Left = 1019
4256      Top = 96      Top = 96
4257      Width = 46      Width = 46
4258      Height = 23      Height = 23
# Line 4268  object MainForm: TMainForm Line 4266  object MainForm: TMainForm
4266      Font.Style = []      Font.Style = []
4267      ParentBackground = False      ParentBackground = False
4268      ParentFont = False      ParentFont = False
4269      TabOrder = 30      TabOrder = 29
4270      Visible = False      Visible = False
4271    end    end
4272    object PanelManglendePakker3: TPanel    object PanelManglendePakker3: TPanel
4273      Left = 954      Left = 1019
4274      Top = 137      Top = 137
4275      Width = 46      Width = 46
4276      Height = 23      Height = 23
# Line 4286  object MainForm: TMainForm Line 4284  object MainForm: TMainForm
4284      Font.Style = []      Font.Style = []
4285      ParentBackground = False      ParentBackground = False
4286      ParentFont = False      ParentFont = False
4287      TabOrder = 31      TabOrder = 30
4288      Visible = False      Visible = False
4289    end    end
4290    object PanelManglendePakker4: TPanel    object PanelManglendePakker4: TPanel
4291      Left = 954      Left = 1019
4292      Top = 191      Top = 191
4293      Width = 46      Width = 46
4294      Height = 23      Height = 23
# Line 4304  object MainForm: TMainForm Line 4302  object MainForm: TMainForm
4302      Font.Style = []      Font.Style = []
4303      ParentBackground = False      ParentBackground = False
4304      ParentFont = False      ParentFont = False
4305      TabOrder = 32      TabOrder = 31
4306      Visible = False      Visible = False
4307    end    end
4308    object PanelManglendePakker5: TPanel    object PanelManglendePakker5: TPanel
4309      Left = 954      Left = 1019
4310      Top = 244      Top = 244
4311      Width = 46      Width = 46
4312      Height = 23      Height = 23
# Line 4322  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 = 33      TabOrder = 32
4324      Visible = False      Visible = False
4325    end    end
4326    object PanelManglendePakker6: TPanel    object PanelManglendePakker6: TPanel
4327      Left = 954      Left = 1019
4328      Top = 286      Top = 286
4329      Width = 46      Width = 46
4330      Height = 23      Height = 23
# Line 4340  object MainForm: TMainForm Line 4338  object MainForm: TMainForm
4338      Font.Style = []      Font.Style = []
4339      ParentBackground = False      ParentBackground = False
4340      ParentFont = False      ParentFont = False
4341      TabOrder = 34      TabOrder = 33
4342      Visible = False      Visible = False
4343    end    end
4344    object PanelValg7: TPanel    object PanelValg7: TPanel
4345      Left = 807      Left = 871
4346      Top = 338      Top = 377
4347      Width = 185      Width = 185
4348      Height = 41      Height = 41
4349      Hint =      Hint =
# Line 4355  object MainForm: TMainForm Line 4353  object MainForm: TMainForm
4353      Anchors = [akTop, akRight]      Anchors = [akTop, akRight]
4354      Caption = '   Indleveringskode'      Caption = '   Indleveringskode'
4355      ParentBackground = False      ParentBackground = False
4356      TabOrder = 35      TabOrder = 34
4357      OnClick = PanelValg7Click      OnClick = PanelValg7Click
4358    end    end
4359      object chkForstorTilDirekte: TCheckBox
4360        Left = 24
4361        Top = 374
4362        Width = 321
4363        Height = 22
4364        Caption = 'For stor til DAO Direkte (Shop/Direkte)'
4365        TabOrder = 35
4366      end
4367      object chkEmballageRepareret: TCheckBox
4368        Left = 24
4369        Top = 402
4370        Width = 181
4371        Height = 22
4372        Caption = 'Emballage Repareret'
4373        TabOrder = 36
4374      end
4375      object chkUdenforSpecifikation: TCheckBox
4376        Left = 24
4377        Top = 430
4378        Width = 254
4379        Height = 17
4380        Caption = 'Pakke over m'#229'l - returneres'
4381        TabOrder = 37
4382      end
4383    object IdHTTP1: TIdHTTP    object IdHTTP1: TIdHTTP
4384      AllowCookies = True      AllowCookies = True
4385      ProxyParams.BasicAuthentication = False      ProxyParams.BasicAuthentication = False
# Line 4374  object MainForm: TMainForm Line 4396  object MainForm: TMainForm
4396      Request.Ranges.Units = 'bytes'      Request.Ranges.Units = 'bytes'
4397      Request.Ranges = <>      Request.Ranges = <>
4398      HTTPOptions = [hoForceEncodeParams]      HTTPOptions = [hoForceEncodeParams]
4399      Left = 88      Left = 128
4400      Top = 384      Top = 703
4401    end    end
4402    object XMLDocument1: TXMLDocument    object XMLDocument1: TXMLDocument
4403      Left = 200      Left = 240
4404      Top = 424      Top = 743
4405      DOMVendorDesc = 'MSXML'      DOMVendorDesc = 'MSXML'
4406    end    end
4407    object ApplicationEvents1: TApplicationEvents    object ApplicationEvents1: TApplicationEvents
4408      OnIdle = ApplicationEvents1Idle      OnIdle = ApplicationEvents1Idle
4409      Left = 336      Left = 376
4410      Top = 392      Top = 711
4411    end    end
4412    object MainMenu1: TMainMenu    object MainMenu1: TMainMenu
4413      Left = 136      Left = 176
4414      Top = 408      Top = 727
4415      object Afslut1: TMenuItem      object Afslut1: TMenuItem
4416        Caption = 'Afslut'        Caption = 'Afslut'
4417        object Lukprogrammet1: TMenuItem        object Lukprogrammet1: TMenuItem
# Line 4414  object MainForm: TMainForm Line 4436  object MainForm: TMainForm
4436          Caption = 'Scan ogs'#229' tjekkoden'          Caption = 'Scan ogs'#229' tjekkoden'
4437          OnClick = Scanogstjekkoden1Click          OnClick = Scanogstjekkoden1Click
4438        end        end
4439        object Automatisktjekkodestyring1: TMenuItem        object menuAutomatiskTjekkodeStyring: TMenuItem
4440          AutoCheck = True          AutoCheck = True
4441          Caption = 'Automatisk tjekkode styring'          Caption = 'Automatisk tjekkode styring'
4442          OnClick = Automatisktjekkodestyring1Click          OnClick = menuAutomatiskTjekkodeStyringClick
4443        end        end
4444        object N2: TMenuItem        object N2: TMenuItem
4445          Caption = '-'          Caption = '-'
4446        end        end
4447        object Automatiskvalg1: TMenuItem        object menuAutomatiskvalg1: TMenuItem
4448          AutoCheck = True          AutoCheck = True
4449          Caption = 'Automatisk valg af pakketype modtagelse'          Caption = 'Automatisk valg af pakketype modtagelse'
4450          OnClick = Automatiskvalg1Click          OnClick = menuAutomatiskvalg1Click
4451        end        end
4452        object Pakkernormal1: TMenuItem        object menuNatXpress1: TMenuItem
4453          AutoCheck = True          AutoCheck = True
4454          Caption = 'DAO NAT X-PRESS pakker'          Caption = 'DAO NAT X-PRESS pakker'
4455          RadioItem = True          RadioItem = True
4456          OnClick = Pakkernormal1Click          OnClick = menuNatXpress1Click
4457        end        end
4458        object ReturpakkerfraDAO1: TMenuItem        object menuNatxpressReturDAO1: TMenuItem
4459          AutoCheck = True          AutoCheck = True
4460          Caption = 'Returpakker fra DAO'          Caption = 'Returpakker fra DAO'
4461          RadioItem = True          RadioItem = True
4462          OnClick = ReturpakkerfraDAO1Click          OnClick = menuNatxpressReturDAO1Click
4463        end        end
4464        object Returpakkerfraboghandler1: TMenuItem        object menuNatxpressReturfraKunde1: TMenuItem
4465          AutoCheck = True          AutoCheck = True
4466          Caption = 'Returpakker fra kunde'          Caption = 'Returpakker fra kunde'
4467          RadioItem = True          RadioItem = True
4468          OnClick = Returpakkerfraboghandler1Click          OnClick = menuNatxpressReturfraKunde1Click
4469        end        end
4470        object Budlevering1: TMenuItem        object menuDaoDirekte1: TMenuItem
4471          AutoCheck = True          AutoCheck = True
4472          Caption = 'DAO DIREKTE pakker'          Caption = 'DAO DIREKTE pakker'
4473          RadioItem = True          RadioItem = True
4474          OnClick = Budlevering1Click          OnClick = menuDaoDirekte1Click
4475        end        end
4476        object Pakkeshoplevering1: TMenuItem        object menuPakkeshop1: TMenuItem
4477          AutoCheck = True          AutoCheck = True
4478          Caption = 'DAO PAKKESHOP pakker'          Caption = 'DAO PAKKESHOP pakker'
4479          RadioItem = True          RadioItem = True
4480          OnClick = Pakkeshoplevering1Click          OnClick = menuPakkeshop1Click
4481        end        end
4482        object Returpakkerfrapakkeshop1: TMenuItem        object menuPakkeshopRetur1: TMenuItem
4483          AutoCheck = True          AutoCheck = True
4484          Caption = 'Returpakker fra pakkeshop'          Caption = 'Returpakker fra pakkeshop'
4485          RadioItem = True          RadioItem = True
4486          OnClick = Returpakkerfrapakkeshop1Click          OnClick = menuPakkeshopRetur1Click
4487        end        end
4488        object menuIndlevering: TMenuItem        object menuIndlevering: TMenuItem
4489          Caption = 'Pakke med indleverings kode'          Caption = 'Pakke med indleverings kode'
# Line 4471  object MainForm: TMainForm Line 4493  object MainForm: TMainForm
4493        object N4: TMenuItem        object N4: TMenuItem
4494          Caption = '-'          Caption = '-'
4495        end        end
4496        object Storepakker1: TMenuItem        object menuStorePakker: TMenuItem
4497          AutoCheck = True          AutoCheck = True
4498          Caption = 'Store pakker'          Caption = 'Store pakker'
4499          GroupIndex = 1          GroupIndex = 1
4500          RadioItem = True          RadioItem = True
4501          OnClick = Storepakker1Click          OnClick = menuStorePakkerClick
4502        end        end
4503        object Smpakker1: TMenuItem        object menuSmaaPakker: TMenuItem
4504          AutoCheck = True          AutoCheck = True
4505          Caption = 'Sm'#229' pakker'          Caption = 'Sm'#229' pakker'
4506          GroupIndex = 1          GroupIndex = 1
4507          RadioItem = True          RadioItem = True
4508          OnClick = Smpakker1Click          OnClick = menuSmaaPakkerClick
4509        end        end
4510      end      end
4511      object Hjlp1: TMenuItem      object Hjlp1: TMenuItem
# Line 4546  object MainForm: TMainForm Line 4568  object MainForm: TMainForm
4568      NATKeepAlive.IntervalMS = 0      NATKeepAlive.IntervalMS = 0
4569      ProxySettings.ProxyType = fpcmNone      ProxySettings.ProxyType = fpcmNone
4570      ProxySettings.Port = 0      ProxySettings.Port = 0
4571      Left = 264      Left = 304
4572      Top = 392      Top = 711
4573    end    end
4574    object Timer1: TTimer    object Timer1: TTimer
4575      Interval = 60000      Interval = 60000
4576      OnTimer = Timer1Timer      OnTimer = Timer1Timer
4577      Left = 40      Left = 80
4578      Top = 392      Top = 711
4579    end    end
4580  end  end
Legend:
Removed from v.2698  
changed lines
  Added in v.3107
  ViewVC Help
Powered by ViewVC 1.1.20