--- dao/DelphiScanner/LabelPrint.pas 2016/08/23 08:15:42 3104 +++ dao/DelphiScanner/LabelPrint.pas 2016/10/18 13:57:46 3123 @@ -19,7 +19,7 @@ procedure PrintLabel( Stregkode : String); procedure PrintLabelData( LabelData : TLabelData); - procedure SendTilPrinter(kontrolKoreliste, RuteNummer, Kommentar, BoghandlerNavn, Koreliste, SmsKode, DBKbane, Leveringssted : String; var PrintNyLabel : Boolean; BoghandlerNummer : string = ''); + procedure SendTilPrinter_old(kontrolKoreliste, RuteNummer, Kommentar, BoghandlerNavn, Koreliste, SmsKode, DBKbane, Leveringssted : String; var PrintNyLabel : Boolean; BoghandlerNummer : string = ''); procedure PrintSimpelLabel( LabelData : TLabelData) ; @@ -27,7 +27,7 @@ procedure PrintFuldPakkeLabel( PakkeshopLabel : TLabelData); - procedure PrintDaodirekteLabel( RuteNummer, Kommentar, BoghandlerNavn : String) ; + procedure PrintDaodirekteLabel_old( RuteNummer, Kommentar, BoghandlerNavn : String) ; function GetPrinterCount() : Integer; @@ -119,7 +119,7 @@ end; -procedure TLabelPrint.PrintDaodirekteLabel( RuteNummer, Kommentar, BoghandlerNavn : String) ; +procedure TLabelPrint.PrintDaodirekteLabel_old( RuteNummer, Kommentar, BoghandlerNavn : String) ; begin with Printer do begin @@ -303,7 +303,7 @@ -procedure TLabelPrint.SendTilPrinter(kontrolKoreliste, RuteNummer, Kommentar, BoghandlerNavn, Koreliste, SmsKode, DBKbane, Leveringssted : String; var PrintNyLabel : Boolean; BoghandlerNummer : string = ''); +procedure TLabelPrint.SendTilPrinter_old(kontrolKoreliste, RuteNummer, Kommentar, BoghandlerNavn, Koreliste, SmsKode, DBKbane, Leveringssted : String; var PrintNyLabel : Boolean; BoghandlerNummer : string = ''); begin with Printer do begin