aboutsummaryrefslogtreecommitdiffstats
path: root/Game/Code/Classes/UCovers.pas
diff options
context:
space:
mode:
Diffstat (limited to 'Game/Code/Classes/UCovers.pas')
-rw-r--r--Game/Code/Classes/UCovers.pas10
1 files changed, 5 insertions, 5 deletions
diff --git a/Game/Code/Classes/UCovers.pas b/Game/Code/Classes/UCovers.pas
index b7bef8e6..c74bbaf4 100644
--- a/Game/Code/Classes/UCovers.pas
+++ b/Game/Code/Classes/UCovers.pas
@@ -48,7 +48,6 @@ end;
procedure TCovers.Load;
var
F: File;
- C: integer; // cover number
W: word;
H: word;
Bits: byte;
@@ -102,13 +101,14 @@ begin
end;
procedure TCovers.Save;
+{
var
F: File;
C: integer; // cover number
W: word;
H: word;
NLen: word;
- Bits: byte;
+ Bits: byte; }
begin
{ AssignFile(F, GamePath + 'covers.cache');
Rewrite(F, 1);
@@ -133,9 +133,9 @@ end;
procedure TCovers.AddCover(Name: string);
var
- B: integer;
+ //B: integer;
F: File;
- C: integer; // cover number
+ //C: integer; // cover number
NLen: word;
Bits: byte;
begin
@@ -223,4 +223,4 @@ begin
end;
end;
-end.
+end. \ No newline at end of file