diff options
Diffstat (limited to 'Game/Code/Classes/UDataBase.pas')
| -rw-r--r-- | Game/Code/Classes/UDataBase.pas | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/Game/Code/Classes/UDataBase.pas b/Game/Code/Classes/UDataBase.pas index 3954f92e..f7f39634 100644 --- a/Game/Code/Classes/UDataBase.pas +++ b/Game/Code/Classes/UDataBase.pas @@ -46,7 +46,7 @@ type property Filename: String read sFilename; - Destructor Free; + Destructor Destroy; override; Procedure Init(const Filename: string); procedure ReadScore(Song: TSong); @@ -114,9 +114,9 @@ begin end; //-------------------- -//Free - Frees Database +//Destroy - Frees Database //-------------------- -Destructor TDataBaseSystem.Free; +Destructor TDataBaseSystem.Destroy; begin debugWriteln( 'TDataBaseSystem.Free' ); |