Class TForm1 (unit ProgTop)

Inherits from

TForm

Constructors



Functions

procedure cmCloseClick(Sender: TObject);

Stop progress

procedure cmCreateClick(Sender: TObject);


procedure cmProcessClick(Sender: TObject);

Stop progress

procedure cmProgressClick(Sender: TObject);

Stop progress

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


procedure FormCreate(Sender: TObject);


Properties

Events

Variables

cmClose : TButton;


cmCreate : TButton;


cmProcess : TButton;


cmProgress : TButton;


FileName : TLabel;


Label1 : TLabel;


Label2 : TLabel;


OpenDialog : TOpenDialog;


SpinEdit : TSpinEdit;


LineCount : Longint;



Constructors


Functions


procedure cmCloseClick(Sender: TObject);

Stop progress


procedure cmCreateClick(Sender: TObject);


procedure cmProcessClick(Sender: TObject);

Stop progress


procedure cmProgressClick(Sender: TObject);

Stop progress


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


procedure FormCreate(Sender: TObject);


Properties


Events


Variables


cmClose : TButton;


cmCreate : TButton;


cmProcess : TButton;


cmProgress : TButton;


FileName : TLabel;


Label1 : TLabel;


Label2 : TLabel;


OpenDialog : TOpenDialog;


SpinEdit : TSpinEdit;


LineCount : Longint;