Class TForm1 (unit CUnit1)

Inherits from

TForm

Constructors



Functions

procedure Connect1Click(Sender: TObject);


procedure Edit1KeyPress(Sender: TObject; var Key: Char);


procedure FormCreate(Sender: TObject);


procedure FormDestroy(Sender: TObject);


procedure OnIdle(Sender: TObject; var Done: Boolean);


procedure PortNumber1Click(Sender: TObject);


procedure ServerAddress1Click(Sender: TObject);


Properties

Events

Variables

Connect1 : TMenuItem;


Connection1 : TMenuItem;


Edit1 : TEdit;


Exit1 : TMenuItem;


File1 : TMenuItem;


MainMenu1 : TMainMenu;


m_ClientSocket : TClientSocket;


m_strBuff : Array[0..2047] of Char;

Public declarations

PortNumber1 : TMenuItem;


RichEdit1 : TRichEdit;


ServerAddress1 : TMenuItem;


StatusBar1 : TStatusBar;



Constructors


Functions


procedure Connect1Click(Sender: TObject);


procedure Edit1KeyPress(Sender: TObject; var Key: Char);


procedure FormCreate(Sender: TObject);


procedure FormDestroy(Sender: TObject);


procedure OnIdle(Sender: TObject; var Done: Boolean);


procedure PortNumber1Click(Sender: TObject);


procedure ServerAddress1Click(Sender: TObject);


Properties


Events


Variables


Connect1 : TMenuItem;


Connection1 : TMenuItem;


Edit1 : TEdit;


Exit1 : TMenuItem;


File1 : TMenuItem;


MainMenu1 : TMainMenu;


m_ClientSocket : TClientSocket;


m_strBuff : Array[0..2047] of Char;

Public declarations


PortNumber1 : TMenuItem;


RichEdit1 : TRichEdit;


ServerAddress1 : TMenuItem;


StatusBar1 : TStatusBar;