Destroy
ReceiveBuffer
procedure Send(AData: string); overload;
procedure Send(AHost: string; const APort: Integer; AData: string); overload;
procedure Send(AHost: string; const APort: integer; var ABuffer; const ABufferSize: integer); overload;
Create
DoWork
EndWork