fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

*** empty log message ***

Browse Source
This commit is contained in:
Paul Tucker
1999-08-11 22:16:41 +00:00
parent c99d8cd719
commit 0e2a4fd754
2 changed files with 6 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
harbour/ChangeLog
View File

@@ -1,3 +1,7 @@
19990811-18:00 EDT Paul Tucker <ptucker@sympatico.ca>
* source/rtl/gt/gtwin.c
* hb_gt_getRow/Col were using the wrong screen handle.
19990811-14:30 EDT Paul Tucker <ptucker@sympatico.ca>
* source/rtl/console.c
* set binary mode on stanard files before intializing gt system.

4
harbour/source/rtl/gt/gtwin.c
View File

@@ -333,7 +333,7 @@ char hb_gt_Col(void)
CONSOLE_SCREEN_BUFFER_INFO csbi;
LOG("WhereX");
GetConsoleScreenBufferInfo(HOutput, &csbi);
GetConsoleScreenBufferInfo(HCursor, &csbi);
return csbi.dwCursorPosition.X;
}
@@ -342,7 +342,7 @@ char hb_gt_Row(void)
CONSOLE_SCREEN_BUFFER_INFO csbi;
LOG("WhereY");
GetConsoleScreenBufferInfo(HOutput, &csbi);
GetConsoleScreenBufferInfo(HCursor, &csbi);
return csbi.dwCursorPosition.Y;
}