LazReport, check valid activecontrol, issue #10950

git-svn-id: trunk@14436 -
This commit is contained in:
jesus 2008-03-05 20:45:26 +00:00
parent 1783c8195e
commit 3370c28e62

View File

@ -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;