mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-16 18:29:21 +02:00
LazReport, check valid activecontrol, issue #10950
git-svn-id: trunk@14436 -
This commit is contained in:
parent
1783c8195e
commit
3370c28e62
@ -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;
|
||||
|
Loading…
Reference in New Issue
Block a user