--- dao/DelphiScanner/Main.dfm 2015/08/20 20:58:26 2650 +++ dao/DelphiScanner/Main.dfm 2015/08/23 11:06:48 2655 @@ -3907,7 +3907,7 @@ ParentFont = False TabOrder = 2 end - object CheckBox1: TCheckBox + object chkSporgEfterKunde: TCheckBox Left = 24 Top = 261 Width = 446 @@ -3921,7 +3921,7 @@ Margins.Bottom = 5 Caption = 'Sp'#248'rg efter kundenummer ved ukendte pakker' TabOrder = 3 - OnClick = CheckBox1Click + OnClick = chkSporgEfterKundeClick end object KommentarST: TStaticText Left = 24 @@ -3941,7 +3941,7 @@ ParentFont = False TabOrder = 4 end - object RadioButton1: TRadioButton + object radioStorPakke: TRadioButton Left = 216 Top = 285 Width = 170 @@ -3953,9 +3953,9 @@ Margins.Bottom = 5 Caption = 'Stor pakke' TabOrder = 5 - OnClick = RadioButton1Click + OnClick = radioStorPakkeClick end - object RadioButton2: TRadioButton + object radioLillePakke: TRadioButton Left = 24 Top = 285 Width = 170 @@ -3967,7 +3967,7 @@ Margins.Bottom = 5 Caption = 'Lille pakke' TabOrder = 6 - OnClick = RadioButton2Click + OnClick = radioLillePakkeClick end object ListBox1: TListBox Left = 8 @@ -4005,7 +4005,6 @@ ItemHeight = 19 TabOrder = 11 OnDrawItem = ListBox1DrawItem - ExplicitHeight = 169 end object OpdaterListenButton01: TButton Left = 905 @@ -4019,7 +4018,6 @@ TabOrder = 12 WordWrap = True OnClick = OpdaterListenButton01Click - ExplicitTop = 604 end object UploadButton01: TButton Left = 904 @@ -4057,7 +4055,7 @@ TabOrder = 15 Visible = False end - object CheckBox2: TCheckBox + object chkAltidPrintLabel: TCheckBox Left = 505 Top = 261 Width = 446 @@ -4065,7 +4063,7 @@ Hint = 'Markeres n'#229'r der '#248'nskes print af pakkelabel med ruteinformation' Caption = 'Altid printe pakkelabel' TabOrder = 17 - OnClick = CheckBox2Click + OnClick = chkAltidPrintLabelClick end object EKLoverforsel: TButton Left = 905 @@ -4079,7 +4077,6 @@ TabOrder = 18 WordWrap = True OnClick = EKLoverforselClick - ExplicitTop = 554 end object PrinterstatusStaticText1: TStaticText Left = 119 @@ -4095,7 +4092,7 @@ ParentFont = False TabOrder = 19 end - object CheckBox3: TCheckBox + object chkScanTjekkode: TCheckBox Left = 24 Top = 310 Width = 353 @@ -4103,7 +4100,7 @@ Hint = 'Markeres n'#229'r der ogs'#229' skal scannes en tjekkode label' Caption = 'Scan ogs'#229' tjekkoden' TabOrder = 20 - OnClick = CheckBox3Click + OnClick = chkScanTjekkodeClick end object PanelValgA: TPanel Left = 808