Class TMainForm (unit MainF)

Inherits from

TForm

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;



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;