Ignore:
Timestamp:
Dec 26, 2011, 12:07:37 PM (13 years ago)
Author:
chronos
Message:
  • Upraveno: Testování varianty HTTP serveru jako přímé obsluhy přes TCP. Momentálně není odděleno generování stránek pro použití z více vláken.
  • Upraveno: Třída uchování jména počítač nyní pro převod do IPv4 používá ověření správnosti namísto přímého převodu a zahlášení výjimky.
File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/Components/CoolWeb/WebServer/UHTTPServer.pas

    r67 r68  
    3737    Cookies: TCookieList;
    3838    Post: TQueryParameterList;
     39    procedure Clear;
    3940    constructor Create;
    4041    destructor Destroy; override;
     
    4849    Headers: TStringList;
    4950    Cookies: TCookieList;
     51    procedure Clear;
    5052    constructor Create;
    5153    destructor Destroy; override;
     
    232234{ THTTPResponse }
    233235
     236procedure THTTPResponse.Clear;
     237begin
     238  Content.Clear;
     239  Cookies.Clear;
     240  Headers.Clear;
     241end;
     242
    234243constructor THTTPResponse.Create;
    235244begin
     
    267276
    268277{ THTTPRequest }
     278
     279procedure THTTPRequest.Clear;
     280begin
     281  Post.Clear;
     282  Content.Clear;
     283  QueryParts.Clear;
     284  Cookies.Clear;
     285  Headers.Clear;
     286  Query.Clear;
     287end;
    269288
    270289constructor THTTPRequest.Create;
Note: See TracChangeset for help on using the changeset viewer.