From 56f53627bd05524ba45387dd8e8036072f70d374 Mon Sep 17 00:00:00 2001
From: alexs75 <alexs75@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Sat, 29 Oct 2011 07:37:46 +0000
Subject: [PATCH] fix bug in RxCloseFormValidate - AV on remove componet from
 form

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@2102 8e941d3f-bd1b-0410-a28a-d453659cc2b4
---
 components/rx/rxcloseformvalidator.pas | 1 +
 1 file changed, 1 insertion(+)

diff --git a/components/rx/rxcloseformvalidator.pas b/components/rx/rxcloseformvalidator.pas
index f48c76b94..878a200bf 100644
--- a/components/rx/rxcloseformvalidator.pas
+++ b/components/rx/rxcloseformvalidator.pas
@@ -345,6 +345,7 @@ var
   i:integer;
 begin
   inherited Notification(AComponent, Operation);
+  if AComponent = Self then exit;
   if Operation = opRemove then
   begin
     for i:=0 to FItems.Count - 1 do