| Class TCGIResponse (unit CGIApp2) |
TWebResponse
| Constructors |
constructor Create(HTTPRequest: TWebRequest);| Functions |
procedure SendRedirect(const URI: string);
procedure SendResponse;
procedure SendStream(AStream: TStream);
function GetContent: string;
function GetDateVariable(Index: Integer): TDateTime;
function GetIntegerVariable(Index: Integer): Integer;
function GetLogMessage: string;
function GetStatusCode: Integer;
function GetStringVariable(Index: Integer): string;
function Sent: Boolean;
procedure SetContent(const Value: string);
procedure SetDateVariable(Index: Integer; const Value: TDateTime);
procedure SetIntegerVariable(Index: Integer; Value: Integer);
procedure SetLogMessage(const Value: string);
procedure SetStatusCode(Value: Integer);
procedure SetStringVariable(Index: Integer; const Value: string);| Properties |
| Events |
| Variables |
FContent : string;
FDateVariables : array[0..MAX_DATETIMES - 1] of TDateTime;
FIntegerVariables : array[0..MAX_INTEGERS - 1] of Integer;
FSent : Boolean;
FStatusCode : Integer;
FStringVariables : array[0..MAX_STRINGS - 1] of string;| Constructors |
constructor Create(HTTPRequest: TWebRequest);TCGIResponse
| Functions |
procedure SendRedirect(const URI: string);Drop the stream
procedure SendResponse;
procedure SendStream(AStream: TStream);
function GetContent: string;
function GetDateVariable(Index: Integer): TDateTime;
function GetIntegerVariable(Index: Integer): Integer;
function GetLogMessage: string;
function GetStatusCode: Integer;Result := TCGIRequest(HTTPRequest).ECB.lpszLogData;
function GetStringVariable(Index: Integer): string;
function Sent: Boolean;
procedure SetContent(const Value: string);
procedure SetDateVariable(Index: Integer; const Value: TDateTime);
procedure SetIntegerVariable(Index: Integer; Value: Integer);
procedure SetLogMessage(const Value: string);
procedure SetStatusCode(Value: Integer);StrPLCopy(TCGIRequest(HTTPRequest).ECB.lpszLogData, Value, HSE_LOG_BUFFER_LEN);
procedure SetStringVariable(Index: Integer; const Value: string);| Properties |
| Events |
| Variables |
FContent : string;
FDateVariables : array[0..MAX_DATETIMES - 1] of TDateTime;
FIntegerVariables : array[0..MAX_INTEGERS - 1] of Integer;
FSent : Boolean;
FStatusCode : Integer;
FStringVariables : array[0..MAX_STRINGS - 1] of string;