// Borland C++ Builder
// Copyright (c) 1995, 2005 by Borland Software Corporation
// All rights reserved

// (DO NOT EDIT: machine generated header) 'Iwservercontrollerbase.pas' rev: 10.00

#ifndef IwservercontrollerbaseHPP
#define IwservercontrollerbaseHPP

#pragma delphiheader begin
#pragma option push
#pragma option -w-      // All warnings off
#pragma option -Vx      // Zero-length empty class member functions
#pragma pack(push,8)
#include <System.hpp>	// Pascal unit
#include <Sysinit.hpp>	// Pascal unit
#include <Iwvclcomponent.hpp>	// Pascal unit
#include <Iwvclclasses.hpp>	// Pascal unit
#include <Windows.hpp>	// Pascal unit
#include <Activex.hpp>	// Pascal unit
#include <Forms.hpp>	// Pascal unit
#include <Graphics.hpp>	// Pascal unit
#include <Classes.hpp>	// Pascal unit
#include <Sysutils.hpp>	// Pascal unit
#include <Syncobjs.hpp>	// Pascal unit
#include <Httpapp.hpp>	// Pascal unit
#include <Iwfilereference.hpp>	// Pascal unit
#include <Iwbaseinterfaces.hpp>	// Pascal unit
#include <Iwbaseform.hpp>	// Pascal unit
#include <Iwapplication.hpp>	// Pascal unit
#include <Iwtypes.hpp>	// Pascal unit
#include <Iwcompress.hpp>	// Pascal unit

//-- user supplied -----------------------------------------------------------

namespace Iwservercontrollerbase
{
//-- type declarations -------------------------------------------------------
class DELPHICLASS TSessionTimeoutThread;
class PASCALIMPLEMENTATION TSessionTimeoutThread : public Classes::TThread 
{
	typedef Classes::TThread inherited;
	
protected:
	virtual void __fastcall Execute(void);
public:
	#pragma option push -w-inl
	/* TThread.Create */ inline __fastcall TSessionTimeoutThread(bool CreateSuspended) : Classes::TThread(CreateSuspended) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TThread.Destroy */ inline __fastcall virtual ~TSessionTimeoutThread(void) { }
	#pragma option pop
	
};


typedef TIWVCLDataModule TIWDatamodule;
;

#pragma option push -b-
enum TComInitialization { ciNone, ciNormal, ciMultiThreaded };
#pragma option pop

typedef void __fastcall (__closure *TOnWAPClientDetectEvent)(Iwapplication::TIWWAPClient* &AWAPClient);

typedef void __fastcall (__closure *TOnAuthRequest)(const AnsiString AUserName, const AnsiString APassword, bool &AValid);

typedef void __fastcall (__closure *TOnFileAccess)(Httpapp::TWebRequest* ARequest, const AnsiString AUsername, const AnsiString APassword, const AnsiString AFile, bool &AValid);

typedef void __fastcall (__closure *TOnNewSessionEvent)(Iwapplication::TIWApplication* ASession, Iwbaseform::TIWBaseForm* &VMainForm);

typedef void __fastcall (__closure *TOnCloseSessionEvent)(Iwapplication::TIWApplication* ASession);

typedef void __fastcall (__closure *TOnExceptionEvent)(Iwapplication::TIWApplication* AApplication, Sysutils::Exception* AException, bool &Handled);

typedef void __fastcall (__closure *TOnInvalidCommandEvent)(Httpapp::TWebRequest* ARequest, Httpapp::TWebResponse* AResponse, AnsiString AMsg);

typedef void __fastcall (__closure *TOnReEntryEvent)(Iwapplication::TIWApplication* ASession);

typedef void __fastcall (__closure *TOnBackButtonEvent)(int ASubmittedSequence, int ACurrentSequence, AnsiString AFormName, bool &VHandled, bool &VExecute);

typedef void __fastcall (__closure *TOnGetSessionID)(Iwapplication::TIWApplication* ASession, AnsiString &VNewSessionID);

typedef void __fastcall (__closure *TOnBeforeRenderEvent)(Iwapplication::TIWApplication* ASession, Iwbaseform::TIWBaseForm* AForm, Iwbaseform::TIWBaseForm* &VNewForm);

typedef void __fastcall (__closure *TOnAfterRenderEvent)(Iwapplication::TIWApplication* ASession, Iwbaseform::TIWBaseForm* AForm);

#pragma option push -b-
enum TIWSessionTrackingMethod { tmURL, tmCookie, tmHidden };
#pragma option pop

class DELPHICLASS TCachePurgeThread;
class PASCALIMPLEMENTATION TCachePurgeThread : public Classes::TThread 
{
	typedef Classes::TThread inherited;
	
private:
	bool FPurging;
	void __fastcall SetCacheDir(const AnsiString Value);
	
protected:
	AnsiString FCacheDir;
	Syncobjs::TCriticalSection* FLock;
	unsigned FToken;
	virtual void __fastcall Execute(void);
	
public:
	__fastcall TCachePurgeThread(unsigned ASecurityToken);
	__fastcall virtual ~TCachePurgeThread(void);
	__property AnsiString CacheDir = {write=SetCacheDir};
	__property bool Purging = {read=FPurging, nodefault};
};


typedef Shortint TIWCompressionLevel;

class DELPHICLASS TIWCompression;
class PASCALIMPLEMENTATION TIWCompression : public Classes::TPersistent 
{
	typedef Classes::TPersistent inherited;
	
protected:
	bool FEnabled;
	TIWCompressionLevel FLevel;
	Iwcompress::TIWCompressor* FCompressor;
	void __fastcall SetEnabled(const bool AValue);
	
public:
	__fastcall TIWCompression(void);
	__fastcall virtual ~TIWCompression(void);
	virtual void __fastcall Assign(Classes::TPersistent* ASource);
	
__published:
	__property bool Enabled = {read=FEnabled, write=SetEnabled, nodefault};
	__property TIWCompressionLevel Level = {read=FLevel, write=FLevel, nodefault};
};


#pragma option push -b-
enum TIWNonSSLRequest { nsAccept, nsBlock, nsRedirect };
#pragma option pop

class DELPHICLASS TIWSSLOptions;
class PASCALIMPLEMENTATION TIWSSLOptions : public Classes::TPersistent 
{
	typedef Classes::TPersistent inherited;
	
protected:
	AnsiString FCertificatePassword;
	int FPort;
	TIWNonSSLRequest FNonSSLRequest;
	
public:
	__fastcall TIWSSLOptions(void);
	virtual void __fastcall Assign(Classes::TPersistent* ASource);
	
__published:
	__property AnsiString CertificatePassword = {read=FCertificatePassword, write=FCertificatePassword};
	__property TIWNonSSLRequest NonSSLRequest = {read=FNonSSLRequest, write=FNonSSLRequest, nodefault};
	__property int Port = {read=FPort, write=FPort, nodefault};
public:
	#pragma option push -w-inl
	/* TPersistent.Destroy */ inline __fastcall virtual ~TIWSSLOptions(void) { }
	#pragma option pop
	
};


class DELPHICLASS TIWReEntryOptions;
class PASCALIMPLEMENTATION TIWReEntryOptions : public Classes::TPersistent 
{
	typedef Classes::TPersistent inherited;
	
private:
	void __fastcall SetInvalidSession(const Iwfilereference::TIWFileReference* Value);
	
protected:
	bool FAutoCreateSession;
	AnsiString FCmd;
	Iwfilereference::TIWFileReference* FInvalidSession;
	
public:
	__fastcall TIWReEntryOptions(void)/* overload */;
	__fastcall TIWReEntryOptions(bool AAutoSession, AnsiString ACmd, Iwfilereference::TIWFileReference* AInvalidSession)/* overload */;
	__fastcall virtual ~TIWReEntryOptions(void);
	virtual void __fastcall Assign(Classes::TPersistent* ASource);
	
__published:
	__property bool AutoCreateSession = {read=FAutoCreateSession, write=FAutoCreateSession, nodefault};
	__property AnsiString Cmd = {read=FCmd, write=FCmd};
	__property Iwfilereference::TIWFileReference* InvalidSession = {read=FInvalidSession, write=SetInvalidSession};
};


typedef TIWReEntryOptions TIWReEntryOptionsInternal;
;

typedef void __fastcall (__closure *TOnDispatch)(System::TObject* Sender, Httpapp::TWebRequest* Request, Httpapp::TWebResponse* Response, bool &Handled);

class DELPHICLASS TIWBrowser32Behaviour;
class PASCALIMPLEMENTATION TIWBrowser32Behaviour : public Classes::TPersistent 
{
	typedef Classes::TPersistent inherited;
	
private:
	bool FNetscape4As32;
	bool FNetscape6As32;
	bool FIExplorer4As32;
	
public:
	__fastcall TIWBrowser32Behaviour(void)/* overload */;
	__fastcall TIWBrowser32Behaviour(bool ANetscape4As32, bool ANetscape6As32, bool AIExplorer4As32)/* overload */;
	
__published:
	__property bool Netscape4As32 = {read=FNetscape4As32, write=FNetscape4As32, nodefault};
	__property bool Netscape6As32 = {read=FNetscape6As32, write=FNetscape6As32, nodefault};
	__property bool IExplorer4As32 = {read=FIExplorer4As32, write=FIExplorer4As32, nodefault};
public:
	#pragma option push -w-inl
	/* TPersistent.Destroy */ inline __fastcall virtual ~TIWBrowser32Behaviour(void) { }
	#pragma option pop
	
};


typedef TIWBrowser32Behaviour TIWBrowser32BehaviourInternal;
;

class DELPHICLASS TSafePlace;
class PASCALIMPLEMENTATION TSafePlace : public System::TObject 
{
	typedef System::TObject inherited;
	
public:
	AnsiString FCacheDir;
public:
	#pragma option push -w-inl
	/* TObject.Create */ inline __fastcall TSafePlace(void) : System::TObject() { }
	#pragma option pop
	#pragma option push -w-inl
	/* TObject.Destroy */ inline __fastcall virtual ~TSafePlace(void) { }
	#pragma option pop
	
};


#pragma option push -b-
enum TLogOptions { loNone, loFile };
#pragma option pop

class DELPHICLASS TIWServerControllerBase;
class PASCALIMPLEMENTATION TIWServerControllerBase : public Iwvclcomponent::TIWVCLDataModule 
{
	typedef Iwvclcomponent::TIWVCLDataModule inherited;
	
private:
	bool FPageTransitions;
	int FServerResizeTimeout;
	int FThreadPool;
	
protected:
	bool FDebugHTML;
	TLogOptions FLog;
	TSafePlace* FSafePlace;
	System::TDateTime FStartDateTime;
	bool FAuthBeforeNewSession;
	bool FAllowSubFolders;
	AnsiString FAppName;
	Classes::TStringList* FAuthList;
	AnsiString FBoundIP;
	TCachePurgeThread* FCachePurgeThread;
	AnsiString FCharSet;
	unsigned FToken;
	int FCacheExpiry;
	TIWCompression* FCompression;
	TComInitialization FComInitialization;
	AnsiString FDescription;
	Iwfilereference::TIWFileReference* FDeviceNotSupported;
	AnsiString FExecCmd;
	Iwtypes::TIWShowMessageType FExceptionDisplayMode;
	bool FEnableImageToolbar;
	bool FGUIActive;
	bool FHasOwnCacheDir;
	bool FHasOwnFilesDir;
	bool FHistoryEnabled;
	Classes::TStringList* FHTMLHeaders;
	TIWBrowser32Behaviour* FBrowser32Behaviour;
	Iwfilereference::TIWFileReference* FNoJavaScriptSupport;
	Iwfilereference::TIWFileReference* FNoCookieSupport;
	AnsiString FInvalidCommandURL;
	bool FLicenseTracking;
	AnsiString FMasterTemplate;
	AnsiString FMasterTemplate32;
	TOnDispatch FOnAfterDispatch;
	TOnDispatch FOnBeforeDispatch;
	TOnAuthRequest FOnAuthReqeust;
	TOnFileAccess FOnFileAccess;
	TOnCloseSessionEvent FOnCloseSession;
	TOnExceptionEvent FOnException;
	TOnGetSessionID FOnGetSessionID;
	TOnInvalidCommandEvent FOnInvalidCommand;
	TOnNewSessionEvent FOnNewSession;
	TOnReEntryEvent FOnReEntry;
	TOnBackButtonEvent FOnBackButton;
	TOnWAPClientDetectEvent FOnWAPClientDetect;
	TOnBeforeRenderEvent FOnBeforeRender;
	TOnAfterRenderEvent FOnAfterRender;
	int FPort;
	AnsiString FProcessID;
	bool FRestrictIPs;
	bool FRestrictSubnet;
	TIWReEntryOptions* FReEntryOptions;
	int FRedirectMsgDelay;
	bool FShowResyncWarning;
	int FSessionTimeout;
	TSessionTimeoutThread* FSessionTimeoutThread;
	TIWSessionTrackingMethod FSessionTrackingMethod;
	TIWSSLOptions* FSSLOptions;
	AnsiString FStartCmd;
	Iwtypes::TIWBrowsers FSupportedBrowsers;
	AnsiString FTemplateDir;
	Iwfilereference::TIWFileReference* FSessionTimeoutURL;
	Iwfilereference::TIWFileReference* FStyleSheet;
	Iwtypes::TIWUnknownBrowserAction FUnknownBrowserAction;
	Iwfilereference::TIWFileReference* FUnknownBrowser;
	AnsiString FURLBase;
	bool FUseInternalFiles;
	AnsiString FInternalFilesURL;
	AnsiString FInternalFilesDir;
	AnsiString FCacheURL;
	AnsiString FFilesURL;
	AnsiString FFilesDir;
	void __fastcall SetCharSet(AnsiString ACharSet);
	void __fastcall SetAuthList(const Classes::TStringList* AValue);
	void __fastcall SetHTMLHeaders(const Classes::TStringList* AValue);
	void __fastcall SetSessionTimeout(const int AValue);
	void __fastcall SetVersion(const AnsiString AValue);
	AnsiString __fastcall GetVersion();
	AnsiString __fastcall GetAppPath();
	AnsiString __fastcall GetUserCacheDir();
	void __fastcall SetCacheDir(const AnsiString Value);
	AnsiString __fastcall GetCacheDir();
	void __fastcall SetInternalFilesDir(const AnsiString Value);
	void __fastcall SetFilesDir(const AnsiString Value);
	void __fastcall SetInternalFilesURL(const AnsiString Value);
	void __fastcall SetTemplateDir(const AnsiString Value);
	AnsiString __fastcall GetInternalFilesURL();
	void __fastcall SetUseInternalFiles(const bool Value);
	AnsiString __fastcall GetCacheURL();
	AnsiString __fastcall GetUserCacheURL();
	AnsiString __fastcall GetFilesURL();
	AnsiString __fastcall GetFilesNCURL();
	void __fastcall SetAppname(const AnsiString Value);
	virtual void __fastcall Loaded(void);
	virtual void __fastcall InitDesignTime(void);
	virtual void __fastcall InitControl(void);
	virtual void __fastcall Dispose(bool ADispose);
	
public:
	bool __fastcall AuthActive(void);
	__fastcall virtual TIWServerControllerBase(Classes::TComponent* AOnwer);
	__fastcall virtual TIWServerControllerBase(Classes::TComponent* AOwner, int Dummy);
	virtual void __fastcall BeforeDestruction(void);
	virtual void __fastcall AfterConstruction(void);
	void __fastcall Compress(System::TObject* ASender, Httpapp::TWebRequest* ARequest, Httpapp::TWebResponse* AResponse, bool &AHandled);
	void __fastcall DoCloseSession(Iwapplication::TIWApplication* ASession);
	bool __fastcall DoException(Iwapplication::TIWApplication* AApplication, Sysutils::Exception* AException, bool &Handled);
	void __fastcall DoGetSessionID(Iwapplication::TIWApplication* ASession, AnsiString &VNewSessionID);
	void __fastcall DoInvalidCommand(Httpapp::TWebRequest* ARequest, Httpapp::TWebResponse* AResponse, AnsiString AMsg);
	void __fastcall DoNewSession(Iwapplication::TIWApplication* ASession, Iwbaseform::TIWBaseForm* &VMainForm);
	void __fastcall DoReEntry(Iwapplication::TIWApplication* ASession);
	void __fastcall DoBackButton(unsigned ASubmittedSequence, unsigned ACurrentSequence, AnsiString AFormName, bool &VHandled, bool &VExecute);
	void __fastcall DoWAPClientDetect(Iwapplication::TIWWAPClient* &AWAPClient);
	void __fastcall MakeGUIActive(void);
	/*         class method */ static AnsiString __fastcall NewCacheFile(TMetaClass* vmt, const AnsiString APrefix, bool AUserCache = false);
	/*         class method */ static void __fastcall SetServerControllerClass(TMetaClass* vmt);
	__property AnsiString AppPath = {read=GetAppPath};
	__property AnsiString CacheURL = {read=GetCacheURL};
	__property AnsiString FilesURL = {read=GetFilesURL};
	__property AnsiString FilesNCURL = {read=GetFilesNCURL};
	__property System::TDateTime StartDateTime = {read=FStartDateTime};
	__property bool GUIActive = {read=FGUIActive, nodefault};
	__property bool LicenseTracking = {read=FLicenseTracking, write=FLicenseTracking, nodefault};
	__property AnsiString ProcessID = {read=FProcessID};
	__property AnsiString UserCacheDir = {read=GetUserCacheDir};
	__property AnsiString UserCacheURL = {read=GetUserCacheURL};
	
__published:
	__property bool AuthBeforeNewSession = {read=FAuthBeforeNewSession, write=FAuthBeforeNewSession, nodefault};
	__property bool AllowSubFolders = {read=FAllowSubFolders, write=FAllowSubFolders, nodefault};
	__property Classes::TStringList* AuthList = {read=FAuthList, write=SetAuthList};
	__property AnsiString AppName = {read=FAppName, write=SetAppname};
	__property AnsiString BoundIP = {read=FBoundIP, write=FBoundIP};
	__property AnsiString CacheDir = {read=GetCacheDir, write=SetCacheDir};
	__property AnsiString CharSet = {read=FCharSet, write=SetCharSet};
	__property int CacheExpiry = {read=FCacheExpiry, write=FCacheExpiry, nodefault};
	__property TComInitialization ComInitialization = {read=FComInitialization, write=FComInitialization, nodefault};
	__property TIWCompression* Compression = {read=FCompression, write=FCompression};
	__property AnsiString Description = {read=FDescription, write=FDescription};
	__property Iwfilereference::TIWFileReference* DeviceNotSupported = {read=FDeviceNotSupported, write=FDeviceNotSupported};
	__property bool DebugHTML = {read=FDebugHTML, write=FDebugHTML, nodefault};
	__property TLogOptions Log = {read=FLog, write=FLog, nodefault};
	__property bool EnableImageToolbar = {read=FEnableImageToolbar, write=FEnableImageToolbar, nodefault};
	__property Iwtypes::TIWShowMessageType ExceptionDisplayMode = {read=FExceptionDisplayMode, write=FExceptionDisplayMode, nodefault};
	__property AnsiString ExecCmd = {read=FExecCmd, write=FExecCmd};
	__property AnsiString FilesDir = {read=FFilesDir, write=SetFilesDir};
	__property bool HistoryEnabled = {read=FHistoryEnabled, write=FHistoryEnabled, nodefault};
	__property AnsiString InternalFilesDir = {read=FInternalFilesDir, write=SetInternalFilesDir};
	__property AnsiString InternalFilesURL = {read=GetInternalFilesURL, write=SetInternalFilesURL};
	__property AnsiString InvalidCommandURL = {read=FInvalidCommandURL, write=FInvalidCommandURL};
	__property Classes::TStringList* HTMLHeaders = {read=FHTMLHeaders, write=SetHTMLHeaders};
	__property TIWBrowser32Behaviour* Browser32Behaviour = {read=FBrowser32Behaviour, write=FBrowser32Behaviour};
	__property AnsiString MasterTemplate = {read=FMasterTemplate, write=FMasterTemplate};
	__property AnsiString MasterTemplate32 = {read=FMasterTemplate32, write=FMasterTemplate32};
	__property Iwfilereference::TIWFileReference* NoJavaScriptSupport = {read=FNoJavaScriptSupport, write=FNoJavaScriptSupport};
	__property Iwfilereference::TIWFileReference* NoCookieSupport = {read=FNoCookieSupport, write=FNoCookieSupport};
	__property bool PageTransitions = {read=FPageTransitions, write=FPageTransitions, nodefault};
	__property int Port = {read=FPort, write=FPort, nodefault};
	__property TIWReEntryOptions* ReEntryOptions = {read=FReEntryOptions, write=FReEntryOptions};
	__property bool RestrictIPs = {read=FRestrictIPs, write=FRestrictIPs, nodefault};
	__property bool RestrictSubnet = {read=FRestrictSubnet, write=FRestrictSubnet, nodefault};
	__property int RedirectMsgDelay = {read=FRedirectMsgDelay, write=FRedirectMsgDelay, nodefault};
	__property int ServerResizeTimeout = {read=FServerResizeTimeout, write=FServerResizeTimeout, nodefault};
	__property TIWSessionTrackingMethod SessionTrackingMethod = {read=FSessionTrackingMethod, write=FSessionTrackingMethod, nodefault};
	__property bool ShowResyncWarning = {read=FShowResyncWarning, write=FShowResyncWarning, nodefault};
	__property int SessionTimeout = {read=FSessionTimeout, write=SetSessionTimeout, nodefault};
	__property AnsiString StartCmd = {read=FStartCmd, write=FStartCmd};
	__property Iwfilereference::TIWFileReference* StyleSheet = {read=FStyleSheet, write=FStyleSheet};
	__property Iwtypes::TIWBrowsers SupportedBrowsers = {read=FSupportedBrowsers, write=FSupportedBrowsers, nodefault};
	__property TIWSSLOptions* SSLOptions = {read=FSSLOptions, write=FSSLOptions};
	__property AnsiString TemplateDir = {read=FTemplateDir, write=SetTemplateDir};
	__property int ThreadPoolSize = {read=FThreadPool, write=FThreadPool, nodefault};
	__property Iwfilereference::TIWFileReference* SessionTimeoutURL = {read=FSessionTimeoutURL, write=FSessionTimeoutURL};
	__property Iwfilereference::TIWFileReference* UnknownBrowser = {read=FUnknownBrowser, write=FUnknownBrowser};
	__property Iwtypes::TIWUnknownBrowserAction UnknownBrowserAction = {read=FUnknownBrowserAction, write=FUnknownBrowserAction, nodefault};
	__property AnsiString URLBase = {read=FURLBase, write=FURLBase};
	__property bool UseInternalFiles = {read=FUseInternalFiles, write=SetUseInternalFiles, default=1};
	__property AnsiString Version = {read=GetVersion, write=SetVersion};
	__property TOnDispatch OnAfterDispatch = {read=FOnAfterDispatch, write=FOnAfterDispatch};
	__property TOnDispatch OnBeforeDispatch = {read=FOnBeforeDispatch, write=FOnBeforeDispatch};
	__property TOnAuthRequest OnAuthRequest = {read=FOnAuthReqeust, write=FOnAuthReqeust};
	__property TOnFileAccess OnFileAccess = {read=FOnFileAccess, write=FOnFileAccess};
	__property TOnCloseSessionEvent OnCloseSession = {read=FOnCloseSession, write=FOnCloseSession};
	__property TOnExceptionEvent OnException = {read=FOnException, write=FOnException};
	__property TOnGetSessionID OnGetSessionID = {read=FOnGetSessionID, write=FOnGetSessionID};
	__property TOnInvalidCommandEvent OnInvalidCommand = {read=FOnInvalidCommand, write=FOnInvalidCommand};
	__property TOnNewSessionEvent OnNewSession = {read=FOnNewSession, write=FOnNewSession};
	__property TOnReEntryEvent OnReEntry = {read=FOnReEntry, write=FOnReEntry};
	__property TOnBackButtonEvent OnBackButton = {read=FOnBackButton, write=FOnBackButton};
	__property TOnWAPClientDetectEvent OnWAPClientDetect = {read=FOnWAPClientDetect, write=FOnWAPClientDetect};
	__property TOnBeforeRenderEvent OnBeforeRender = {read=FOnBeforeRender, write=FOnBeforeRender};
	__property TOnAfterRenderEvent OnAfterRender = {read=FOnAfterRender, write=FOnAfterRender};
public:
	#pragma option push -w-inl
	/* TIWVCLDataModule.Destroy */ inline __fastcall virtual ~TIWServerControllerBase(void) { }
	#pragma option pop
	
};


typedef TMetaClass* TIWServerControllerBaseClass;

//-- var, const, procedure ---------------------------------------------------

}	/* namespace Iwservercontrollerbase */
using namespace Iwservercontrollerbase;
#pragma pack(pop)
#pragma option pop

#pragma delphiheader end.
//-- end unit ----------------------------------------------------------------
#endif	// Iwservercontrollerbase
