瀏覽代碼

* Inherited was not called

git-svn-id: trunk@17203 -
michael 14 年之前
父節點
當前提交
5194a08195
共有 1 個文件被更改,包括 1 次插入0 次删除
  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;