/[projects]/dao/DelphiScanner/Main.pas
ViewVC logotype

Diff of /dao/DelphiScanner/Main.pas

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 3097 by torben, Sun Aug 21 22:34:01 2016 UTC revision 3098 by torben, Mon Aug 22 18:23:15 2016 UTC
# Line 2408  begin Line 2408  begin
2408        SkrivScanningLogFil(logTekst);        SkrivScanningLogFil(logTekst);
2409    
2410        LabelPrint.PrintDaodirekteLabel( RuteNummer, Kommentar, BoghandlerNavn) ;        LabelPrint.PrintDaodirekteLabel( RuteNummer, Kommentar, BoghandlerNavn) ;
2411          
2412      end;      end;
2413    end;    end;
2414    
# Line 2867  begin Line 2867  begin
2867    begin    begin
2868      ShowMessage('Der er ikke installeret en printer på denne PC.');      ShowMessage('Der er ikke installeret en printer på denne PC.');
2869    end    end
2870    else if Config.PrinterNavn = 'Ingen' then  //  else if Config.PrinterNavn = 'Ingen' then //Det giver ikke længere mening at kunne fravælge printer
2871    begin  //  begin
2872      ShowMessage('Der er fravalgt printer i dette program.');  //    ShowMessage('Der er fravalgt printer i dette program.');
2873    end  //  end
2874    else    else
2875    begin    begin
2876      UpdateScreen(RuteNummer, Kommentar, BoghandlerNavn, Koreliste, '');      UpdateScreen(RuteNummer, Kommentar, BoghandlerNavn, Koreliste, '');
Legend:
Removed from v.3097  
changed lines
  Added in v.3098
  ViewVC Help
Powered by ViewVC 1.1.20