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

A31

This commit is contained in:
mysticbbs 2013-04-13 00:54:17 -04:00
parent aa819efea2
commit ac6c2cc3df
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
mdl/m_output_windows.pas
View File

@ -186,8 +186,10 @@ Begin
Move(Buf[1], Buffer[Cursor.Y + 1][Cursor.X + 1], SizeOf(TCharInfo) * Count); Move(Buf[1], Buffer[Cursor.Y + 1][Cursor.X + 1], SizeOf(TCharInfo) * Count);
If Active Then If Active Then Begin
FillConsoleOutputCharacter (ConOut, ' ', Count, Cursor, @Res); FillConsoleOutputCharacter (ConOut, ' ', Count, Cursor, @Res);
FillConsoleOutputAttribute (ConOut, TextAttr, Count, Cursor, @Res);
End;
End; End;
Procedure TOutputWindows.ClearScreenNoUpdate; Procedure TOutputWindows.ClearScreenNoUpdate;