TSpiderRequest

type TSpiderRequest = class(TObject)

protected

  fRequestMethod: string;

  fUserAgent: string;

  fRemoteAddress: string;

  fContentType: string;

  fQueryString: string;

  fContentLength: string;

  fQueryFields: TStringList;

  fContentFields: TStringList;

  fCookieList: TStringList;

  fMultiPart: Boolean;

  fBoundary: string;

  fFilesCount: Integer;

  fFiles: TRequestFiles;

  fPathInfo: string;

  fReferer: string;

  fIsCGI: Boolean;

  fIsApache: Boolean;

  fURI: string;

  fHost: string;

  fWebServerSoftware: string;

  procedure ReadCookies; virtual; abstract;

  procedure DecodeMultiPart; virtual; abstract;

  function ReadContent; virtual; abstract;

  procedure DisplayErrorMessage(); virtual; abstract;

  procedure ReadVariables; virtual; abstract;

  procedure DecodeRequest();

  function GetRootURI;

  function GetHost;

public

  constructor Create;

  destructor Destroy; override;

  function Query();

  function Form();

  function GetCookie();

  function ContentNames();

  function ContentValues();

  property Queryfields: TStringList; [r]

  property ContentFields: TStringList; [r]

  property RequestMethod: string; [r]

  property UserAgent: string; [r]

  property RemoteAddress: string; [r]

  property ContentType: string; [r]

  property FilesCount: Integer; [r]

  property ContentFiles: TRequestFiles; [r]

  property PathInfo: string; [r]

  property Referer: string; [r]

  property URI: string; [r]

  property RootURI: string; [r]

  property WebServerSoftware: string; [r]

  property Host: string; [r]

  property IsCGI: Boolean; [r]

  property IsApache: Boolean; [r]

  property Cookies: TStringList; [r]

end;

TSpiderRequest

TObject