Class TForm1 (unit RndUnit)
Inherits from
TForm
Constructors
Functions
procedure btnExitClick(Sender: TObject);
procedure btnStartClick(Sender: TObject);
function RndString(Len: Integer):String;
Properties
Events
Variables
btnExit : TButton;
btnStart : TButton;
edtNumberOfItems : TEdit;
lblNumberOf : TLabel;
SaveDialog1 : TSaveDialog;
Constructors
Functions
procedure btnExitClick(Sender: TObject);
procedure btnStartClick(Sender: TObject);
function RndString(Len: Integer):String;
Properties
Events
Variables
btnExit : TButton;
btnStart : TButton;
edtNumberOfItems : TEdit;
lblNumberOf : TLabel;
SaveDialog1 : TSaveDialog;