Ignore:
Timestamp:
Dec 25, 2011, 9:40:28 PM (13 years ago)
Author:
chronos
Message:
  • Upraveno: Přidáno analyzování HTTP POST informací.
  • Upraveno: Příprava pro zpracování hodnot z objektů HTML formulářů.
File:
1 edited

Legend:

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

    r61 r67  
    8888      SessionStorage.Load(HandlerData);
    8989
    90     Response.Stream.Clear;
     90    Response.Content.Clear;
    9191    Response.Headers.Values['Content-Type'] := 'text/html';
    9292
     
    100100    with Response do begin
    101101      SendString('HTTP/1.0 200 OK'#13#10);
    102       Headers.Values['Content-Length'] := IntToStr(Stream.Size);
     102      Headers.Values['Content-Length'] := IntToStr(Content.Size);
    103103      Headers.Values['Connection'] := 'close';
    104104      Headers.Values['Date'] := RFC822DateTime(Now);
     
    115115      end;
    116116      SendString(#13#10);
    117       SendBuffer(Stream.Memory, Stream.Size);
     117      SendBuffer(Content.Memory, Content.Size);
    118118      SendString(#13#10);
    119119    end;
Note: See TracChangeset for help on using the changeset viewer.