--- dao/DelphiScanner/LabelPrint.pas 2016/08/22 18:23:15 3098 +++ dao/DelphiScanner/LabelPrint.pas 2016/08/22 18:27:30 3099 @@ -165,12 +165,13 @@ // 'Test' skal vise alarmlinie, samt opdatere listbox1 // 'Timer' skal kun vise alarmlinie - if (PrinterNavn = 'Ingen') and ( (tjektype = 'Opstart') or (tjektype = 'Test') ) then - begin - - parentForm.LogMessage( 'Der er fravalgt printer i dette program' ); - end - else if (Printer.Printers.Count = 0) and ( (tjektype = 'Opstart') or (tjektype = 'Test') ) then +// if (PrinterNavn = 'Ingen') and ( (tjektype = 'Opstart') or (tjektype = 'Test') ) then +// begin +// +// parentForm.LogMessage( 'Der er fravalgt printer i dette program' ); +// end +// else + if (Printer.Printers.Count = 0) and ( (tjektype = 'Opstart') or (tjektype = 'Test') ) then begin parentForm.LogMessage( 'Der er ikke installeret en printer på denne PC' ); end