dialogo o ventana pantalla completa
dialogo o ventana pantalla completa
Buenos dias para todos
Queria saber como puedo iniciar un dialogo o window en modo pantalla completa?
Saludos
Queria saber como puedo iniciar un dialogo o window en modo pantalla completa?
Saludos
Saludos
LEANDRO ALFONSO
SISTEMAS LYMA - BASE
Bogotá (Colombia)
[ FWH 19.09 ] [ xHarbour 1.2.3 Intl. (SimpLex) (Build 20190613) ] [ Embarcadero C++ 7.30 for Win32 ]
LEANDRO ALFONSO
SISTEMAS LYMA - BASE
Bogotá (Colombia)
[ FWH 19.09 ] [ xHarbour 1.2.3 Intl. (SimpLex) (Build 20190613) ] [ Embarcadero C++ 7.30 for Win32 ]
Re: dialogo o ventana pantalla completa
ACTIVATE WINDOW oWnd MAXIMIZED ?
C. Navarro
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
Si alguien te dice que algo no se puede hacer, recuerda que esta hablando de sus limitaciones, no de las tuyas.
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
Si alguien te dice que algo no se puede hacer, recuerda que esta hablando de sus limitaciones, no de las tuyas.
Re: dialogo o ventana pantalla completa
Gracias Cristobal por responder
Pero no es lo que necesito... si no que la ventana de aplicación... se ubique por encima de todas las aplicaciones de windows y que en modo pantalla completa...
Algo similar a lo que hace youtube cuando colocas un video en pantalla completa.
De antemano gracias
Pero no es lo que necesito... si no que la ventana de aplicación... se ubique por encima de todas las aplicaciones de windows y que en modo pantalla completa...
Algo similar a lo que hace youtube cuando colocas un video en pantalla completa.
De antemano gracias
Saludos
LEANDRO ALFONSO
SISTEMAS LYMA - BASE
Bogotá (Colombia)
[ FWH 19.09 ] [ xHarbour 1.2.3 Intl. (SimpLex) (Build 20190613) ] [ Embarcadero C++ 7.30 for Win32 ]
LEANDRO ALFONSO
SISTEMAS LYMA - BASE
Bogotá (Colombia)
[ FWH 19.09 ] [ xHarbour 1.2.3 Intl. (SimpLex) (Build 20190613) ] [ Embarcadero C++ 7.30 for Win32 ]
- joseluisysturiz
- Posts: 2024
- Joined: Fri Jan 06, 2006 9:28 pm
- Location: Guatire - Caracas - Venezuela
- Contact:
Re: dialogo o ventana pantalla completa
Colega, disculpe la intromision, pero la respuesta de Navarro es la correcta a su pregunta...solo que no preguntastes bien lo que querias...a veces sucede que decimos o escribimos cosas creyendo son las que estamos pensando y que se nos va a entender...por eso hay que ser en PROGRAMACION, muy detallista...tambien le iba a responder lo mismo que Navarro hasta que lei su respuesta a lo que el le dijo...ojo, no es un regañp ni nada parecido, solo una observacion GENERAL...por experiencia propia es que hago mi acotacion ya que tambien me ha pasado.leandro wrote:Gracias Cristobal por responder
Pero no es lo que necesito... si no que la ventana de aplicación... se ubique por encima de todas las aplicaciones de windows y que en modo pantalla completa...
Algo similar a lo que hace youtube cuando colocas un video en pantalla completa.
De antemano gracias
Lo que quieres es que tu sistema se sobre-ponga a las aplicaciones abiertas...creo hay algo por alli en el foro...buscare y si lo consigo..respondo. gracias...saludos...
Dios no está muerto...
Gracias a mi Dios ante todo!
Gracias a mi Dios ante todo!
Re: dialogo o ventana pantalla completa
Leandro,
algo assim:
function Main()
local oDlg, oIco, cTest := "Hello world! "
DEFINE ICON oIco FILE "..\icons\fivewin.ico"
DEFINE DIALOG oDlg TITLE "I am a DialogBox" COLOR "W+/B" ;
ICON oIco
@ 1, 3 GET cTest
@ 3, 5 BUTTON "&Ok" SIZE 40, 12 ;
ACTION MsgInfo( "Any action here!" ) DEFAULT
@ 3, 16 BUTTON "&Cancel" SIZE 40, 12 ACTION oDlg:End()
ACTIVATE DIALOG oDlg CENTERED on init(ConfiguraDialogPrincipal(odlg)) ;
VALID MsgYesNo( "Do you want to end ?" )
return nil
static procedure ConfiguraDialogPrincipal( oDialog )
oDialog:maximize()
oDialog:center()
return
algo assim:
function Main()
local oDlg, oIco, cTest := "Hello world! "
DEFINE ICON oIco FILE "..\icons\fivewin.ico"
DEFINE DIALOG oDlg TITLE "I am a DialogBox" COLOR "W+/B" ;
ICON oIco
@ 1, 3 GET cTest
@ 3, 5 BUTTON "&Ok" SIZE 40, 12 ;
ACTION MsgInfo( "Any action here!" ) DEFAULT
@ 3, 16 BUTTON "&Cancel" SIZE 40, 12 ACTION oDlg:End()
ACTIVATE DIALOG oDlg CENTERED on init(ConfiguraDialogPrincipal(odlg)) ;
VALID MsgYesNo( "Do you want to end ?" )
return nil
static procedure ConfiguraDialogPrincipal( oDialog )
oDialog:maximize()
oDialog:center()
return
-
- Posts: 188
- Joined: Mon Jun 10, 2013 6:40 pm
Re: dialogo o ventana pantalla completa
Yo tengo algo asi :
Espero y te sirva
Saludos.
Code: Select all
oTB := TaskBar() <<- Esta es una clase
oTB:HideShowTaskBar(.F.)
DEFINE WINDOW oWin Title "Sistema Empresarial..." Icon "AAsesores" NOICONIZE NOSYSMENU BORDER NONE NOCAPTION
oWin:bPainted := {|hDC| CBmpTiled(hDC,oWin,oBmp1)}
ACTIVATE WINDOW oWin Maximized
oTB:HideShowTaskBar(.T.)
Saludos.
Re: dialogo o ventana pantalla completa
Leandro:
Buscando en el baúl de los recuerdos encontré esto, aunque es para un dialogo
tal vez te sirva para una ventana.
Ojalá te sirva, Saludos
Buscando en el baúl de los recuerdos encontré esto, aunque es para un dialogo
tal vez te sirva para una ventana.
Code: Select all
ACTIVATE DIALOG oDlg 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)
dll32 STATIC FUNCTION AcpOnTop(hWnd AS LONG, hWndInsertAfter AS LONG, x AS LONG, y AS LONG, ex AS LONG, cy AS LONG, wFlags AS LONG);
AS LONG PASCAL FROM "SetWindowPos" LIB "User32.dll"
SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
Re: dialogo o ventana pantalla completa
Leandro:
Algo más simple
Saludos
Algo más simple
Code: Select all
ACTIVATE DIALOG oDlg ON INIT SetWindowPos( oDlg:hWnd, -1, 0, 0, 0, 0, 3 )
SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
- joseluisysturiz
- Posts: 2024
- Joined: Fri Jan 06, 2006 9:28 pm
- Location: Guatire - Caracas - Venezuela
- Contact:
Re: dialogo o ventana pantalla completa
Gracias a Armando consegui esto, espero te ayude...saludos...
http://forums.fivetechsupport.com/viewt ... b1#p129634
http://forums.fivetechsupport.com/viewt ... 8b1#p74173
http://winapi.freetechsecrets.com/win32 ... dowPos.htm
http://www.pinvoke.net/default.aspx/cor ... owPos.html
http://forums.fivetechsupport.com/viewt ... b1#p129634
http://forums.fivetechsupport.com/viewt ... 8b1#p74173
http://winapi.freetechsecrets.com/win32 ... dowPos.htm
http://www.pinvoke.net/default.aspx/cor ... owPos.html
Dios no está muerto...
Gracias a mi Dios ante todo!
Gracias a mi Dios ante todo!
Re: dialogo o ventana pantalla completa
Todo es aún más sencillo.
En los ejemplos touch de fwh se usan ventanas a pantalla completa.
En los ejemplos touch de fwh se usan ventanas a pantalla completa.
Re: dialogo o ventana pantalla completa
Muchas Gracias a todos por responder
Pruebo y comento
Pruebo y comento
Saludos
LEANDRO ALFONSO
SISTEMAS LYMA - BASE
Bogotá (Colombia)
[ FWH 19.09 ] [ xHarbour 1.2.3 Intl. (SimpLex) (Build 20190613) ] [ Embarcadero C++ 7.30 for Win32 ]
LEANDRO ALFONSO
SISTEMAS LYMA - BASE
Bogotá (Colombia)
[ FWH 19.09 ] [ xHarbour 1.2.3 Intl. (SimpLex) (Build 20190613) ] [ Embarcadero C++ 7.30 for Win32 ]
Re: dialogo o ventana pantalla completa
+1
DEFINE DIALOG oDlg STYLE nOr(WS_POPUP, WS_VISIBLE)
ACTIVATE DIALOG oDlg CENTERED ON INIT ShowWindow(oDlg:hWnd, 3)
DEFINE DIALOG oDlg STYLE nOr(WS_POPUP, WS_VISIBLE)
ACTIVATE DIALOG oDlg CENTERED ON INIT ShowWindow(oDlg:hWnd, 3)
FWH2008 | xHarbour | BCC74 | SQLRDD
Re: dialogo o ventana pantalla completa
hmpaquito Muchas Gracias
Algo así es lo que estoy tratando de hacer.... voy a probar por ese lado y comento.
Algo así es lo que estoy tratando de hacer.... voy a probar por ese lado y comento.
Saludos
LEANDRO ALFONSO
SISTEMAS LYMA - BASE
Bogotá (Colombia)
[ FWH 19.09 ] [ xHarbour 1.2.3 Intl. (SimpLex) (Build 20190613) ] [ Embarcadero C++ 7.30 for Win32 ]
LEANDRO ALFONSO
SISTEMAS LYMA - BASE
Bogotá (Colombia)
[ FWH 19.09 ] [ xHarbour 1.2.3 Intl. (SimpLex) (Build 20190613) ] [ Embarcadero C++ 7.30 for Win32 ]