active windows

[MasterGy]

Hi ! What do I need to read to find out if the window is active? Is the program running, but how do I know it is in the background, or you have put it on the taskbar, or you are using that window?

[Petr]

Hi. Try this:

Code: QB64: [Select]

1. DO UNTIL _KEYHIT = 27
2.     LOCATE 1
3.     IF _SCREENICON THEN BEEP 'if is program minimalized
4.     IF _SCREENEXISTS THEN PRINT "Program is created"
5.     SELECT CASE _FULLSCREEN
6.         CASE 0: PRINT "Fullscreen OFF"
7.         CASE 1: PRINT "Fullscreen ON, _STRETCH"
8.         CASE 2: PRINT "Fullscreen ON, _SQUAREPIXELS"
9.     END SELECT
10. LOOP
11.  

[Petr]

I forgot one very important function!

Code: QB64: [Select]

1. DO UNTIL _KEYHIT = 27
2.     LOCATE 1
3.  
4.     IF _SCREENEXISTS THEN PRINT "Program is created"
5.     IF _SCREENICON THEN BEEP 'if is program minimalized
6.     SELECT CASE _FULLSCREEN
7.         CASE 0: PRINT "Fullscreen OFF"
8.         CASE 1: PRINT "Fullscreen ON, _STRETCH"
9.         CASE 2: PRINT "Fullscreen ON, _SQUAREPIXELS"
10.     END SELECT
11.     LOCATE 4
12.     hasFocus%% = _WINDOWHASFOCUS
13.     IF hasFocus%% THEN PRINT "This window is active        " ELSE PRINT "This window is not active" 'click to other window for test   (have 2 different program windows on screen and click there)
14. LOOP
15.  
16.  

[MasterGy]

thank you very much, that's exactly what i needed!

[doppler]

And if you wan to know more about other windows open/closed/min/max
https://ritchielawrence.github.io/cmdow/

Please red the very first line at the website.  If you decide to use cmdow, it maybe required to ignore win's security warning and accept it.