Index: AAPClient/ProScanMain.pas
===================================================================
diff -u -r115 -r133
--- AAPClient/ProScanMain.pas	(.../ProScanMain.pas)	(revision 115)
+++ AAPClient/ProScanMain.pas	(.../ProScanMain.pas)	(revision 133)
@@ -8,11 +8,8 @@
 
 type
   TfmProScanHoofdscherm = class(TForm)
-    ApplicationEvents1: TApplicationEvents;
     procedure FormCreate(Sender: TObject);
     procedure FormActivate(Sender: TObject);
-    procedure ApplicationEvents1ModalBegin(Sender: TObject);
-    procedure ApplicationEvents1ModalEnd(Sender: TObject);
   private
     fUiContext: TUiContext;
     fHuidigScherm: TForm;
@@ -40,16 +37,6 @@
 
 {$R *.dfm}
 
-procedure TfmProScanHoofdscherm.ApplicationEvents1ModalBegin(Sender: TObject);
-begin
-  //fmDimmerForm.Display;
-end;
-
-procedure TfmProScanHoofdscherm.ApplicationEvents1ModalEnd(Sender: TObject);
-begin
-  //fmDimmerForm.Hide;
-end;
-
 procedure TfmProScanHoofdscherm.FormActivate(Sender: TObject);
 var
   fModalResult: TModalResult;