Ignore:
Timestamp:
Oct 2, 2012, 9:22:02 AM (12 years ago)
Author:
chronos
Message:
  • Opraveno: Neuvolňovaly se správně registrované stránky.
Location:
trunk
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • trunk

    • Property svn:ignore

      •  

        old new  
        55backup
        66ZdechovNET.lps
         7heaptrclog.trc

  • trunk/Packages/CoolWeb/WebServer/UWebApp.pas

    r91 r96  
    1212  THTTPServerType = (stCGI, stTCP, stTurboPower);
    1313
     14  { TRegistredPage }
     15
    1416  TRegistredPage = class
    1517    Name: string;
    1618    Page: TWebPage;
     19    destructor Destroy; override;
    1720  end;
    1821
    … …  
    6568end;
    6669
     70{ TRegistredPage }
     71
     72destructor TRegistredPage.Destroy;
     73begin
     74  if Assigned(Page) then FreeAndNil(Page);
     75end;
     76
    6777
    6878{ TPageList }
Note: See TracChangeset for help on using the changeset viewer.