Index: AAPClient/UI/PopupScherm.dfm
===================================================================
diff -u -r114 -r116
--- AAPClient/UI/PopupScherm.dfm	(.../PopupScherm.dfm)	(revision 114)
+++ AAPClient/UI/PopupScherm.dfm	(.../PopupScherm.dfm)	(revision 116)
@@ -13,6 +13,7 @@
   Font.Style = []
   OldCreateOrder = False
   Position = poOwnerFormCenter
+  OnShow = FormShow
   PixelsPerInch = 96
   TextHeight = 19
   object lblWaarschuwing: TLabel