USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Mdiform sobrepor a barra de tarefa, tem como?
Fernis
não registrado
Postada em 14/03/2007 14:23 hs   
Mdiform sobrepor a barra de tarefa, tem como?
     
Ama
Pontos: 2843
UBERLÂNDIA
MG - BRASIL
Postada em 14/03/2007 16:20 hs         
Se vc marcar propriedade autoHide da barra naum funciona eu uso assim e trabalho com form em tela inteira, pra mim é o bastante
     
LCRamos
Pontos: 2843
GOIANIA
GO - BRASIL
Postada em 16/03/2007 22:58 hs            
Veja esta dica do Ednei aqui no vbweb:
 
'Em General Declarations coloque isto,

Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" _
(ByVal lpexecuta As String, ByVal lpWindowName As String) As Long

Private Declare Function ShowWindow Lib "user32" (ByVal hwnd As _
Long, ByVal nCmdShow As Long) As Long

Const SW_HIDE = 0: Const SW_SHOWNORMAL = 1

'*******************************************************






'AGORA  NO FORM COLOQUE ISTO,
'2 CommandButtons

Private Sub Command1_Click()
'Para Ocultar a barra de tarefas:

Dim aviso As Long
Dim janela As Long
Dim executa As String

executa = Space(256)
executa = "Shell_TrayWnd"

janela = FindWindow(executa, vbNullString)
aviso = ShowWindow(janela, SW_HIDE) 'Esconde a barra


End Sub

Private Sub Command2_Click()
'Para Mostrar a barra de tarefas:

Dim aviso As Long
Dim janela As Long
Dim executa As String

executa = Space(256)
executa = "Shell_TrayWnd"

janela = FindWindow(executa, vbNullString)
aviso = ShowWindow(janela, SW_SHOWNORMAL) 'Mostra a barra
End Sub


vlu//
     
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2025   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página