TWebStatusMain
From Ultibo.org
								Revision as of 05:46, 4 June 2018 by Ultibo (Talk | contribs) (Created page with "Return to Unit WebStatus   __TOC__  === Description === ----  ''To be documented''  === Class definitions === ----   <div class="toccolours mw-collapsible m...")
Return to Unit WebStatus
Description
To be documented
Class definitions
TWebStatusMain = class(THTTPDocument)
public 
 | |
 constructor Create;
 | 
|
 destructor Destroy; override;
 | 
|
private 
 | |
 FTitle:String;
 | 
|
 FCaption:String;
 | 
|
 FSubPages:TStringList;
 | 
|
 function GetTitle:String;
 | 
|
 procedure SetTitle(const ATitle:String);
 | 
|
 function GetCaption:String;
 | 
|
 function NormalizedDateTimeToStr(const DateTime:TDateTime):String;
 | 
|
protected 
 | |
 function MakeBold(const AName:String):String;
 | 
|
 function MakeLink(const AName,ALink:String):String;
 | 
|
 function AddBlank(AResponse:THTTPServerResponse):Boolean;
 | 
|
 function AddBlankEx(AResponse:THTTPServerResponse; AColumns:LongWord):Boolean;
 | 
|
 function AddItem(AResponse:THTTPServerResponse; const AName,AValue:String):Boolean;
 | 
|
 function AddItemEx(AResponse:THTTPServerResponse; const AName,AValue:String; AIndent:LongWord):Boolean;
 | 
|
 function AddItem3Column(AResponse:THTTPServerResponse; const AName,AValue1,AValue2:String):Boolean;
 | 
|
 function AddItem4Column(AResponse:THTTPServerResponse; const AName,AValue1,AValue2,AValue3:String):Boolean;
 | 
|
 function AddItem5Column(AResponse:THTTPServerResponse; const AName,AValue1,AValue2,AValue3,AValue4:String):Boolean;
 | 
|
 function AddBold(AResponse:THTTPServerResponse; const AName,AValue:String):Boolean;
 | 
|
 function AddBoldEx(AResponse:THTTPServerResponse; const AName,AValue:String; AIndent:LongWord):Boolean;
 | 
|
 function AddBold3Column(AResponse:THTTPServerResponse; const AName,AValue1,AValue2:String):Boolean;
 | 
|
 function AddBold4Column(AResponse:THTTPServerResponse; const AName,AValue1,AValue2,AValue3:String):Boolean;
 | 
|
 function AddBold5Column(AResponse:THTTPServerResponse; const AName,AValue1,AValue2,AValue3,AValue4:String):Boolean;
 | 
|
 function AddHeader(AResponse:THTTPServerResponse; const ATitle:String; ASub:TWebStatusSub):Boolean;
 | 
|
 function AddHeaderEx(AResponse:THTTPServerResponse; const ATitle,ACaption:String; ASub:TWebStatusSub; AColumns:LongWord):Boolean;
 | 
|
 function AddFooter(AResponse:THTTPServerResponse):Boolean;
 | 
|
 function AddFooterEx(AResponse:THTTPServerResponse; AColumns:LongWord):Boolean;
 | 
|
 function AddContent(AResponse:THTTPServerResponse; const AContent:String):Boolean;
 | 
|
 function DoGet(AHost:THTTPHost; ARequest:THTTPServerRequest; AResponse:THTTPServerResponse):Boolean; override;
 | 
|
public 
 | |
 property Title:String read GetTitle write SetTitle;
 | 
|
 property Caption:String read GetCaption;
 | 
|
 function RegisterSubPage(ASub:TWebStatusSub):Boolean;
 | 
|
 function DeregisterSubPage(ASub:TWebStatusSub):Boolean;
 | 
|
Function declarations
constructor TWebStatusMain.Create;
Description: To be documented
| Note | None documented | 
|---|
destructor TWebStatusMain.Destroy;
Description: To be documented
| Note | None documented | 
|---|
function TWebStatusMain.GetTitle:String;
Description: To be documented
| Note | None documented | 
|---|
procedure TWebStatusMain.SetTitle(const ATitle:String);
Description: To be documented
| Note | None documented | 
|---|
function TWebStatusMain.GetCaption:String;
Description: To be documented
| Note | None documented | 
|---|
function TWebStatusMain.NormalizedDateTimeToStr(const DateTime:TDateTime):String;
Description: To be documented
| Note | None documented | 
|---|
function TWebStatusMain.MakeBold(const AName:String):String;
Description: To be documented
| Note | None documented | 
|---|
function TWebStatusMain.MakeLink(const AName,ALink:String):String;
Description: To be documented
| Note | None documented | 
|---|
function TWebStatusMain.AddBlank(AResponse:THTTPServerResponse):Boolean;
Description: To be documented
| Note | None documented | 
|---|
function TWebStatusMain.AddBlankEx(AResponse:THTTPServerResponse; AColumns:LongWord):Boolean;
Description: To be documented
| Note | None documented | 
|---|
function TWebStatusMain.AddItem(AResponse:THTTPServerResponse; const AName,AValue:String):Boolean;
Description: To be documented
| Note | None documented | 
|---|
function TWebStatusMain.AddItemEx(AResponse:THTTPServerResponse; const AName,AValue:String; AIndent:LongWord):Boolean;
Description: To be documented
| Note | None documented | 
|---|
function TWebStatusMain.AddItem3Column(AResponse:THTTPServerResponse; const AName,AValue1,AValue2:String):Boolean;
Description: To be documented
| Note | None documented | 
|---|
function TWebStatusMain.AddItem4Column(AResponse:THTTPServerResponse; const AName,AValue1,AValue2,AValue3:String):Boolean;
Description: To be documented
| Note | None documented | 
|---|
function TWebStatusMain.AddItem5Column(AResponse:THTTPServerResponse; const AName,AValue1,AValue2,AValue3,AValue4:String):Boolean;
Description: To be documented
| Note | None documented | 
|---|
function TWebStatusMain.AddBold(AResponse:THTTPServerResponse; const AName,AValue:String):Boolean;
Description: To be documented
| Note | None documented | 
|---|
function TWebStatusMain.AddBoldEx(AResponse:THTTPServerResponse; const AName,AValue:String; AIndent:LongWord):Boolean;
Description: To be documented
| Note | None documented | 
|---|
function TWebStatusMain.AddBold3Column(AResponse:THTTPServerResponse; const AName,AValue1,AValue2:String):Boolean;
Description: To be documented
| Note | None documented | 
|---|
function TWebStatusMain.AddBold4Column(AResponse:THTTPServerResponse; const AName,AValue1,AValue2,AValue3:String):Boolean;
Description: To be documented
| Note | None documented | 
|---|
function TWebStatusMain.AddBold5Column(AResponse:THTTPServerResponse; const AName,AValue1,AValue2,AValue3,AValue4:String):Boolean;
Description: To be documented
| Note | None documented | 
|---|
function TWebStatusMain.AddHeader(AResponse:THTTPServerResponse; const ATitle:String; ASub:TWebStatusSub):Boolean;
Description: To be documented
| Note | None documented | 
|---|
function TWebStatusMain.AddHeaderEx(AResponse:THTTPServerResponse; const ATitle,ACaption:String; ASub:TWebStatusSub; AColumns:LongWord):Boolean;
Description: To be documented
| Note | None documented | 
|---|
function TWebStatusMain.AddFooter(AResponse:THTTPServerResponse):Boolean;
Description: To be documented
| Note | None documented | 
|---|
function TWebStatusMain.AddFooterEx(AResponse:THTTPServerResponse; AColumns:LongWord):Boolean;
Description: To be documented
| Note | None documented | 
|---|
function TWebStatusMain.AddContent(AResponse:THTTPServerResponse; const AContent:String):Boolean;
Description: To be documented
| Note | None documented | 
|---|
function TWebStatusMain.DoGet(AHost:THTTPHost; ARequest:THTTPServerRequest; AResponse:THTTPServerResponse):Boolean;
Description: To be documented
| Note | None documented | 
|---|
function TWebStatusMain.RegisterSubPage(ASub:TWebStatusSub):Boolean;
Description: To be documented
| Note | None documented | 
|---|
function TWebStatusMain.DeregisterSubPage(ASub:TWebStatusSub):Boolean;
Description: To be documented
| Note | None documented | 
|---|
Return to Unit Reference