Return to Unit Winsock2
Description
To be documented
Class definitions
[Expand]
TWinsock2TCPListener = class(TWinsock2TCPSocket)
public
|
constructor Create;
|
|
destructor Destroy; override;
|
|
private
|
FActive:Boolean;
|
|
FThreads:TWinsock2TCPServerThreads;
|
|
FListenerThread:TWinsock2TCPListenerThread;
|
|
|
|
FOnExecute:TTCPExecuteEvent;
|
|
FOnConnect:TTCPConnectEvent;
|
|
FOnDisconnect:TTCPDisconnectEvent;
|
|
FOnCreateThread:TTCPCreateThreadEvent;
|
|
|
|
procedure SetActive(AActive:Boolean);
|
|
protected
|
procedure SetLastError(ALastError:LongInt); virtual;
|
|
|
|
procedure DoConnect(AThread:TWinsock2TCPServerThread); virtual;
|
|
procedure DoDisconnect(AThread:TWinsock2TCPServerThread); virtual;
|
|
|
|
function DoExecute(AThread:TWinsock2TCPServerThread):Boolean; virtual;
|
|
public
|
property Active:Boolean read FActive write SetActive;
|
|
property Threads:TWinsock2TCPServerThreads read FThreads;
|
|
|
|
property OnExecute:TTCPExecuteEvent read FOnExecute write FOnExecute;
|
|
property OnConnect:TTCPConnectEvent read FOnConnect write FOnConnect;
|
|
property OnDisconnect:TTCPDisconnectEvent read FOnDisconnect write FOnDisconnect;
|
|
property OnCreateThread:TTCPCreateThreadEvent read FOnCreateThread write FOnCreateThread;
|
|
Function declarations
[Expand]
constructor TWinsock2TCPListener.Create;
Description: To be documented
[Expand]
destructor TWinsock2TCPListener.Destroy;
Description: To be documented
[Expand]
procedure TWinsock2TCPListener.SetActive(AActive:Boolean);
Description: To be documented
[Expand]
procedure TWinsock2TCPListener.SetLastError(ALastError:LongInt);
Description: To be documented
[Expand]
procedure TWinsock2TCPListener.DoConnect(AThread:TWinsock2TCPServerThread);
Description: To be documented
[Expand]
procedure TWinsock2TCPListener.DoDisconnect(AThread:TWinsock2TCPServerThread);
Description: To be documented
[Expand]
function TWinsock2TCPListener.DoExecute(AThread:TWinsock2TCPServerThread):Boolean;
Description: To be documented
Return to Unit Reference
