paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-17 06:10:31 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fixed background clearing for large screens

Browse Source
This commit is contained in:
florian 2004-11-03 12:36:24 +00:00
parent c95fe8e25b
commit c63d36f974
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
ide/wansi.pas
View File

@ -993,7 +993,7 @@ begin
LockCount:=0; LockCount:=0;
GrowMode:=gfGrowHiX or gfGrowHiY; GrowMode:=gfGrowHiX or gfGrowHiY;
New(Console, Init(@Self)); New(Console, Init(@Self));
Console^.Size.X:=132; Console^.Size.Y:=50; Console^.Size.X:=Bounds.B.X+1; Console^.Size.Y:=Bounds.B.Y+1;
Console^.ClrScr; Console^.ClrScr;
Console^.CursorOn; Console^.CursorOn;
end; end;
@ -1091,7 +1091,10 @@ end;
END. END.
{ {
$Log$ $Log$
Revision 1.4 2002-09-07 15:40:47 peter Revision 1.5 2004-11-03 12:36:24 florian
* fixed background clearing for large screens
Revision 1.4 2002/09/07 15:40:47 peter
* old logs removed and tabs fixed * old logs removed and tabs fixed
Revision 1.3 2002/03/25 11:51:43 pierre Revision 1.3 2002/03/25 11:51:43 pierre