Index: ProScan/UI/InfoLogScherm.pas =================================================================== diff -u -r509 -r511 --- ProScan/UI/InfoLogScherm.pas (.../InfoLogScherm.pas) (revision 509) +++ ProScan/UI/InfoLogScherm.pas (.../InfoLogScherm.pas) (revision 511) @@ -138,9 +138,10 @@ btnRechtsOnder.Action := actSchermLinks; end; lblToelevering.Caption := UiContext.Toelevering; - if UiContext.Modus = modusVHOSS then - VulGridMetDnaCodeData(VhossDataOphalen().DnaCodes) - else + if UiContext.Modus = modusVHOSS then begin + lblToelevering.Caption := ''; + VulGridMetDnaCodeData(VhossDataOphalen().DnaCodes); + end else VulGridMetDnaCodeData(ToeleveringDataOphalen().DnaCodes); inherited; end;