| Class TfrmMain (unit CreateU) |
TForm
| Constructors |
| Functions |
procedure btnCreateClick(Sender: TObject);
procedure btnExitClick(Sender: TObject);
procedure CreateFFile;
procedure CreateIDGenFile;
procedure CreateKeyFile;
procedure CreateVFile;| Properties |
| Events |
| Variables |
btnCreate : TButton;
btnExit : TButton;
edtFFN : TEdit;
edtFRL : TEdit;
edtGFN : TEdit;
edtKFN : TEdit;
edtKL : TEdit;
edtVBS : TEdit;
edtVFN : TEdit;
lab0FN : TLabel;
lab0RL : TLabel;
lab1FN : TLabel;
lab2FN : TLabel;
lab4FN : TLabel;
lab4KL : TLabel;
labBlockSize : TLabel;
labTop : TLabel;
pgcMain : TPageControl;
rgpKey : TRadioGroup;
tbsFFile : TTabSheet;
tbsIDGen : TTabSheet;
tbsPKey : TTabSheet;
tbsVFile : TTabSheet;| Constructors |
| Functions |
procedure btnCreateClick(Sender: TObject);When splitting a sector
procedure btnExitClick(Sender: TObject);find the page number
procedure CreateFFile;Private declarations
procedure CreateIDGenFile;
procedure CreateKeyFile;
procedure CreateVFile;| Properties |
| Events |
| Variables |
btnCreate : TButton;
btnExit : TButton;
edtFFN : TEdit;
edtFRL : TEdit;
edtGFN : TEdit;
edtKFN : TEdit;
edtKL : TEdit;
edtVBS : TEdit;
edtVFN : TEdit;
lab0FN : TLabel;
lab0RL : TLabel;
lab1FN : TLabel;
lab2FN : TLabel;
lab4FN : TLabel;
lab4KL : TLabel;
labBlockSize : TLabel;
labTop : TLabel;
pgcMain : TPageControl;
rgpKey : TRadioGroup;
tbsFFile : TTabSheet;
tbsIDGen : TTabSheet;
tbsPKey : TTabSheet;
tbsVFile : TTabSheet;