Some display cleanup

This commit is contained in:
mysticbbs 2012-11-18 08:51:32 -05:00
parent 070e8b862b
commit fec621d090
2 changed files with 3 additions and 3 deletions

View File

@ -79,7 +79,7 @@ Begin
Console.CursorXY (3, 22);
Console.TextAttr := 15;
Console.WriteLine('> Execution complete');
Console.WriteLine('> Execution of ' + strI2S(ProcessTotal) + ' processes complete');
Console.TextAttr := 7;
End;
@ -99,7 +99,7 @@ Begin
If Console.Active Then DrawStatusScreen;
Console.SetWindow(5, 14, 76, 21, True);
Console.SetWindow(5, 14, 76, 20, True);
If FileExist(ParamStr(1)) Then
FN := ParamStr(1)

View File

@ -69,7 +69,7 @@ Begin
End;
If Done Then Begin
Console.WriteLine('');
If ProcessPos < ProcessTotal Then Console.WriteLine('');
BarOne.Update (100, 100);
BarAll.Update (ProcessPos, ProcessTotal);