Index: VerpakkingsDefinitie/UI/ZoekProductenScherm.dfm
===================================================================
diff -u -r574 -r575
--- VerpakkingsDefinitie/UI/ZoekProductenScherm.dfm	(.../ZoekProductenScherm.dfm)	(revision 574)
+++ VerpakkingsDefinitie/UI/ZoekProductenScherm.dfm	(.../ZoekProductenScherm.dfm)	(revision 575)
@@ -158,7 +158,7 @@
         Width = 225
         Height = 21
         TabOrder = 0
-        OnChange = EditZoekReferentieChange
+        OnChange = EditReferentieChange
       end
       object EditKlantNrReferentie: TEdit
         Left = 120
@@ -167,6 +167,7 @@
         Height = 21
         TabOrder = 1
         TextHint = 'Klant nr'
+        OnChange = EditReferentieChange
       end
       object ComboBoxStockTypeReferentie: TComboBox
         Left = 120
Index: VerpakkingsDefinitie/UI/ZoekProductenScherm.pas
===================================================================
diff -u -r574 -r575
--- VerpakkingsDefinitie/UI/ZoekProductenScherm.pas	(.../ZoekProductenScherm.pas)	(revision 574)
+++ VerpakkingsDefinitie/UI/ZoekProductenScherm.pas	(.../ZoekProductenScherm.pas)	(revision 575)
@@ -49,7 +49,7 @@
     procedure ButtonZoekLeveranciersReferentieClick(Sender: TObject);
     procedure ComboBoxBeperkTekstChange(Sender: TObject);
     procedure EditZoekIdentNrChange(Sender: TObject);
-    procedure EditZoekReferentieChange(Sender: TObject);
+    procedure EditReferentieChange(Sender: TObject);
     procedure EditZoekTekstChange(Sender: TObject);
     procedure ButtonZoekTekstClick(Sender: TObject);
   private
@@ -122,9 +122,9 @@
   ButtonZoekIdentNr.Enabled := (Sender as TEdit).text <> EmptyStr;
 end;
 
-procedure TFormZoekProducten.EditZoekReferentieChange(Sender: TObject);
+procedure TFormZoekProducten.EditReferentieChange(Sender: TObject);
 begin
-  ButtonZoekLeveranciersReferentie.Enabled := (Sender as TEdit).text <> EmptyStr;
+  ButtonZoekLeveranciersReferentie.Enabled := (EditZoekReferentie.text <> EmptyStr) and (EditKlantNrReferentie.text <> EmptyStr);
 end;
 
 procedure TFormZoekProducten.EditZoekTekstChange(Sender: TObject);