--- dao/DelphiScanner/LabelPrint.pas	2016/08/16 21:06:46	3091
+++ dao/DelphiScanner/LabelPrint.pas	2016/08/19 14:35:39	3094
@@ -4,7 +4,7 @@
 
 uses
   ParentForm,
-  PakkeshopLabels,
+  LabelData,
   Configuration,
   StBarc;
 
@@ -20,9 +20,9 @@
 
     procedure SendTilPrinter(kontrolKoreliste, RuteNummer, Kommentar, BoghandlerNavn, Koreliste, SmsKode, DBKbane, Leveringssted : String; var PrintNyLabel : Boolean; BoghandlerNummer : string = '');
 
-    procedure PrintFuldPakkeLabel( PakkeshopLabel : TPakkeshopLabel);
-    procedure PrintFuldPakkeLabelLille( PakkeshopLabel : TPakkeshopLabel);
-    procedure PrintFuldPakkeLabelStor( PakkeshopLabel : TPakkeshopLabel);
+    procedure PrintFuldPakkeLabel( PakkeshopLabel : TLabelData);
+    procedure PrintFuldPakkeLabelLille( PakkeshopLabel : TLabelData);
+    procedure PrintFuldPakkeLabelStor( PakkeshopLabel : TLabelData);
 
 
     procedure PrintDaodirekteLabel( RuteNummer, Kommentar, BoghandlerNavn : String) ;
@@ -52,7 +52,7 @@
   WinSpool,
   Windows,
   SysUtils, //Format
-  Math, // DegToRad() bruges i PrintPakkeshopLabel
+  Math, // DegToRad() bruges i PrinTLabelData
   Forms,
   IdHTTP,
   Graphics
@@ -314,7 +314,7 @@
 end;
 
 
-procedure TLabelPrint.PrintFuldPakkeLabel( PakkeshopLabel : TPakkeshopLabel);
+procedure TLabelPrint.PrintFuldPakkeLabel( PakkeshopLabel : TLabelData);
 begin
   if (Config.LabelStor = 1) then
   begin
@@ -330,7 +330,7 @@
 end;
 
 // Bruges til label der passer til 60x100
-procedure TLabelPrint.PrintFuldPakkeLabelLille( PakkeshopLabel : TPakkeshopLabel);
+procedure TLabelPrint.PrintFuldPakkeLabelLille( PakkeshopLabel : TLabelData);
 var
   XForm, XFormOld: TXForm; //Bruges til rotate X-formation
   Angle: integer;
@@ -454,7 +454,7 @@
 
 
 // Bruges til label der passer til 100x150
-procedure TLabelPrint.PrintFuldPakkeLabelStor( PakkeshopLabel : TPakkeshopLabel);
+procedure TLabelPrint.PrintFuldPakkeLabelStor( PakkeshopLabel : TLabelData);
 var
   XForm, XFormOld: TXForm; //Bruges til rotate X-formation
   Angle: integer;