Class TCliForm (unit Srv2)

Inherits from

TForm

Constructors



Functions

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


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


procedure FormClose(Sender: TObject; var Action: TCloseAction);


procedure FormShow(Sender: TObject);


procedure SendButtonClick(Sender: TObject);


procedure ProcessCommand(Cmd : PChar);


Properties

Events

Variables

CliSocket : TWSocket;


DisplayMemo : TMemo;


LineLabel : TLabel;


SendButton : TButton;


SendEdit : TEdit;


DataTable : TTable;

Déclarations publiques

Buffer : array [0..1023] of char;


Count : Integer;


Initialized : Boolean;

Déclarations privées


Constructors


Functions


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


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


procedure FormClose(Sender: TObject; var Action: TCloseAction);


procedure FormShow(Sender: TObject);


procedure SendButtonClick(Sender: TObject);


procedure ProcessCommand(Cmd : PChar);


Properties


Events


Variables


CliSocket : TWSocket;


DisplayMemo : TMemo;


LineLabel : TLabel;


SendButton : TButton;


SendEdit : TEdit;


DataTable : TTable;

Déclarations publiques


Buffer : array [0..1023] of char;


Count : Integer;


Initialized : Boolean;

Déclarations privées