Index: PlanScan/UI/frameDnaCodes.pas =================================================================== diff -u -r470 -r481 --- PlanScan/UI/frameDnaCodes.pas (.../frameDnaCodes.pas) (revision 470) +++ PlanScan/UI/frameDnaCodes.pas (.../frameDnaCodes.pas) (revision 481) @@ -12,7 +12,7 @@ TfrmDnaCodes = class(TFrame) dbgDnaCodes: TDBGrid; pnlActies: TPanel; - btnMaatwerketiket: TButton; + btnProductetiket: TButton; btnKlantEtiket: TButton; btnProboxetiket: TButton; pnlZoekKnoppen: TPanel; @@ -41,7 +41,7 @@ procedure ZoekViaOrdernummer(); procedure ZoekViaBatch(); procedure btnZoekenClick(Sender: TObject); - procedure btnMaatwerketiketClick(Sender: TObject); + procedure btnProductetiketClick(Sender: TObject); procedure btnKlantEtiketClick(Sender: TObject); procedure btnProboxetiketClick(Sender: TObject); procedure edtToeleveringEnter(Sender: TObject); @@ -87,7 +87,7 @@ dsDnaCodes.DataSet := cdsDnaCodes; end; -procedure TfrmDnaCodes.btnMaatwerketiketClick(Sender: TObject); +procedure TfrmDnaCodes.btnProductetiketClick(Sender: TObject); var DnaCodesStringList: TStringList; begin