How do you put the Procomm window on top when WINFOCUS doesn't work?

[FastLearner]

Winfocus is supposed to change the active window for keyboard input, but it does not seem to be accomplishing that task. See code below...

This code should check for focus every 10 seconds and if Procomm doesn't have it, it should take it.

Run this and while running, click on another app. According to what Procomm can see, it IS changing the focus, but that doesn't mean it's on top?!? Anyone know how to solve this? We can't do much window navigation at all if this command doesn't work.

proc main
 while 1			;loop indefinitely for test
   pause 10			;wait 10 seconds
   if $FOCUSWIN != $PWMAINWIN	;check if PW has focus
     winfocus $PWMAINWIN	;if not, give it focus
     if $FOCUSWIN != $PWMAINWIN
       usermsg "The focus change failed. I don't know why...."
      else
       usermsg "Focus change was successful! Or was it?"
     endif
   endif
 endwhile
endproc

 

[knob]

Unfortunately, I could not find a workaround for this. Seems to be a bug to me.
aspect@aspectscripting.com

http://www.aspectscripting.com

 

[mrnoisy]

A workaround for this would be to minimize and then restore $PWMAINWIN before the winfocus command. See example below:

proc main
 while 1                         ;loop indefinitely for test
   pause 10                      ;wait 10 seconds
   if $FOCUSWIN != $PWMAINWIN    ;check if PW has focus

     ; Insert the following
     winminimize $PWMAINWIN      ;Minimize the window
     winrestore $PWMAINWIN       ;Restore the window

     winfocus $PWMAINWIN         ;if not, give it focus
     if $FOCUSWIN != $PWMAINWIN
       usermsg "The focus change failed. I don't know why...."
      else
       usermsg "Focus change was successful! Or was it?"
     endif
   endif
 endwhile
endproc

 

[det07]

I believe that winmove and winsize commands also cause procomm windows to pop to the front. Of course for these commands you'll need their paramaters but it may be faster than minimize/maximize.