QB64/qb64
QB64/qb64
1
1
Fork 0
mirror of https://github.com/QB64Official/qb64.git synced 2024-07-07 19:10:25 +00:00
Code Releases Wiki Activity

Fixes sticky ALT key in Windows.

Browse source 
Minor tweak to Dark blue preset theme.
This commit is contained in:
FellippeHeitor 2017-10-03 23:13:08 -03:00
parent 997d2bb734
commit 68a2ec44f9
1 changed files with 7 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
source/ide/ide_methods.bas
View file

@ -1274,6 +1274,10 @@ FUNCTION ide2 (ignore)
END IF
END IF
IF KALT THEN
IF _WINDOWHASFOCUS = 0 THEN KALT = 0
END IF
IF KALT THEN 'alt held
IF idealthighlight = 0 AND KALTPRESS = -1 THEN
@ -8070,8 +8074,7 @@ SUB ideshowtext
a2$ = SPACE$((idewx - 2))
END IF
' ### STEVE EDIT TO MAKE QUOTES AND COMMENTS STAND OUT WITH MINOR COLOR ADJUSTMENTS ###
'Syntax highlighter
inquote = 0
metacommand = 0
comment = 0
@ -8079,7 +8082,7 @@ SUB ideshowtext
multiHighlightLength = 0
prevBG% = _BACKGROUNDCOLOR
FOR m = 1 TO LEN(a2$) 'continue checking, while printing to the screen
FOR m = 1 TO LEN(a2$) 'print to the screen while checking required color changes
IF m > idesx + idewx - 2 THEN EXIT FOR
IF ideselect = 1 AND LEN(ideCurrentSingleLineSelection) > 0 AND multiHighlightLength = 0 AND multihighlight = -1 THEN
'the current selection was found at this spot. Multi-highlight takes place:
@ -14106,7 +14109,7 @@ SUB LoadColorSchemes
PresetColorSchemes = 7
REDIM ColorSchemes$(1 TO PresetColorSchemes)
ColorSchemes$(1) = "QB64 Default|226226226147196235255255085085255085085255255000000170000108177"
ColorSchemes$(2) = "Dark blue|226226226147196235255177000085255085085118186000000069000088128"
ColorSchemes$(2) = "Dark blue|226226226069147216255177000085255085049196196000000069000068108"
ColorSchemes$(3) = "Camouflage|196196196255255255255177000137177147147137020000039029098069020"
ColorSchemes$(4) = "Classic QB4.5|177177177177177177177177177177177177177177177000000170000000170"
ColorSchemes$(5) = "Light green|051051051000000216255157255147177093206206206234255234206255206"