pascals
Jul 11th, 2000, 09:32 AM
Hi all,
let's conside the following code :
<QUOTE>
'------------------
option explicit
Type COORD
x As Integer
y As Integer
End Type
Declare Function SetConsoleScreenBufferSize Lib "kernel32" _
(ByVal hConsoleOutput As Long, dwSize As COORD) As Boolean
Declare Function GetLastError Lib "kernel32" () As Long
'----------------------
Public hConsole As Long
...
Dim Result As Long
Dim NewCoord As COORD
...
NewCoord.x = 100
NewCoord.y = 350
bResult = SetConsoleScreenBufferSize(hConsole, NewCoord)
er = GetLastError()
<UNQUOTE>
the return in bResult is false and er = 87
which means "invalid parameter"
do you have any idea about this or another way I could change the buffer size of my console ?
PS : if I use getconsolescreenbufferinfo, it is working well, except the fact that it is not the x and y I set.
thanks
P@scal
let's conside the following code :
<QUOTE>
'------------------
option explicit
Type COORD
x As Integer
y As Integer
End Type
Declare Function SetConsoleScreenBufferSize Lib "kernel32" _
(ByVal hConsoleOutput As Long, dwSize As COORD) As Boolean
Declare Function GetLastError Lib "kernel32" () As Long
'----------------------
Public hConsole As Long
...
Dim Result As Long
Dim NewCoord As COORD
...
NewCoord.x = 100
NewCoord.y = 350
bResult = SetConsoleScreenBufferSize(hConsole, NewCoord)
er = GetLastError()
<UNQUOTE>
the return in bResult is false and er = 87
which means "invalid parameter"
do you have any idea about this or another way I could change the buffer size of my console ?
PS : if I use getconsolescreenbufferinfo, it is working well, except the fact that it is not the x and y I set.
thanks
P@scal