Class Tgridform (unit main)

Inherits from

TForm

@/// Tgridform = class(TForm)

Constructors



Functions

procedure FormHide(Sender: TObject);

@\\\0000000601*) (*@/// procedure Tgridform.

procedure FormShow(Sender: TObject);

@\\\*) (*@/// procedure Tgridform.

procedure pingPing(sender: TObject; status: Integer; ip,roundtime: Longint);

@/// procedure Tgridform.

procedure TimerCall(Sender: TObject);

@\\\0000000A03*) (*@/// procedure Tgridform.

Properties

Events

Variables

grid : TStringAlignGrid;


ping : TPing;


Timer : TTimer;


ip : byte;


ip_base : longint;


resolve : boolean;



Constructors


Functions


procedure FormHide(Sender: TObject);

@\\\0000000601*) (*@/// procedure Tgridform.FormHide(Sender: TObject);


procedure FormShow(Sender: TObject);

@\\\*) (*@/// procedure Tgridform.FormShow(Sender: TObject);


procedure pingPing(sender: TObject; status: Integer; ip,roundtime: Longint);

@/// procedure Tgridform.pingPing(sender: TObject; status: Integer; ip,roundtime: Longint);


procedure TimerCall(Sender: TObject);

@\\\0000000A03*) (*@/// procedure Tgridform.TimerCall(Sender: TObject);


Properties


Events


Variables


grid : TStringAlignGrid;


ping : TPing;


Timer : TTimer;


ip : byte;


ip_base : longint;


resolve : boolean;