http://digital-flame.ru/

# Class TfHTTPServer

Description | Hierarchy | Fields | Methods | Properties

## Unit

uHTTPServer_Main

## Declaration

`type TfHTTPServer = class(TForm)`

## Description

myUnits

## Hierarchy

- TForm
- TfHTTPServer

## Overview

### Fields

| `IdServerIOHandlerSSLOpenSSL: TIdServerIOHandlerSSLOpenSSL;`
| `TrayIcon: TTrayIcon;`
| `IdIPWatch: TIdIPWatch;`
| `OpenDialog: TOpenDialog;`
| `ApplicationEvents: TApplicationEvents;`
| `ilTrayIcon: TImageList;`
| `PopupMenu: TPopupMenu;`
| `pNormalWindow: TMenuItem;`
| `pExit: TMenuItem;`
| `PageControl: TPageControl;`
| `tsMain: TTabSheet;`
| `tsTest: TTabSheet;`
| `bToggleStartStopServer: TButton;`
| `MemoTest: TMemo;`
| `tsLogging: TTabSheet;`
| `mmo1: TMemo;`
| `mmo2: TMemo;`
| `mmo3: TMemo;`
| `bTest: TButton;`
| `lServer: TLabel;`
| `lProtocol: TLabel;`
| `eServer: TEdit;`
| `eProtocol: TEdit;`
| `lPort: TLabel;`
| `ePort: TEdit;`
| `IdHTTPServer: TIdHTTPServer;`
| `pTopPanelLogging: TPanel;`
| `cbEnableLogging: TCheckBox;`
| `lTimeOfWorking: TLabel;`
| `tWorkingTime: TTimer;`

### Methods

| `procedure bToggleStartStopServerClick(Sender: TObject);`
| `procedure FormCreate(Sender: TObject);`
| `procedure IdHTTPServerCommandGet(AContext: TIdContext; ARequestInfo: TIdHTTPRequestInfo; AResponseInfo: TIdHTTPResponseInfo);`
| `procedure IdServerIOHandlerSSLOpenSSLGetPassword(var Password: string);`
| `procedure FormDestroy(Sender: TObject);`
| `procedure IdServerIOHandlerSSLOpenSSLStatus(ASender: TObject; const AStatus: TIdStatus; const AStatusText: string);`
| `procedure IdServerIOHandlerSSLOpenSSLStatusInfo(const AMsg: string);`
| `procedure IdServerIOHandlerSSLOpenSSLStatusInfoEx(ASender: TObject; const AsslSocket: PSSL; const AWhere, Aret: Integer; const AType, AMsg: string);`
| `procedure TrayIconClick(Sender: TObject);`
| `procedure bTestClick(Sender: TObject);`
| `procedure FormShow(Sender: TObject);`
| `procedure ApplicationEventsMinimize(Sender: TObject);`
| `procedure TrayIconDblClick(Sender: TObject);`
| `procedure pExitClick(Sender: TObject);`
| `procedure pNormalWindowClick(Sender: TObject);`
| `procedure FormResize(Sender: TObject);`
| `procedure tWorkingTimeTimer(Sender: TObject);`
| `procedure cbEnableLoggingClick(Sender: TObject);`
| `constructor Create(AOwner:TComponent); override;`

### Properties

| `property DataBaseUnitServer: TDataBaseUnitServer read FDataBaseUnitServer write FDataBaseUnitServer;`
| `property DeleteServer: TDelete read FDeleteServer write FDeleteServer;`
| `property AddFoldersAndFilesToDB: TAddFoldersAndFilesToDB read FAddFoldersAndFilesToDB write FAddFoldersAndFilesToDB;`

## Description

### Fields

| `IdServerIOHandlerSSLOpenSSL: TIdServerIOHandlerSSLOpenSSL;`

| `TrayIcon: TTrayIcon;`

| `IdIPWatch: TIdIPWatch;`

| `OpenDialog: TOpenDialog;`

| `ApplicationEvents: TApplicationEvents;`

| `ilTrayIcon: TImageList;`

| `PopupMenu: TPopupMenu;`

| `pNormalWindow: TMenuItem;`

| `pExit: TMenuItem;`

| `PageControl: TPageControl;`

| `tsMain: TTabSheet;`

| `tsTest: TTabSheet;`

| `bToggleStartStopServer: TButton;`

| `MemoTest: TMemo;`

| `tsLogging: TTabSheet;`

| `mmo1: TMemo;`

| `mmo2: TMemo;`

| `mmo3: TMemo;`

| `bTest: TButton;`

| `lServer: TLabel;`

| `lProtocol: TLabel;`

| `eServer: TEdit;`

| `eProtocol: TEdit;`

| `lPort: TLabel;`

| `ePort: TEdit;`

| `IdHTTPServer: TIdHTTPServer;`

| `pTopPanelLogging: TPanel;`

| `cbEnableLogging: TCheckBox;`

| `lTimeOfWorking: TLabel;`

| `tWorkingTime: TTimer;`

### Methods

| `procedure bToggleStartStopServerClick(Sender: TObject);`

| `procedure FormCreate(Sender: TObject);`

| `procedure IdHTTPServerCommandGet(AContext: TIdContext; ARequestInfo: TIdHTTPRequestInfo; AResponseInfo: TIdHTTPResponseInfo);`

| `procedure IdServerIOHandlerSSLOpenSSLGetPassword(var Password: string);`

| `procedure FormDestroy(Sender: TObject);`

| `procedure IdServerIOHandlerSSLOpenSSLStatus(ASender: TObject; const AStatus: TIdStatus; const AStatusText: string);`

| `procedure IdServerIOHandlerSSLOpenSSLStatusInfo(const AMsg: string);`

| `procedure IdServerIOHandlerSSLOpenSSLStatusInfoEx(ASender: TObject; const AsslSocket: PSSL; const AWhere, Aret: Integer; const AType, AMsg: string);`

| `procedure TrayIconClick(Sender: TObject);`

| `procedure bTestClick(Sender: TObject);`

| `procedure FormShow(Sender: TObject);`

| `procedure ApplicationEventsMinimize(Sender: TObject);`

| `procedure TrayIconDblClick(Sender: TObject);`

| `procedure pExitClick(Sender: TObject);`

| `procedure pNormalWindowClick(Sender: TObject);`

| `procedure FormResize(Sender: TObject);`

| `procedure tWorkingTimeTimer(Sender: TObject);`

| `procedure cbEnableLoggingClick(Sender: TObject);`

| `constructor Create(AOwner:TComponent); override;`
Public declarations

### Properties

| `property DataBaseUnitServer: TDataBaseUnitServer read FDataBaseUnitServer write FDataBaseUnitServer;`

| `property DeleteServer: TDelete read FDeleteServer write FDeleteServer;`

| `property AddFoldersAndFilesToDB: TAddFoldersAndFilesToDB read FAddFoldersAndFilesToDB write FAddFoldersAndFilesToDB;`

Generated by PasDoc 0.14.0.