paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-19 00:19:24 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Make HandleRequest public

Browse Source 
git-svn-id: trunk@18089 -
This commit is contained in:
michael 2011-08-04 07:18:13 +00:00
parent da37e20ed6
commit 3ffbd29367
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
packages/fcl-web/src/base/fphttp.pp
View File

@ -38,13 +38,13 @@ Type
Protected
Procedure DoHandleRequest(ARequest : TRequest; AResponse : TResponse; Var Handled : Boolean); virtual;
Procedure DoGetContent(ARequest : TRequest; Content : TStream; Var Handled : Boolean); virtual;
Procedure HandleRequest(ARequest : TRequest; AResponse : TResponse; Var Handled : Boolean);
Function ProduceContent : String; virtual;
Procedure SetRequest(ARequest: TRequest);
Protected
Property BeforeRequest : TRequestEvent Read FBeforeRequest Write FBeforeRequest;
Property AfterResponse : TResponseEvent Read FAfterResponse Write FAfterResponse;
Public
Procedure HandleRequest(ARequest : TRequest; AResponse : TResponse; Var Handled : Boolean);
Procedure GetContent(ARequest : TRequest; Content : TStream; Var Handled : Boolean);
Function HaveContent : Boolean; virtual;
function ContentToStream(Stream : TStream) : boolean; virtual;