Class TConnectForm (unit PilifConnect)

Inherits from

TForm

Renamed from Connect.pas 6/14/1998 Paul Rice to avoid conflict with others' work.

Constructors



Functions

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

Timer.

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


procedure FormHide(Sender: TObject);


procedure FormShow(Sender: TObject);

ShowMessage(MainForm.

procedure ListBoxClick(Sender: TObject);


procedure TimerTimer(Sender: TObject);


procedure DisAndClose;


Properties

Events

Variables

Icon : TImage;


ListBox : TListBox;


Seitenpanel : TPanel;


Timer : TTimer;


Hang : Boolean;


HangUpNow : Boolean;

Private-Deklarationen


Constructors


Functions


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

Timer.Enabled:=False;


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


procedure FormHide(Sender: TObject);


procedure FormShow(Sender: TObject);

ShowMessage(MainForm.Connection);


procedure ListBoxClick(Sender: TObject);


procedure TimerTimer(Sender: TObject);


procedure DisAndClose;


Properties


Events


Variables


Icon : TImage;


ListBox : TListBox;


Seitenpanel : TPanel;


Timer : TTimer;


Hang : Boolean;


HangUpNow : Boolean;

Private-Deklarationen