Index: AAPClient/UI/PopupScherm.pas
===================================================================
diff -u -r241 -r245
--- AAPClient/UI/PopupScherm.pas	(.../PopupScherm.pas)	(revision 241)
+++ AAPClient/UI/PopupScherm.pas	(.../PopupScherm.pas)	(revision 245)
@@ -50,6 +50,7 @@
 procedure TfmPopupScherm.FormShow(Sender: TObject);
 begin
   fDimmerForm := TfmDimmerform.Create(Self);
+  fDimmerForm.Enabled := false;
   fDimmerForm.Left := Self.Left - 40;
   fDimmerForm.Top := Self.Top - 40;
   fDimmerForm.Show;