THTTPRedirect

From Ultibo.org
Jump to: navigation, search

Return to Unit HTTP


Description


To be documented

Class definitions



THTTPRedirect = class(THTTPDocument)

public
constructor Create;  
private
FLocation:String;  
FFound:Boolean; Send a 302 Found redirect instead of a 307 Moved Temporarily redirect
FSeeOther:Boolean; Send a 303 See Other redirect instead of a 307 Moved Temporarily redirect
FPermanent:Boolean; Send a 301 Moved Permanently redirect instead of a 307 Moved Temporarily redirect
 
function GetLocation:String;  
procedure SetLocation(const ALocation:String);  
procedure SetFound(AFound:Boolean);  
procedure SetSeeOther(ASeeOther:Boolean);  
procedure SetPermanent(APermanent:Boolean);  
protected
function DoGet(AHost:THTTPHost; ARequest:THTTPServerRequest; AResponse:THTTPServerResponse):Boolean; override;  
public
property Location:String read GetLocation write SetLocation;  
property Found:Boolean read FFound write SetFound;  
property SeeOther:Boolean read FSeeOther write SetSeeOther;  
property Permanent:Boolean read FPermanent write SetPermanent;  


Function declarations



constructor THTTPRedirect.Create;
Description: To be documented
Note None documented


function THTTPRedirect.GetLocation:String;
Description: To be documented
Note None documented


procedure THTTPRedirect.SetLocation(const ALocation:String);
Description: To be documented
Note None documented


procedure THTTPRedirect.SetFound(AFound:Boolean);
Description: To be documented
Note None documented


procedure THTTPRedirect.SetSeeOther(ASeeOther:Boolean);
Description: To be documented
Note None documented


procedure THTTPRedirect.SetPermanent(APermanent:Boolean);
Description: To be documented
Note None documented


function THTTPRedirect.DoGet(AHost:THTTPHost; ARequest:THTTPServerRequest; AResponse:THTTPServerResponse):Boolean;
Description: Base GET Method for an HTTP Redirect
Note None documented


Return to Unit Reference