Active Window and Focus - GameCreators Forum

Author

Message

Ben_UK78

15

Years of Service

User Offline

Joined: 10th Jul 2010

Location:

Posted: 26th Jun 2012 08:52

Link

Hi All,

Just a quick question since I seem to be hitting a wall.

When I compile a program so it opens in FULLDESKTOP it does not have the windows focus/is not active.

I just need it so that I do not have to click in the window before it will start recognising key presses etc. Does anyone know the correct command to do this?

Back to top

Profile PM Email

Max P

16

Years of Service

User Offline

Joined: 23rd Jan 2010

Location:

Posted: 26th Jun 2012 18:46

Link

There is a 'Grab Focus' command in the Matrix1Utils, they can be downloaded here: http://forum.thegamecreators.com/?m=forum_view&t=85209&b=18
Just call 'Grab Focus' before you enter the main loop.

Back to top

Profile PM

Ben_UK78

15

Years of Service

User Offline

Joined: 10th Jul 2010

Location:

Posted: 27th Jun 2012 05:36

Link

Thanks very much. GRAB FOCUS does allow input without clicking in the window, which is something at least.

I had tried it in the past, looking at my other progs, but can to a wall. I still have to click in the box to make it lie above the windows taskbar (for example).

I guess the focus is given, but the window is not brought to the top. Do you know how to make the window the full equivalent of being clicked on using the mouse?

I have tried a method like this, but I can't quite make it work.

+ Code Snippet

  set window title "Example1"
  l_WindowHndl = FIRST WINDOW("Example1", 0)
  if l_WindowHndl <> 0
    SET ACTIVE WINDOW l_WindowHndl
  endif
  GRAB FOCUS

Back to top

Profile PM Email

Latch

19

Years of Service

User Offline

Joined: 23rd Jul 2006

Location:

Posted: 28th Jun 2012 00:21

Link

This is some old DBC code, but it should be valid. The main change might be the binary OR operator '||' as opposed to '|'

+ Code Snippet

set window on
sync on

user32=1
load dll "user32.dll",user32

gosub _winapi_constants

rem make the window always on top
hwnd=call dll(user32,"GetActiveWindow")
x=0
y=0
xwidth=0
yheight=0
result=call dll(user32, "SetWindowPos", hwnd, HWND_TOPMOST, x, y, xwidth, yheight, SWP_SHOWWINDOW|SWP_NOMOVE|SWP_NOSIZE)

if result=0
   break "the function call failed"
   delete dll user32
   end
endif

do
   text 0,100,"I'm On Top!!!"
   sync
loop

end

_winapi_constants:
   SWP_FRAMECHANGED  = 32
   SWP_DRAWFRAME  = SWP_FRAMECHANGED
   SWP_HIDEWINDOW  = 128
   SWP_NOACTIVATE  = 16
   SWP_NOCOPYBITS  = 256
   SWP_NOMOVE  = 2
   SWP_NOOWNERZORDER  = 512
   SWP_NOREDRAW  = 8
   SWP_NOREPOSITION  = SWP_NOOWNERZORDER
   SWP_NOSIZE  = 1
   SWP_NOZORDER  = 4
   SWP_SHOWWINDOW  = 64
   HWND_BOTTOM  = 1
   HWND_BROADCAST  = 65535
   HWND_DESKTOP  = 0
   HWND_NOTOPMOST  = -2
   HWND_TOP  = 0
   HWND_TOPMOST  = -1
return

Enjoy your day.

Back to top

Profile PM

Sorry your browser is not supported!

DarkBASIC Professional Discussion / Active Window and Focus