From 3370c28e62de43f2238f35a24c2f7b63c023e29e Mon Sep 17 00:00:00 2001
From: jesus <jesus@lazarus-ide.org>
Date: Wed, 5 Mar 2008 20:45:26 +0000
Subject: [PATCH] LazReport, check valid activecontrol, issue #10950

git-svn-id: trunk@14436 -
---
 components/lazreport/source/lr_desgn.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/components/lazreport/source/lr_desgn.pas b/components/lazreport/source/lr_desgn.pas
index cd0d28ad24..604cfcb549 100644
--- a/components/lazreport/source/lr_desgn.pas
+++ b/components/lazreport/source/lr_desgn.pas
@@ -2886,7 +2886,7 @@ var
   t, t1: TfrView;
 begin
   {$IFNDEF EXTOI}
-  if ActiveControl.Parent = ObjInsp.fPropertyGrid then
+  if (ActiveControl<>nil) and (ActiveControl.Parent=ObjInsp.fPropertyGrid) then
     exit;
   {$ENDIF}
   StepX := 0; StepY := 0;