ClearEOL fix (wasnt adding to virtual console buffer)
This commit is contained in:
parent
2c50702340
commit
6db8459222
|
@ -310,7 +310,7 @@ Var
|
||||||
Begin
|
Begin
|
||||||
BufAddStr(#27 + '[K');
|
BufAddStr(#27 + '[K');
|
||||||
|
|
||||||
Fill.Attributes := 7;
|
Fill.Attributes := FTextAttr;
|
||||||
Fill.UnicodeChar := ' ';
|
Fill.UnicodeChar := ' ';
|
||||||
|
|
||||||
FillWord (Buffer[CursorY][CursorX], (80 - CursorX) * 2, Word(Fill));
|
FillWord (Buffer[CursorY][CursorX], (80 - CursorX) * 2, Word(Fill));
|
||||||
|
|
|
@ -312,7 +312,7 @@ Var
|
||||||
Begin
|
Begin
|
||||||
BufAddStr(#27 + '[K');
|
BufAddStr(#27 + '[K');
|
||||||
|
|
||||||
Fill.Attributes := 7;
|
Fill.Attributes := FTextAttr;
|
||||||
Fill.UnicodeChar := ' ';
|
Fill.UnicodeChar := ' ';
|
||||||
|
|
||||||
FillWord (Buffer[CursorY][CursorX], (80 - CursorX) * 2, Word(Fill));
|
FillWord (Buffer[CursorY][CursorX], (80 - CursorX) * 2, Word(Fill));
|
||||||
|
|
Loading…
Reference in New Issue