| Class TMainForm (unit MainF) |
TForm
| Constructors |
| Functions |
procedure CheckButtonClick(Sender: TObject);
procedure FormCreate(Sender: TObject);
procedure FormShow(Sender: TObject);
procedure NameEditExit(Sender: TObject);
procedure NameEditKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
procedure ScoreListNoFile(Sender: TObject);
procedure ShowButtonClick(Sender: TObject);| Properties |
| Events |
| Variables |
CheckButton : TButton;
GreatScoreGroupBox : TGroupBox;
Label1 : TLabel;
Label2 : TLabel;
NameEdit : TEdit;
NumberLabel : TLabel;
ScoreEdit : TEdit;
ScoreList : TScoreList;
ShowButton : TButton;
StringGrid : TStringGrid;| Constructors |
| Functions |
procedure CheckButtonClick(Sender: TObject);It's here for a good reason - if two scores are the same!
procedure FormCreate(Sender: TObject);
procedure FormShow(Sender: TObject);
procedure NameEditExit(Sender: TObject);If new score then update view...
procedure NameEditKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
procedure ScoreListNoFile(Sender: TObject);
procedure ShowButtonClick(Sender: TObject);| Properties |
| Events |
| Variables |
CheckButton : TButton;
GreatScoreGroupBox : TGroupBox;
Label1 : TLabel;
Label2 : TLabel;
NameEdit : TEdit;
NumberLabel : TLabel;
ScoreEdit : TEdit;
ScoreList : TScoreList;
ShowButton : TButton;
StringGrid : TStringGrid;