FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour dialogo por sobre todo el resto de ventana...?
Posts: 1956
Joined: Fri Oct 07, 2005 07:08 PM

dialogo por sobre todo el resto de ventana...?

Posted: Wed Jan 12, 2022 08:34 AM

Hola.
Necesito que un dialogo este por sobre todas las ventanas, cual sería la clausula a usar?

gracias.

FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
Posts: 9022
Joined: Thu Oct 06, 2005 08:17 PM

Re: dialogo por sobre todo el resto de ventana...?

Posted: Wed Jan 12, 2022 10:46 AM
Try this:

Code (fw): Select all Collapse
SETWINDOWPOS( oDlg:hWnd, -1, 0, 0, 0, 0, 3 )


EMG
Posts: 1344
Joined: Wed Nov 16, 2005 09:14 PM

Re: dialogo por sobre todo el resto de ventana...?

Posted: Wed Jan 12, 2022 10:47 AM
Hola Gustavo, usa esta funcion que alguna vez encontre en el foro
Code (fw): Select all Collapse
DEFINE DIALOG oDlg TITLE "Alertas " FROM 09,15 TO 28,135 OF oApp:oWnd
ACTIVATE DIALOG oDlg CENTER ON INIT DlgOnTop( .t.,oDlg:hWnd )

function DlgOnTop( lState, hWnd )
   local nRet := 0
   DEFAULT hWnd := GetActiveWindow()
   if !lState
      nRet = AcpOnTop( hWnd, -2, 0, 0, 0, 0, 3 )
   else
      nRet = AcpOnTop( hWnd, -1, 0, 0, 0, 0, 3 )
   endif
return nRet
Posts: 166
Joined: Mon Dec 12, 2005 09:56 AM

Re: dialogo por sobre todo el resto de ventana...?

Posted: Thu Jan 13, 2022 08:59 AM

BringWindowToTop( < hWnd > )

Continue the discussion