QB64/QB64-PE
QB64/QB64-PE
1
1
Fork 0
mirror of https://github.com/QB64-Phoenix-Edition/QB64pe.git synced 2024-06-26 17:10:38 +00:00
Code Issues Releases Wiki Activity

Fixes vscrollbar not scrolling in Watch Panel.

Browse source
This commit is contained in:
FellippeHeitor 2021-09-09 00:00:02 -03:00
parent e561ab9002
commit 133805181e
1 changed files with 4 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
source/ide/ide_methods.bas
View file

@ -6407,7 +6407,7 @@ SUB DebugMode
debugClient& = 0
debuggeepid = 0
showvWatchPanel vWatchPanel, "", 0, 1
showvWatchPanel vWatchPanel, "", 1
IF LEN(variableWatchList$) = 0 THEN
totalVisibleVariables = 0
vWatchPanel.h = 5
@ -7598,7 +7598,8 @@ SUB DebugMode
IF PauseMode <> 0 AND LEN(variableWatchList$) > 0 THEN
IF WatchListToConsole THEN _CONSOLE ON
showvWatchPanel vWatchPanel, currentSub$, totalVisibleVariables, 0
totalVisibleVariables = CVL(MID$(variableWatchList$, 5, 4))
showvWatchPanel vWatchPanel, currentSub$, 0
END IF
PCOPY 3, 0
@ -7658,7 +7659,7 @@ Function map! (value!, minRange!, maxRange!, newMinRange!, newMaxRange!)
map! = ((value! - minRange!) / (maxRange! - minRange!)) * (newMaxRange! - newMinRange!) + newMinRange!
End Function
SUB showvWatchPanel (this AS vWatchPanelType, currentScope$, __totalVisibleVariables, action as _BYTE)
SUB showvWatchPanel (this AS vWatchPanelType, currentScope$, action as _BYTE)
STATIC previousVariableWatchList$
STATIC longestVarName, totalVisibleVariables
@ -7673,7 +7674,6 @@ SUB showvWatchPanel (this AS vWatchPanelType, currentScope$, __totalVisibleVaria
IF this.h > idewy - 10 THEN this.h = idewy - 10
IF this.h < 5 THEN this.h = 5
END IF
__totalVisibleVariables = totalVisibleVariables 'pass back total visible variables
fg = 0: bg = 7