瀏覽代碼

* Patch from benjawin, Mantis 15779 to better deal with scrollbackbuffer<>screensize.

git-svn-id: trunk@14920 -
marco 15 年之前
父節點
當前提交
ab2aa8f88d
共有 1 個文件被更改,包括 8 次插入2 次删除
  1. 8 2
      ide/fpusrscr.pas

+ 8 - 2
ide/fpusrscr.pas

@@ -986,7 +986,7 @@ begin
   GetConsoleScreenBufferInfo(StartScreenBufferHandle,
     @ConsoleScreenBufferInfo);
   BigWin.X:=ConsoleScreenBufferInfo.dwSize.X;
-  BigWin.Y:=200;
+  BigWin.Y:=ConsoleScreenBufferInfo.srwindow.bottom-ConsoleScreenBufferInfo.srwindow.top; // mants 15779 was 200
   { Try to allow to store more info }
   res:=SetConsoleScreenBufferSize(NewScreenBufferHandle,BigWin);
   if not res then
@@ -999,8 +999,14 @@ begin
     @ConsoleScreenBufferInfo);
   { make sure that the IDE Screen Handle has the maximum display size
     this removes the scroll bars if it is maximized }
+
+  BigWin.X:=ConsoleScreenBufferInfo.dwSize.X;
+  BigWin.Y:=ConsoleScreenBufferInfo.srwindow.bottom-ConsoleScreenBufferInfo.srwindow.top;
   res:=SetConsoleScreenBufferSize(NewScreenBufferHandle,
-         ConsoleScreenBufferInfo.dwMaximumWindowSize);
+     BigWin);
+// mants 15779 : was
+//  res:=SetConsoleScreenBufferSize(NewScreenBufferHandle,
+//         ConsoleScreenBufferInfo.dwMaximumWindowSize);
   if not res then
     error:=GetLastError;
   IDEScreenBufferHandle:=NewScreenBufferHandle;