• Revista PROGRAMAR: Já está disponível a edição #53 da revista programar. Faz já o download aqui!

greyback

[x] FULL SCREEN

10 mensagens neste tópico

boas. era só para saber como é que se poem em vb um form em full screen:D

alguem pode ajudar ?  :wallbash:

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Boas

Em .net é assim

Me.WindowState = FormWindowState.Maximized

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

tipo,vais a propriedade do form na opção quase no fim windowstate ou assim do genero poe: maximazed

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Me.WindowState = 2

colocar no load do form por exemplo

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

mas tipo isso vai tb ocupar a barra de tarrefas certo? eu pertendo isso... mas na sei

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Boas...

Com o o estilo normal de uma janela não sei se dá para "tapar" a barra de tarefas. Mas se queres a janela a ocupar todo o ecrã também não te deve interessar isso, por isso na propriedade BorderStyle metes a False e depois como já disseram na propriedade WindowsState (penso eu) metes maximized. Supostamente irá fazer o que queres. Se mesmo assim não der, talvez tenhas de alterar outras propriedades da Form que eu agora não me lembro.

Cumps

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

boas...

o que tu keres ja ai tá... so falta a barra de tarefas, certo?  :hmm:

entao aki tá a soluçao...  :biggrin:

num modulo:

Option Explicit
Public Declare Function FindWindow Lib _
       "user32" Alias "FindWindowA" _
       (ByVal lpClassName As String, _
       ByVal lpWindowName As String) _
       As Long
Public Declare Function SetWindowPos _
       Lib "user32" (ByVal hwnd As _
       Long, ByVal hWndInsertAfter As _
       Long, ByVal x As Long, ByVal y _
       As Long, ByVal cx As Long, _
       ByVal cy As Long, ByVal wFlags _
       As Long) As Long
Public Const SWP_HIDEWINDOW As Long = &H80
Public Const SWP_SHOWWINDOW As Long = &H40
Public lRet As Long



e dps no codigo do form load:

  'Esconde a barra de tarefas
  Call SetWindowPos(lRet, 0, 0, 0, 0, 0, _
       SWP_HIDEWINDOW)

mas para nao dar bugs do tipo saires e a barra nao voltar a aparecer poe tb este codigo:

Private Sub Form_Unload(Cancel As Integer)
  'Como a variável lRet foi declarada como
  'Public e já contém o Handle da barra de
  'tarefas do Windows, não será necessário
  'usar a API FindWindows de novo...

  'Restaura a barra de tarefas
  Call SetWindowPos(lRet, 0, 0, 0, 0, 0, SWP_SHOWWINDOW)

End Sub

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
    'Restaura a barra de tarefas
    Call SetWindowPos(lRet, 0, 0, 0, 0, 0, SWP_SHOWWINDOW)
End Sub

espero ter ajudado...  ;)

cumps  :D

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

KaZ, não falta ai a parte do FindWindows?

eu no programa ond usei este codigo tenho isso so assim... e nas propriedades do form tenho maximized..

cumps  :hmm:

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Olha, Experimenta axim.... e mais facil e n usas nd externo....

Eu tenhu um programa de escolhas de refeiçoes a correr axim e ainda n deu probs ;)

Private Sub temposLectivos_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
     Me.FormBorderStyle=Windows.Forms.FormBorderStyle.None
     Me.Size = New Size(Screen.PrimaryScreen.Bounds.Width, Screen.PrimaryScreen.Bounds.Height)
     Me.Location = New Point(0, 0)
End Sub

se kiseres k a form fique em cima de todas as outras adicionas mais esta linha de cod.

Me.TopMost = True

Hazta,

Akaru

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!


Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.


Entrar Agora