Browse Source

* Inherited was not called

git-svn-id: trunk@17203 -
michael 14 years ago
parent
commit
5194a08195
1 changed files with 1 additions and 0 deletions
  1. 1 0
      packages/fcl-web/src/base/custweb.pp

+ 1 - 0
packages/fcl-web/src/base/custweb.pp

@@ -557,6 +557,7 @@ end;
 
 constructor TCustomWebApplication.Create(AOwner: TComponent);
 begin
+  Inherited Create(AOwner);
   FWebHandler := InitializeWebHandler;
   FWebHandler.FOnTerminate:=@DoOnTerminate;
 end;