Index: PlanScan/Main.dfm
===================================================================
diff -u -r290 -r293
--- PlanScan/Main.dfm	(.../Main.dfm)	(revision 290)
+++ PlanScan/Main.dfm	(.../Main.dfm)	(revision 293)
@@ -11,7 +11,9 @@
   Font.Name = 'Tahoma'
   Font.Style = []
   OldCreateOrder = False
+  OnClose = FormClose
   OnCreate = FormCreate
+  OnShow = FormShow
   PixelsPerInch = 96
   TextHeight = 13
   object CacheQuery1: TCacheQuery