Setting mouse to ignore outside of _NewImage

[SMcNeill]

Code: (Select All)

Declare Dynamic Library "user32"

    Sub SetForegroundWindow (ByVal hwnd As _Offset) 'set foreground window process(focus)

End Declare



hwnd%& = _WindowHandle

Do

    If _WindowHasFocus = _FALSE Then

        SetForegroundWindow hwnd%& 'set focus when necessary

        Beep

        Print "THOUGH SHALL STAY FOCUSED!!!"

    End If

    _Limit 30

Loop Until _KeyHit = 27 'escape to quit

System

Note that this tends to work intermittently on my OS. Windows says:

A window cannot be forced to the foreground if the user is actively working in another window. Instead, Windows will flash the taskbar button of the intended window to alert the user.

And, if you try this, you'll notice that's exactly what happens here. If it doesn't automatically restore focus, then it'll blink the icon on your task bar and BEEP incessantly until you swap back over to it.

[Pete]

I recall that bullshit, too. I thought SetForegroundWindow was what I was looking for a few years back, too, but I got the same useless results you did. BEEP BEEP BEEP... but that wasn't in my program, it was, however, in my very vocal response!

The best you get from using SetForegroundWindow is one return focus as the active window. After that, is does the taskbar blinking shit you mentioned. I don't know why MS thought this would be a useful function, and even more, I don't care why they thought it would be a useful function. If you had the I.Q. of a gnat, you'd be overqualified to work there. Hey, did Clippy come up with this 'feature'

Pete