Lisp HUG Maillist Archive

bring application window in front

Hello,

Can someone tell me how to bring Lispworks or any application 
window in front of all other applications?

Thanks,

Francis


______________________________________________________________________
This email has been scanned by the MessageLabs Email Security System.
For more information please visit http://www.messagelabs.com/email 
______________________________________________________________________


Re: bring application window in front

Hello Francis,

| Can someone tell me how to bring Lispworks or any application
| window in front of all other applications?

In its simplest, capi:activate-pane must do. I would recommend accompaning
it with the following:

(defun show-raise-restore (interface)
 ;;; Bring hidden or iconic interface to front restoring its 
  ;; to last normal or maximized.
  ;; CAPI Bug?   Maximized and hidden window becomes visible 
  ;; but restored to normal size though doc states:
  ;; ...depending on how the interface was visible in the past.
  (case (capi:top-level-interface-display-state interface)
    ((:hidden :iconic)
     (setf (capi:top-level-interface-display-state interface) :restore))
    (otherwise
     (capi:raise-interface interface))))
--
Sincerely,
Dmitriy Ivanov
lisp.ystok.ru


______________________________________________________________________
This email has been scanned by the MessageLabs Email Security System.
For more information please visit http://www.messagelabs.com/email 
______________________________________________________________________


Re: bring application window in front

Are you using MS Windows  ?

On Windows you can use the Win API function SetWindowPos with HWND_TOPMOST 
and SWP_NOMOVE

I am not aware of a CAPI version of this, so you might have to use 
CAPI:SIMPLE-PANE-HANDLE and your own FLI definition of  SetWindowPos

cheers

paulm

At 08:59 07/10/2005, Francis Leboutte wrote:
>Hello,
>
>Can someone tell me how to bring Lispworks or any application window in 
>front of all other applications?
>
>Thanks,
>
>Francis
>
>
>______________________________________________________________________
>This email has been scanned by the MessageLabs Email Security System.
>For more information please visit http://www.messagelabs.com/email 
>______________________________________________________________________



Re: bring application window in front

At 7/10/2005 11:03, Dmitriy Ivanov wrote:
>Hello Francis,
>
>| Can someone tell me how to bring Lispworks or any application
>| window in front of all other applications?
>
>In its simplest, capi:activate-pane must do. I would recommend accompaning
>it with the following:

I was meaning an external application. Would the following work 
on an external application? (I'm CAPI ignorant, I never had a 
chance to use it actually).

Thanks,

Francis


>(defun show-raise-restore (interface)
>  ;;; Bring hidden or iconic interface to front restoring its
>   ;; to last normal or maximized.
>   ;; CAPI Bug?   Maximized and hidden window becomes visible
>   ;; but restored to normal size though doc states:
>   ;; ...depending on how the interface was visible in the past.
>   (case (capi:top-level-interface-display-state interface)
>     ((:hidden :iconic)
>      (setf (capi:top-level-interface-display-state interface) :restore))
>     (otherwise
>      (capi:raise-interface interface))))
>--
>Sincerely,
>Dmitriy Ivanov
>lisp.ystok.ru
>
>
>______________________________________________________________________
>This email has been scanned by the MessageLabs Email Security System.
>For more information please visit http://www.messagelabs.com/email
>______________________________________________________________________


______________________________________________________________________
This email has been scanned by the MessageLabs Email Security System.
For more information please visit http://www.messagelabs.com/email 
______________________________________________________________________


Re: bring application window in front

At 7/10/2005 11:30, Paul Miller wrote:

>Are you using MS Windows  ?

Yes, right now, but I would prefer a portable solution as target is Linux too.

Thanks for the advice,

Francis


>On Windows you can use the Win API function SetWindowPos with 
>HWND_TOPMOST and SWP_NOMOVE
>
>I am not aware of a CAPI version of this, so you might have to 
>use CAPI:SIMPLE-PANE-HANDLE and your own FLI definition of  SetWindowPos
>
>cheers
>
>paulm
>
>At 08:59 07/10/2005, Francis Leboutte wrote:
>>Hello,
>>
>>Can someone tell me how to bring Lispworks or any application 
>>window in front of all other applications?
>>
>>Thanks,
>>
>>Francis
>>
>>
>>______________________________________________________________________
>>This email has been scanned by the MessageLabs Email Security System.
>>For more information please visit 
>>http://www.messagelabs.com/email 
>>______________________________________________________________________
>
>
>


______________________________________________________________________
This email has been scanned by the MessageLabs Email Security System.
For more information please visit http://www.messagelabs.com/email 
______________________________________________________________________


Updated at: 2020-12-10 08:50 UTC