screen tela cheia

[adrianobom45]

Boa noite galera!

Como faço para deixar meu screen tela cheia (fullscreen)?

Desde já agradeço.

[Julio]

Veja esta topicos


[Você precisa estar registrado e conectado para ver este link.]
-
[Você precisa estar registrado e conectado para ver este link.]
-
[Você precisa estar registrado e conectado para ver este link.]

Veja também este codigo do Marcos Guedes

Código:

_SCREEN.ADDOBJECT("LOGO","Image")
_SCREEN.LOGO.PICTURE=GETPICT()
_SCREEN.LOGO.LEFT=0
_SCREEN.LOGO.TOP =0
_SCREEN.LOGO.BACKSTYLE = 0 && Transparente
_SCREEN.LOGO.STRETCH = 2
_SCREEN.LOGO.VISIBLE = .T.
_SCREEN.LOGO.WIDTH = _SCREEN.WIDTH
_SCREEN.LOGO.HEIGHT = _SCREEN.HEIGHT

PUBLIC ohandler
ohandler=NEWOBJECT("myhandler")

BINDEVENT(_SCREEN,"Resize",ohandler,"myresize")

DEFINE CLASS myhandler AS SESSION

  PROCEDURE myresize
      _SCREEN.LOGO.WIDTH = _SCREEN.WIDTH
      _SCREEN.LOGO.HEIGHT = _SCREEN.HEIGHT

  ENDPROC

ENDDEFINE

[Você precisa estar registrado e conectado para ver este link.]

[adrianobom45]

Obrigado Julio,
Mas seria tipo fullscreen, sem mostrar a barra do iexplorer.

[alceu11]

na aba code do seu projeto, o seu prg main em negrito.

ondi todo incio do seu prg, que inicia tua aplicacao.
CLOSE DATABASES
CLOSE ALL

SET SYSMENU off
SET DATE BRITISH
SET CENTURY on
SET SAFETY OFF
SET DATE BRITISH

ON SHUTDOWN quit

codigo

Código:


WITH _Screen
_screen.Caption ='Consulte o status da nfe'
_screen.WindowState = 2  && aqui seria maximizada
_SCREEN.BackColor = RGB(243,242,214)
_screen.BorderStyle = 0 
***.WindowState = 0 && aqui seria o normal
.fontbold = .t.
.fontname = 'Couriernew'
.fontsize = 16
.Autocenter = .t.
_SCREEN.LockScreen=.F. && Ativa redraw de tela

endwith
***A seguir vc chamaria o seu menu principal da tua aplicacao
do menu1.mpr
read events
veja como ficou


[Você precisa estar registrado e conectado para ver esta imagem.]

[Julio]

Veja este exemplo utiliznado um form sem a barra de titulos.


[Você precisa estar registrado e conectado para ver este link.]

[adrianobom45]

julio isso msm
brigadão galera, desculpe ai por não ter agradecido antes...