Class TForm1 (unit mnuke1)

Inherits from

TForm

------------------------------------------------------------------------------ (C)opyright 1998 Meliksah Ozoral ------------------------------------------------------------------------------ e-mail : mozoral@mimsa.com http://www.mimsa.com/mweb ------------------------------------------------------------------------------

Constructors



Functions

procedure BtnAbortClick(Sender: TObject);


procedure BtnNukeClick(Sender: TObject);


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

------------------------------------------------------------------------------

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


procedure FormCreate(Sender: TObject);


procedure VsocketDataNeeded(Sender: TObject; Socket: Integer);


procedure VsocketErrorOccurred(Sender: TObject; Socket, Error: Integer; Msg: string);


procedure VsocketSessionClosed(Sender: TObject; Socket: Integer);


Properties

Events

Variables

BtnAbort : TButton;


BtnNuke : TButton;


CheckBoxEOL : TCheckBox;


EditIP : TEdit;


EditMsg : TEdit;


EditPort : TEdit;


EditTimes : TEdit;


Label1 : TLabel;


Label2 : TLabel;


Label3 : TLabel;


LabelEffect1 : TLabelEffect;


LabelEOL : TLabel;


LabelHost : TLabel;


LabelMsg : TLabel;


LabelPort : TLabel;


LabelTimes : TLabel;


StatusBar : TStatusBar;


Vsocket : TSockets;


NukeMsg : String;


OOBchar : array[0..27] of Integer;


Times : Integer;



Constructors


Functions


procedure BtnAbortClick(Sender: TObject);


procedure BtnNukeClick(Sender: TObject);


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

------------------------------------------------------------------------------


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


procedure FormCreate(Sender: TObject);


procedure VsocketDataNeeded(Sender: TObject; Socket: Integer);


procedure VsocketErrorOccurred(Sender: TObject; Socket, Error: Integer; Msg: string);


procedure VsocketSessionClosed(Sender: TObject; Socket: Integer);


Properties


Events


Variables


BtnAbort : TButton;


BtnNuke : TButton;


CheckBoxEOL : TCheckBox;


EditIP : TEdit;


EditMsg : TEdit;


EditPort : TEdit;


EditTimes : TEdit;


Label1 : TLabel;


Label2 : TLabel;


Label3 : TLabel;


LabelEffect1 : TLabelEffect;


LabelEOL : TLabel;


LabelHost : TLabel;


LabelMsg : TLabel;


LabelPort : TLabel;


LabelTimes : TLabel;


StatusBar : TStatusBar;


Vsocket : TSockets;


NukeMsg : String;


OOBchar : array[0..27] of Integer;


Times : Integer;