| Class TClientForm (unit client1) |
TForm
| Constructors |
| Functions |
procedure CliSocketDataAvailable(Sender: TObject; Error: Word);
procedure ConnectButtonClick(Sender: TObject);
procedure DisconnectButtonClick(Sender: TObject);
procedure SendButtonClick(Sender: TObject);
procedure ProcessCommand(Cmd : PChar);| Properties |
| Events |
| Variables |
CliSocket : TWSocket;
ConnectButton : TButton;
DisconnectButton : TButton;
DisplayMemo : TMemo;
LineLabel : TLabel;
PortEdit : TEdit;
SendButton : TButton;
SendEdit : TEdit;
ServerEdit : TEdit;
Buffer : array [0..1023] of char;
Count : Integer;| Constructors |
| Functions |
procedure CliSocketDataAvailable(Sender: TObject; Error: Word);
procedure ConnectButtonClick(Sender: TObject);
procedure DisconnectButtonClick(Sender: TObject);
procedure SendButtonClick(Sender: TObject);
procedure ProcessCommand(Cmd : PChar);| Properties |
| Events |
| Variables |
CliSocket : TWSocket;
ConnectButton : TButton;
DisconnectButton : TButton;
DisplayMemo : TMemo;
LineLabel : TLabel;
PortEdit : TEdit;
SendButton : TButton;
SendEdit : TEdit;
ServerEdit : TEdit;
Buffer : array [0..1023] of char;Déclarations privées
Count : Integer;