Fixed compiler warning
This commit is contained in:
parent
578454748a
commit
5b9b7a05e9
|
@ -249,7 +249,7 @@ Var
|
||||||
Line : Integer;
|
Line : Integer;
|
||||||
Per : LongInt;
|
Per : LongInt;
|
||||||
Per10 : Byte;
|
Per10 : Byte;
|
||||||
BarPos : Byte;
|
BarPos : Byte = 0;
|
||||||
Begin
|
Begin
|
||||||
Assign (T, FN);
|
Assign (T, FN);
|
||||||
{$I-} Reset(T); {$I+}
|
{$I-} Reset(T); {$I+}
|
||||||
|
@ -404,7 +404,6 @@ Var
|
||||||
MBase : RecMessageBase;
|
MBase : RecMessageBase;
|
||||||
FBase : RecFileBase;
|
FBase : RecFileBase;
|
||||||
TLang : RecTheme;
|
TLang : RecTheme;
|
||||||
TF : Text;
|
|
||||||
Begin
|
Begin
|
||||||
Screen.WriteXYPipe (23, 19, 7, 45, '|08[|15û|08] |07Updating data files|08...');
|
Screen.WriteXYPipe (23, 19, 7, 45, '|08[|15û|08] |07Updating data files|08...');
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue