Class Tfrm_trace (unit u_trace)

Inherits from

TForm

@/// Tfrm_trace = class(TForm)

Constructors



Functions

procedure btn_breakClick(Sender: TObject);

@\\\0000000703*) (*@/// procedure Tfrm_trace.

procedure btn_startClick(Sender: TObject);

@/// procedure Tfrm_trace.

procedure FormCreate(Sender: TObject);

@\\\0032000801000801000516000516*) (*@/// procedure Tfrm_trace.

procedure TraceRouteRoute(sender:TObject; hop:Byte; ip,roundtime:Longint);

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

Properties

Events

Variables

btn_break : TButton;


btn_start : TButton;


edt_hostname : TEdit;


grid : TStringGrid;


lbl_hostname : TLabel;


TraceRoute : TTraceRoute;



Constructors


Functions


procedure btn_breakClick(Sender: TObject);

@\\\0000000703*) (*@/// procedure Tfrm_trace.btn_breakClick(Sender: TObject);


procedure btn_startClick(Sender: TObject);

@/// procedure Tfrm_trace.btn_startClick(Sender: TObject);


procedure FormCreate(Sender: TObject);

@\\\0032000801000801000516000516*) (*@/// procedure Tfrm_trace.FormCreate(Sender: TObject);


procedure TraceRouteRoute(sender:TObject; hop:Byte; ip,roundtime:Longint);

@\\\*) (*@/// procedure Tfrm_trace.TraceRouteRoute(sender: TObject; hop: Byte; ip,roundtime:Longint);


Properties


Events


Variables


btn_break : TButton;


btn_start : TButton;


edt_hostname : TEdit;


grid : TStringGrid;


lbl_hostname : TLabel;


TraceRoute : TTraceRoute;