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

Post Reply
User avatar
goosfancito
Posts: 1955
Joined: Fri Oct 07, 2005 7:08 pm

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

Post by goosfancito »

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/
User avatar
Enrico Maria Giordano
Posts: 8738
Joined: Thu Oct 06, 2005 8:17 pm
Location: Roma - Italia
Has thanked: 1 time
Been thanked: 2 times
Contact:

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

Post by Enrico Maria Giordano »

Try this:

Code: Select all | Expand

SETWINDOWPOS( oDlg:hWnd, -1, 0, 0, 0, 0, 3 )


EMG
User avatar
cmsoft
Posts: 1296
Joined: Wed Nov 16, 2005 9:14 pm
Location: Mercedes - Bs As. Argentina
Been thanked: 2 times

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

Post by cmsoft »

Hola Gustavo, usa esta funcion que alguna vez encontre en el foro

Code: Select all | Expand


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
 
User avatar
Sebastián Almirón
Posts: 157
Joined: Mon Dec 12, 2005 9:56 am
Location: Moralzarzal - Spain

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

Post by Sebastián Almirón »

BringWindowToTop( < hWnd > )
Post Reply