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;
Index: AAPClient/ProScanMain.dfm
===================================================================
diff -u -r115 -r133
--- AAPClient/ProScanMain.dfm	(.../ProScanMain.dfm)	(revision 115)
+++ AAPClient/ProScanMain.dfm	(.../ProScanMain.dfm)	(revision 133)
@@ -3,8 +3,8 @@
   Top = 0
   BorderStyle = bsNone
   Caption = 'fmProScanHoofdscherm'
-  ClientHeight = 246
-  ClientWidth = 232
+  ClientHeight = 640
+  ClientWidth = 480
   Color = clBtnFace
   Font.Charset = DEFAULT_CHARSET
   Font.Color = clWindowText
@@ -17,10 +17,4 @@
   OnCreate = FormCreate
   PixelsPerInch = 96
   TextHeight = 13
-  object ApplicationEvents1: TApplicationEvents
-    OnModalBegin = ApplicationEvents1ModalBegin
-    OnModalEnd = ApplicationEvents1ModalEnd
-    Left = 104
-    Top = 112
-  end
 end