Przeglądaj źródła

* Fixed AV when no owner is set

git-svn-id: trunk@17262 -
joost 14 lat temu
rodzic
commit
b911e3d1c3
1 zmienionych plików z 1 dodań i 1 usunięć
  1. 1 1
      packages/fcl-web/src/base/fphtml.pp

+ 1 - 1
packages/fcl-web/src/base/fphtml.pp

@@ -812,7 +812,7 @@ begin
       exit;
       exit;
       end;
       end;
     end
     end
-  else //if (owner is TDataModule) then
+  else if assigned(Owner) then //if (owner is TDataModule) then
     begin
     begin
     for i := 0 to owner.ComponentCount-1 do if owner.Components[i] is TWebController then
     for i := 0 to owner.ComponentCount-1 do if owner.Components[i] is TWebController then
       begin
       begin