LCL: TPage: removing pfAdded after destroying handle issue #7611

git-svn-id: trunk@10184 -
This commit is contained in:
mattias 2006-11-10 08:29:49 +00:00
parent 8a29f2f36c
commit 3febf01ee8

View File

@ -140,6 +140,7 @@ end;
procedure TCustomPage.DestroyHandle;
begin
inherited DestroyHandle;
Exclude(FFlags,pfAdded);
end;
{------------------------------------------------------------------------------