/[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 3099 by torben, Mon Aug 22 18:27:30 2016 UTC revision 3100 by torben, Mon Aug 22 21:46:10 2016 UTC
# Line 2223  pakkeForkertSted : Integer; Line 2223  pakkeForkertSted : Integer;
2223    kontrolKoreliste : string;    kontrolKoreliste : string;
2224    nytRuteNummer, nyFarve : String;    nytRuteNummer, nyFarve : String;
2225  begin  begin
2226      if (PrintNyLabel = True OR chkAltidPrintLabel.Checked = True) then
2227      begin
2228        LabelPrint.PrintLabel( Stregkode );
2229      end;
2230    
2231    
2232      exit;
2233    
2234    if menuDaoDirekte1.Checked then    if menuDaoDirekte1.Checked then
2235       RuteNummerST.Color := TUtils.HexToTColor(Farve);       RuteNummerST.Color := TUtils.HexToTColor(Farve);
2236    

Legend:
Removed from v.3099  
changed lines
  Added in v.3100

  ViewVC Help
Powered by ViewVC 1.1.20