Class TClientForm (unit cli5)

Inherits from

TForm

Constructors



Functions

procedure CliSocketDataAvailable(Sender: TObject; Error: Word);

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *

procedure CliSocketSessionClosed(Sender: TObject; Error: Word);

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *} {* This event handler gets called when the server's connection is broken *} {* Either by us or by the server.

procedure CliSocketSessionConnected(Sender: TObject; Error: Word);

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *} {* This event handler gets called when we connected the server

procedure ConnectButtonClick(Sender: TObject);

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *} {* The user has clicked on the connect button.

procedure DisconnectButtonClick(Sender: TObject);

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *} {* The user has clicked the disconnect button.

procedure FormCloseQuery(Sender: TObject; var CanClose: Boolean);

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *

procedure IPButtonClick(Sender: TObject);

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *

procedure ReadLineButtonClick(Sender: TObject);

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *

Properties

Events

Variables

CliSocket : TWSocket;


ConnectButton : TButton;


DataLabel : TLabel;


DisconnectButton : TButton;


InfoLabel : TLabel;


IPButton : TButton;


ReadLineButton : TButton;


Wait1 : TWait;



Constructors


Functions


procedure CliSocketDataAvailable(Sender: TObject; Error: Word);

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *


procedure CliSocketSessionClosed(Sender: TObject; Error: Word);

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *} {* This event handler gets called when the server's connection is broken *} {* Either by us or by the server.


procedure CliSocketSessionConnected(Sender: TObject; Error: Word);

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *} {* This event handler gets called when we connected the server


procedure ConnectButtonClick(Sender: TObject);

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *} {* The user has clicked on the connect button...


procedure DisconnectButtonClick(Sender: TObject);

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *} {* The user has clicked the disconnect button...


procedure FormCloseQuery(Sender: TObject; var CanClose: Boolean);

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *


procedure IPButtonClick(Sender: TObject);

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *


procedure ReadLineButtonClick(Sender: TObject);

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *


Properties


Events


Variables


CliSocket : TWSocket;


ConnectButton : TButton;


DataLabel : TLabel;


DisconnectButton : TButton;


InfoLabel : TLabel;


IPButton : TButton;


ReadLineButton : TButton;


Wait1 : TWait;