diff --git a/mdl/m_output_windows.pas b/mdl/m_output_windows.pas index 55c355b..6cc8b6f 100644 --- a/mdl/m_output_windows.pas +++ b/mdl/m_output_windows.pas @@ -186,8 +186,10 @@ Begin 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); + FillConsoleOutputAttribute (ConOut, TextAttr, Count, Cursor, @Res); + End; End; Procedure TOutputWindows.ClearScreenNoUpdate;