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

Ignores _WINDOWHASFOCUS for the IDE in Linux

Browse source
This commit is contained in:
FellippeHeitor 2020-01-03 02:43:10 -03:00
parent 8708aa73b0
commit 884944ea18
1 changed files with 15 additions and 13 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

28
source/ide/ide_methods.bas
View file

@ -1307,14 +1307,16 @@ FUNCTION ide2 (ignore)
END IF END IF
END IF END IF
IF _WINDOWHASFOCUS THEN IF os$ = "WIN" OR MacOSX = 1 THEN
LOCATE , , 1 IF _WINDOWHASFOCUS THEN
_PALETTECOLOR 5, IDEBracketHighlightColor, 0 LOCATE , , 1
_PALETTECOLOR 6, IDEBackgroundColor2, 0 _PALETTECOLOR 5, IDEBracketHighlightColor, 0
ELSE _PALETTECOLOR 6, IDEBackgroundColor2, 0
LOCATE , , 0 ELSE
_PALETTECOLOR 5, IDEBackgroundColor, 0 LOCATE , , 0
_PALETTECOLOR 6, IDEBackgroundColor, 0 _PALETTECOLOR 5, IDEBackgroundColor, 0
_PALETTECOLOR 6, IDEBackgroundColor, 0
END IF
END IF END IF
IF KALT THEN 'alt held IF KALT THEN 'alt held
@ -1339,7 +1341,7 @@ FUNCTION ide2 (ignore)
idealthighlight = 0 idealthighlight = 0
LOCATE , , 0: COLOR 0, 7: LOCATE 1, 1: PRINT menubar$; LOCATE , , 0: COLOR 0, 7: LOCATE 1, 1: PRINT menubar$;
IF ideentermenu = 1 AND KCONTROL = 0 THEN 'alt was pressed then released IF ideentermenu = 1 AND KCONTROL = 0 THEN 'alt was pressed then released
IF _WINDOWHASFOCUS THEN IF _WINDOWHASFOCUS OR os$ = "LNX" THEN
LOCATE , , , IDENormalCursorStart, IDENormalCursorEnd LOCATE , , , IDENormalCursorStart, IDENormalCursorEnd
skipdisplay = 0 skipdisplay = 0
ideentermenu = 0 ideentermenu = 0
@ -4032,7 +4034,7 @@ FUNCTION ide2 (ignore)
DO DO
_LIMIT 1000 _LIMIT 1000
GetInput GetInput
IF _WINDOWHASFOCUS = 0 THEN IF _WINDOWHASFOCUS = 0 AND (os$ = "WIN" OR MacOSX = 1) THEN
LOCATE 1, 1: COLOR 0, 7: PRINT menubar$; LOCATE 1, 1: COLOR 0, 7: PRINT menubar$;
SCREEN , , 3, 0: PCOPY 3, 0 SCREEN , , 3, 0: PCOPY 3, 0
GOTO ideloop GOTO ideloop
@ -4045,7 +4047,7 @@ FUNCTION ide2 (ignore)
KB = KEY_ESC KB = KEY_ESC
END IF END IF
IF _WINDOWHASFOCUS = 0 THEN IF _WINDOWHASFOCUS = 0 AND (os$ = "WIN" OR MacOSX = 1) THEN
LOCATE 1, 1: COLOR 0, 7: PRINT menubar$; LOCATE 1, 1: COLOR 0, 7: PRINT menubar$;
SCREEN , , 3, 0: PCOPY 3, 0 SCREEN , , 3, 0: PCOPY 3, 0
GOTO ideloop GOTO ideloop
@ -4253,7 +4255,7 @@ FUNCTION ide2 (ignore)
DO DO
_LIMIT 1000 _LIMIT 1000
GetInput GetInput
IF _WINDOWHASFOCUS = 0 THEN IF _WINDOWHASFOCUS = 0 AND (os$ = "WIN" OR MacOSX = 1) THEN
LOCATE 1, 1: COLOR 0, 7: PRINT menubar$; LOCATE 1, 1: COLOR 0, 7: PRINT menubar$;
PCOPY 3, 0: SCREEN , , 3, 0 PCOPY 3, 0: SCREEN , , 3, 0
GOTO ideloop GOTO ideloop
@ -4267,7 +4269,7 @@ FUNCTION ide2 (ignore)
GOTO startmenu2 GOTO startmenu2
END IF END IF
IF _EXIT THEN ideexit = 1: GOTO ideloop IF _EXIT THEN ideexit = 1: GOTO ideloop
IF _WINDOWHASFOCUS = 0 THEN IF _WINDOWHASFOCUS = 0 AND (os$ = "WIN" OR MacOSX = 1) THEN
LOCATE 1, 1: COLOR 0, 7: PRINT menubar$; LOCATE 1, 1: COLOR 0, 7: PRINT menubar$;
PCOPY 3, 0: SCREEN , , 3, 0 PCOPY 3, 0: SCREEN , , 3, 0
GOTO ideloop GOTO ideloop