| Class TForm1 (unit RndUnit) |
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;