QB64/qb64
QB64/qb64
1
1
Fork 0
mirror of https://github.com/QB64Official/qb64.git synced 2024-07-02 23:31:21 +00:00
Code Releases Wiki Activity

Fixes Up One Level button in Change UDT dialog.

Browse source
This commit is contained in:
FellippeHeitor 2021-08-30 01:30:47 -03:00
parent d62e307126
commit 7c1f83f4f1
1 changed files with 9 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
source/ide/ide_methods.bas
View file

@ -8866,6 +8866,7 @@ FUNCTION ideelementwatchbox$(currentPath$, elementIndexes$, level, singleElement
IF K$ = CHR$(27) OR (focus = 4 AND info <> 0) THEN
IF singleElementSelection THEN
ok = -4
EXIT FUNCTION
ELSE
'build element list to return
@ -8974,6 +8975,14 @@ FUNCTION ideelementwatchbox$(currentPath$, elementIndexes$, level, singleElement
ELSEIF ok2 = -3 THEN
'single selection canceled
EXIT FUNCTION
ELSEIF ok2 = -4 THEN
i = y
varDlgList(i).selected = 0
ASC(idetxt(o(varListBox).txt), varDlgList(i).colorFlag) = 16
ASC(idetxt(o(varListBox).txt), varDlgList(i).colorFlag2) = 2
ASC(idetxt(o(varListBox).txt), varDlgList(i).bgColorFlag) = 17
ASC(idetxt(o(varListBox).txt), varDlgList(i).indicator) = 32 'space
_CONTINUE
END IF
END IF