eric
/
mysticbbs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
mystic/mutil.pas
View File

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

2
mystic/mutil_status.pas
View File

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