/[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 3106 by torben, Tue Aug 23 11:46:45 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 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    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
     ExplicitHeight = 169  
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      ExplicitTop = 604      ExplicitTop = 808
4019    end    end
4020    object UploadButton01: TButton    object BtnUploadLogfil: TButton
4021      Left = 904      Left = 969
4022      Top = 391      Top = 430
4023      Width = 88      Width = 88
4024      Height = 47      Height = 47
4025      Hint = 'Sender log filen til DAO ftp server'      Hint = 'Sender log filen til DAO ftp server'
4026      Anchors = [akTop, akRight]      Anchors = [akTop, akRight]
4027      Caption = 'Upload  log fil'      Caption = 'Upload  log fil'
4028      Enabled = False      Enabled = False
4029      TabOrder = 13      TabOrder = 12
4030      WordWrap = True      WordWrap = True
4031      OnClick = UploadButton01Click      OnClick = BtnUploadLogfilClick
4032    end    end
4033    object DownloadButton03: TButton    object BtnDownloadRuteskiftFil: TButton
4034      Left = 904      Left = 969
4035      Top = 498      Top = 537
4036      Width = 88      Width = 88
4037      Height = 47      Height = 47
4038      Hint = 'Henter ruteskift fil fra DAO ftp server'      Hint = 'Henter ruteskift fil fra DAO ftp server'
4039      Anchors = [akTop, akRight]      Anchors = [akTop, akRight]
4040      Caption = 'Download ruteskift fil'      Caption = 'Download ruteskift fil'
4041      TabOrder = 14      TabOrder = 13
4042      Visible = False      Visible = False
4043      WordWrap = True      WordWrap = True
4044      OnClick = DownloadButton03Click      OnClick = BtnDownloadRuteskiftFilClick
4045    end    end
4046    object PakkeshopText1: TStaticText    object PakkeshopText1: TStaticText
4047      Left = 712      Left = 712
# Line 4054  object MainForm: TMainForm Line 4050  object MainForm: TMainForm
4050      Height = 23      Height = 23
4051      Hint = 'Viser hvad programmet forventer i input feltet'      Hint = 'Viser hvad programmet forventer i input feltet'
4052      Caption = 'Stregkode'      Caption = 'Stregkode'
4053      TabOrder = 15      TabOrder = 14
4054      Visible = False      Visible = False
4055    end    end
4056    object CheckBox2: TCheckBox    object chkAltidPrintLabel: TCheckBox
4057      Left = 505      Left = 505
4058      Top = 261      Top = 316
4059      Width = 446      Width = 446
4060      Height = 26      Height = 26
4061      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'
4062      Caption = 'Altid printe pakkelabel'      Caption = 'Altid printe pakkelabel'
4063      TabOrder = 17      TabOrder = 16
4064      OnClick = CheckBox2Click      OnClick = chkAltidPrintLabelClick
4065    end    end
4066    object EKLoverforsel: TButton    object BtnEKLoverforsel: TButton
4067      Left = 905      Left = 969
4068      Top = 740      Top = 780
4069      Width = 88      Width = 88
4070      Height = 47      Height = 47
4071      Hint = 'Overf'#248'r de scannede pakker til EKL systemet'      Hint = 'Overf'#248'r de scannede pakker til EKL systemet'
4072      Anchors = [akRight, akBottom]      Anchors = [akRight, akBottom]
4073      Caption = 'Overf'#248'r   til EKL'      Caption = 'Overf'#248'r   til EKL'
4074      Enabled = False      Enabled = False
4075      TabOrder = 18      TabOrder = 17
4076      WordWrap = True      WordWrap = True
4077      OnClick = EKLoverforselClick      OnClick = BtnEKLoverforselClick
4078      ExplicitTop = 554      ExplicitTop = 755
4079    end    end
4080    object PrinterstatusStaticText1: TStaticText    object PrinterstatusStaticText1: TStaticText
4081      Left = 119      Left = 119
# Line 4093  object MainForm: TMainForm Line 4089  object MainForm: TMainForm
4089      Font.Name = 'Tahoma'      Font.Name = 'Tahoma'
4090      Font.Style = []      Font.Style = []
4091      ParentFont = False      ParentFont = False
4092      TabOrder = 19      TabOrder = 18
4093    end    end
4094    object CheckBox3: TCheckBox    object chkScanTjekkode: TCheckBox
4095      Left = 24      Left = 64
4096      Top = 310      Top = 537
4097      Width = 353      Width = 353
4098      Height = 26      Height = 26
4099      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'
4100      Caption = 'Scan ogs'#229' tjekkoden'      Caption = 'Scan ogs'#229' tjekkoden'
4101      TabOrder = 20      TabOrder = 19
4102      OnClick = CheckBox3Click      Visible = False
4103        OnClick = chkScanTjekkodeClick
4104    end    end
4105    object PanelValgA: TPanel    object PanelValgA: TPanel
4106      Left = 808      Left = 872
4107      Top = 7      Top = 7
4108      Width = 185      Width = 185
4109      Height = 41      Height = 41
# Line 4115  object MainForm: TMainForm Line 4112  object MainForm: TMainForm
4112      Anchors = [akTop, akRight]      Anchors = [akTop, akRight]
4113      Caption = '   Automatisk valg'      Caption = '   Automatisk valg'
4114      ParentBackground = False      ParentBackground = False
4115      TabOrder = 21      TabOrder = 20
4116      OnClick = PanelValgAClick      OnClick = PanelValgAClick
4117    end    end
4118    object PanelValg1: TPanel    object PanelValg1: TPanel
4119      Left = 808      Left = 872
4120      Top = 59      Top = 59
4121      Width = 185      Width = 185
4122      Height = 41      Height = 41
# Line 4129  object MainForm: TMainForm Line 4126  object MainForm: TMainForm
4126      Alignment = taLeftJustify      Alignment = taLeftJustify
4127      Anchors = [akTop, akRight]      Anchors = [akTop, akRight]
4128      Caption = '   DAO NAT X-PRESS'      Caption = '   DAO NAT X-PRESS'
4129      TabOrder = 22      ParentBackground = False
4130        TabOrder = 21
4131      OnClick = PanelValg1Click      OnClick = PanelValg1Click
4132    end    end
4133    object PanelValg2: TPanel    object PanelValg2: TPanel
4134      Left = 808      Left = 872
4135      Top = 101      Top = 100
4136      Width = 185      Width = 185
4137      Height = 41      Height = 41
4138      Hint =      Hint =
# Line 4142  object MainForm: TMainForm Line 4140  object MainForm: TMainForm
4140        'rneres til leverand'#248'ren fra scanningsstedet'        'rneres til leverand'#248'ren fra scanningsstedet'
4141      Alignment = taLeftJustify      Alignment = taLeftJustify
4142      Anchors = [akTop, akRight]      Anchors = [akTop, akRight]
4143      Caption = '   Retur fra DAO'      Caption = '   NatX /Retur fra DAO'
4144      TabOrder = 23      ParentBackground = False
4145        TabOrder = 22
4146      OnClick = PanelValg2Click      OnClick = PanelValg2Click
4147    end    end
4148    object PanelValg3: TPanel    object PanelValg3: TPanel
4149      Left = 808      Left = 872
4150      Top = 143      Top = 143
4151      Width = 185      Width = 185
4152      Height = 41      Height = 41
# Line 4156  object MainForm: TMainForm Line 4155  object MainForm: TMainForm
4155        'rneres til leverand'#248'ren fra kunden'        'rneres til leverand'#248'ren fra kunden'
4156      Alignment = taLeftJustify      Alignment = taLeftJustify
4157      Anchors = [akTop, akRight]      Anchors = [akTop, akRight]
4158      Caption = '   Retur fra kunde'      Caption = '   NatX /Retur fra kunde'
4159      TabOrder = 24      ParentBackground = False
4160        TabOrder = 23
4161      OnClick = PanelValg3Click      OnClick = PanelValg3Click
4162    end    end
4163    object PanelValg4: TPanel    object PanelValg4: TPanel
4164      Left = 808      Left = 872
4165      Top = 196      Top = 196
4166      Width = 185      Width = 185
4167      Height = 41      Height = 41
# Line 4169  object MainForm: TMainForm Line 4169  object MainForm: TMainForm
4169      Alignment = taLeftJustify      Alignment = taLeftJustify
4170      Anchors = [akTop, akRight]      Anchors = [akTop, akRight]
4171      Caption = '   DAO DIREKTE'      Caption = '   DAO DIREKTE'
4172      TabOrder = 25      ParentBackground = False
4173        TabOrder = 24
4174      OnClick = PanelValg4Click      OnClick = PanelValg4Click
4175    end    end
4176    object PanelValg5: TPanel    object PanelValg5: TPanel
4177      Left = 808      Left = 872
4178      Top = 249      Top = 249
4179      Width = 185      Width = 185
4180      Height = 41      Height = 41
# Line 4181  object MainForm: TMainForm Line 4182  object MainForm: TMainForm
4182      Alignment = taLeftJustify      Alignment = taLeftJustify
4183      Anchors = [akTop, akRight]      Anchors = [akTop, akRight]
4184      Caption = '   DAO PAKKESHOP'      Caption = '   DAO PAKKESHOP'
4185      TabOrder = 26      ParentBackground = False
4186        TabOrder = 25
4187      OnClick = PanelValg5Click      OnClick = PanelValg5Click
4188    end    end
4189    object PanelValg6: TPanel    object PanelValg6: TPanel
4190      Left = 808      Left = 872
4191      Top = 291      Top = 291
4192      Width = 185      Width = 185
4193      Height = 41      Height = 41
# Line 4195  object MainForm: TMainForm Line 4197  object MainForm: TMainForm
4197      Alignment = taLeftJustify      Alignment = taLeftJustify
4198      Anchors = [akTop, akRight]      Anchors = [akTop, akRight]
4199      Caption = '   Retur fra pakkeshop'      Caption = '   Retur fra pakkeshop'
4200      TabOrder = 27      ParentBackground = False
4201        TabOrder = 26
4202      OnClick = PanelValg6Click      OnClick = PanelValg6Click
4203    end    end
4204    object Button1: TButton    object Button1: TButton
4205      Left = 436      Left = 675
4206      Top = 401      Top = 435
4207      Width = 125      Width = 125
4208      Height = 38      Height = 38
4209      Margins.Left = 5      Margins.Left = 5
# Line 4208  object MainForm: TMainForm Line 4211  object MainForm: TMainForm
4211      Margins.Right = 5      Margins.Right = 5
4212      Margins.Bottom = 5      Margins.Bottom = 5
4213      Caption = 'Tjek stregkode'      Caption = 'Tjek stregkode'
4214      TabOrder = 8      TabOrder = 7
4215      Visible = False      Visible = False
4216      OnClick = Button1Click      OnClick = Button1Click
4217    end    end
4218    object StaticTextManglendePakker: TStaticText    object StaticTextManglendePakker: TStaticText
4219      Left = 528      Left = 593
4220      Top = 294      Top = 349
4221      Width = 272      Width = 272
4222      Height = 52      Height = 52
4223      Hint =      Hint =
# Line 4230  object MainForm: TMainForm Line 4233  object MainForm: TMainForm
4233      Font.Name = 'Tahoma'      Font.Name = 'Tahoma'
4234      Font.Style = []      Font.Style = []
4235      ParentFont = False      ParentFont = False
4236      TabOrder = 28      TabOrder = 27
4237    end    end
4238    object PanelManglendePakker1: TPanel    object PanelManglendePakker1: TPanel
4239      Left = 953      Left = 1018
4240      Top = 54      Top = 54
4241      Width = 46      Width = 46
4242      Height = 23      Height = 23
# Line 4247  object MainForm: TMainForm Line 4250  object MainForm: TMainForm
4250      Font.Style = []      Font.Style = []
4251      ParentBackground = False      ParentBackground = False
4252      ParentFont = False      ParentFont = False
4253      TabOrder = 29      TabOrder = 28
4254      Visible = False      Visible = False
4255    end    end
4256    object PanelManglendePakker2: TPanel    object PanelManglendePakker2: TPanel
4257      Left = 954      Left = 1019
4258      Top = 96      Top = 96
4259      Width = 46      Width = 46
4260      Height = 23      Height = 23
# Line 4265  object MainForm: TMainForm Line 4268  object MainForm: TMainForm
4268      Font.Style = []      Font.Style = []
4269      ParentBackground = False      ParentBackground = False
4270      ParentFont = False      ParentFont = False
4271      TabOrder = 30      TabOrder = 29
4272      Visible = False      Visible = False
4273    end    end
4274    object PanelManglendePakker3: TPanel    object PanelManglendePakker3: TPanel
4275      Left = 954      Left = 1019
4276      Top = 137      Top = 137
4277      Width = 46      Width = 46
4278      Height = 23      Height = 23
# Line 4283  object MainForm: TMainForm Line 4286  object MainForm: TMainForm
4286      Font.Style = []      Font.Style = []
4287      ParentBackground = False      ParentBackground = False
4288      ParentFont = False      ParentFont = False
4289      TabOrder = 31      TabOrder = 30
4290      Visible = False      Visible = False
4291    end    end
4292    object PanelManglendePakker4: TPanel    object PanelManglendePakker4: TPanel
4293      Left = 954      Left = 1019
4294      Top = 191      Top = 191
4295      Width = 46      Width = 46
4296      Height = 23      Height = 23
# Line 4301  object MainForm: TMainForm Line 4304  object MainForm: TMainForm
4304      Font.Style = []      Font.Style = []
4305      ParentBackground = False      ParentBackground = False
4306      ParentFont = False      ParentFont = False
4307      TabOrder = 32      TabOrder = 31
4308      Visible = False      Visible = False
4309    end    end
4310    object PanelManglendePakker5: TPanel    object PanelManglendePakker5: TPanel
4311      Left = 954      Left = 1019
4312      Top = 244      Top = 244
4313      Width = 46      Width = 46
4314      Height = 23      Height = 23
# Line 4319  object MainForm: TMainForm Line 4322  object MainForm: TMainForm
4322      Font.Style = []      Font.Style = []
4323      ParentBackground = False      ParentBackground = False
4324      ParentFont = False      ParentFont = False
4325      TabOrder = 33      TabOrder = 32
4326      Visible = False      Visible = False
4327    end    end
4328    object PanelManglendePakker6: TPanel    object PanelManglendePakker6: TPanel
4329      Left = 954      Left = 1019
4330      Top = 286      Top = 286
4331      Width = 46      Width = 46
4332      Height = 23      Height = 23
# Line 4337  object MainForm: TMainForm Line 4340  object MainForm: TMainForm
4340      Font.Style = []      Font.Style = []
4341      ParentBackground = False      ParentBackground = False
4342      ParentFont = False      ParentFont = False
4343      TabOrder = 34      TabOrder = 33
4344      Visible = False      Visible = False
4345    end    end
4346    object PanelValg7: TPanel    object PanelValg7: TPanel
4347      Left = 807      Left = 871
4348      Top = 338      Top = 377
4349      Width = 185      Width = 185
4350      Height = 41      Height = 41
4351      Hint =      Hint =
# Line 4351  object MainForm: TMainForm Line 4354  object MainForm: TMainForm
4354      Alignment = taLeftJustify      Alignment = taLeftJustify
4355      Anchors = [akTop, akRight]      Anchors = [akTop, akRight]
4356      Caption = '   Indleveringskode'      Caption = '   Indleveringskode'
4357      TabOrder = 35      ParentBackground = False
4358        TabOrder = 34
4359      OnClick = PanelValg7Click      OnClick = PanelValg7Click
4360    end    end
4361      object chkForstorTilDirekte: TCheckBox
4362        Left = 24
4363        Top = 374
4364        Width = 321
4365        Height = 22
4366        Caption = 'For stor til DAO Direkte (Shop/Direkte)'
4367        TabOrder = 35
4368      end
4369      object chkEmballageRepareret: TCheckBox
4370        Left = 24
4371        Top = 402
4372        Width = 181
4373        Height = 22
4374        Caption = 'Emballage Repareret'
4375        TabOrder = 36
4376      end
4377      object chkUdenforSpecifikation: TCheckBox
4378        Left = 24
4379        Top = 430
4380        Width = 254
4381        Height = 17
4382        Caption = 'Pakke over m'#229'l - returneres'
4383        TabOrder = 37
4384      end
4385    object IdHTTP1: TIdHTTP    object IdHTTP1: TIdHTTP
4386      AllowCookies = True      AllowCookies = True
4387      ProxyParams.BasicAuthentication = False      ProxyParams.BasicAuthentication = False
# Line 4370  object MainForm: TMainForm Line 4398  object MainForm: TMainForm
4398      Request.Ranges.Units = 'bytes'      Request.Ranges.Units = 'bytes'
4399      Request.Ranges = <>      Request.Ranges = <>
4400      HTTPOptions = [hoForceEncodeParams]      HTTPOptions = [hoForceEncodeParams]
4401      Left = 88      Left = 128
4402      Top = 384      Top = 703
4403    end    end
4404    object XMLDocument1: TXMLDocument    object XMLDocument1: TXMLDocument
4405      Left = 200      Left = 240
4406      Top = 424      Top = 743
4407      DOMVendorDesc = 'MSXML'      DOMVendorDesc = 'MSXML'
4408    end    end
4409    object ApplicationEvents1: TApplicationEvents    object ApplicationEvents1: TApplicationEvents
4410      OnIdle = ApplicationEvents1Idle      OnIdle = ApplicationEvents1Idle
4411      Left = 336      Left = 376
4412      Top = 392      Top = 711
4413    end    end
4414    object MainMenu1: TMainMenu    object MainMenu1: TMainMenu
4415      Left = 136      Left = 176
4416      Top = 408      Top = 727
4417      object Afslut1: TMenuItem      object Afslut1: TMenuItem
4418        Caption = 'Afslut'        Caption = 'Afslut'
4419        object Lukprogrammet1: TMenuItem        object Lukprogrammet1: TMenuItem
# Line 4410  object MainForm: TMainForm Line 4438  object MainForm: TMainForm
4438          Caption = 'Scan ogs'#229' tjekkoden'          Caption = 'Scan ogs'#229' tjekkoden'
4439          OnClick = Scanogstjekkoden1Click          OnClick = Scanogstjekkoden1Click
4440        end        end
4441        object Automatisktjekkodestyring1: TMenuItem        object menuAutomatiskTjekkodeStyring: TMenuItem
4442          AutoCheck = True          AutoCheck = True
4443          Caption = 'Automatisk tjekkode styring'          Caption = 'Automatisk tjekkode styring'
4444          OnClick = Automatisktjekkodestyring1Click          OnClick = menuAutomatiskTjekkodeStyringClick
4445        end        end
4446        object N2: TMenuItem        object N2: TMenuItem
4447          Caption = '-'          Caption = '-'
4448        end        end
4449        object Automatiskvalg1: TMenuItem        object menuAutomatiskvalg1: TMenuItem
4450          AutoCheck = True          AutoCheck = True
4451          Caption = 'Automatisk valg af pakketype modtagelse'          Caption = 'Automatisk valg af pakketype modtagelse'
4452          OnClick = Automatiskvalg1Click          OnClick = menuAutomatiskvalg1Click
4453        end        end
4454        object Pakkernormal1: TMenuItem        object menuNatXpress1: TMenuItem
4455          AutoCheck = True          AutoCheck = True
4456          Caption = 'DAO NAT X-PRESS pakker'          Caption = 'DAO NAT X-PRESS pakker'
4457          RadioItem = True          RadioItem = True
4458          OnClick = Pakkernormal1Click          OnClick = menuNatXpress1Click
4459        end        end
4460        object ReturpakkerfraDAO1: TMenuItem        object menuNatxpressReturDAO1: TMenuItem
4461          AutoCheck = True          AutoCheck = True
4462          Caption = 'Returpakker fra DAO'          Caption = 'Returpakker fra DAO'
4463          RadioItem = True          RadioItem = True
4464          OnClick = ReturpakkerfraDAO1Click          OnClick = menuNatxpressReturDAO1Click
4465        end        end
4466        object Returpakkerfraboghandler1: TMenuItem        object menuNatxpressReturfraKunde1: TMenuItem
4467          AutoCheck = True          AutoCheck = True
4468          Caption = 'Returpakker fra kunde'          Caption = 'Returpakker fra kunde'
4469          RadioItem = True          RadioItem = True
4470          OnClick = Returpakkerfraboghandler1Click          OnClick = menuNatxpressReturfraKunde1Click
4471        end        end
4472        object Budlevering1: TMenuItem        object menuDaoDirekte1: TMenuItem
4473          AutoCheck = True          AutoCheck = True
4474          Caption = 'DAO DIREKTE pakker'          Caption = 'DAO DIREKTE pakker'
4475          RadioItem = True          RadioItem = True
4476          OnClick = Budlevering1Click          OnClick = menuDaoDirekte1Click
4477        end        end
4478        object Pakkeshoplevering1: TMenuItem        object menuPakkeshop1: TMenuItem
4479          AutoCheck = True          AutoCheck = True
4480          Caption = 'DAO PAKKESHOP pakker'          Caption = 'DAO PAKKESHOP pakker'
4481          RadioItem = True          RadioItem = True
4482          OnClick = Pakkeshoplevering1Click          OnClick = menuPakkeshop1Click
4483        end        end
4484        object Returpakkerfrapakkeshop1: TMenuItem        object menuPakkeshopRetur1: TMenuItem
4485          AutoCheck = True          AutoCheck = True
4486          Caption = 'Returpakker fra pakkeshop'          Caption = 'Returpakker fra pakkeshop'
4487          RadioItem = True          RadioItem = True
4488          OnClick = Returpakkerfrapakkeshop1Click          OnClick = menuPakkeshopRetur1Click
4489          end
4490          object menuIndlevering: TMenuItem
4491            Caption = 'Pakke med indleverings kode'
4492            RadioItem = True
4493            OnClick = menuIndleveringClick
4494        end        end
4495        object N4: TMenuItem        object N4: TMenuItem
4496          Caption = '-'          Caption = '-'
4497        end        end
4498        object Storepakker1: TMenuItem        object menuStorePakker: TMenuItem
4499          AutoCheck = True          AutoCheck = True
4500          Caption = 'Store pakker'          Caption = 'Store pakker'
4501          GroupIndex = 1          GroupIndex = 1
4502          RadioItem = True          RadioItem = True
4503          OnClick = Storepakker1Click          OnClick = menuStorePakkerClick
4504        end        end
4505        object Smpakker1: TMenuItem        object menuSmaaPakker: TMenuItem
4506          AutoCheck = True          AutoCheck = True
4507          Caption = 'Sm'#229' pakker'          Caption = 'Sm'#229' pakker'
4508          GroupIndex = 1          GroupIndex = 1
4509          RadioItem = True          RadioItem = True
4510          OnClick = Smpakker1Click          OnClick = menuSmaaPakkerClick
4511        end        end
4512      end      end
4513      object Hjlp1: TMenuItem      object Hjlp1: TMenuItem
# Line 4537  object MainForm: TMainForm Line 4570  object MainForm: TMainForm
4570      NATKeepAlive.IntervalMS = 0      NATKeepAlive.IntervalMS = 0
4571      ProxySettings.ProxyType = fpcmNone      ProxySettings.ProxyType = fpcmNone
4572      ProxySettings.Port = 0      ProxySettings.Port = 0
4573      Left = 264      Left = 304
4574      Top = 392      Top = 711
4575    end    end
4576    object Timer1: TTimer    object Timer1: TTimer
4577      Interval = 60000      Interval = 60000
4578      OnTimer = Timer1Timer      OnTimer = Timer1Timer
4579      Left = 40      Left = 80
4580      Top = 392      Top = 711
4581    end    end
4582  end  end
Legend:
Removed from v.2650  
changed lines
  Added in v.3106
  ViewVC Help
Powered by ViewVC 1.1.20