From a24a173af02199cfb0017cbd60548001e6191f0b Mon Sep 17 00:00:00 2001
From: joost <joost@3ad0048d-3df7-0310-abae-a5850022a9f2>
Date: Wed, 6 Apr 2011 10:15:37 +0000
Subject:  * Fixed AV when no owner is set

git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@17262 3ad0048d-3df7-0310-abae-a5850022a9f2
---
 packages/fcl-web/src/base/fphtml.pp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'packages/fcl-web/src')

diff --git a/packages/fcl-web/src/base/fphtml.pp b/packages/fcl-web/src/base/fphtml.pp
index f00f5593b5..a6645732c1 100644
--- a/packages/fcl-web/src/base/fphtml.pp
+++ b/packages/fcl-web/src/base/fphtml.pp
@@ -812,7 +812,7 @@ begin
       exit;
       end;
     end
-  else //if (owner is TDataModule) then
+  else if assigned(Owner) then //if (owner is TDataModule) then
     begin
     for i := 0 to owner.ComponentCount-1 do if owner.Components[i] is TWebController then
       begin
-- 
cgit v1.2.1