Web Mundi - Fóruns: Janela sempre em primeiro plano

Autor

Mensagem

Pergunta
Moderadores

Registrado: 24 Abr 2006
Localização: Brazil
Online Status: Offline
Mensagens: 115

Tópico: Janela sempre em primeiro plano
Enviado: 26 Abr 2006 em 7:31pm

Como poderia fazer com que a janela de um formulário permanecesse sempre à frente de qualquer outra aplicação executada no windows?

IP gravado

Resposta
Moderadores

Registrado: 24 Abr 2006
Localização: Brazil
Online Status: Offline
Mensagens: 127

Enviado: 26 Abr 2006 em 7:40pm

1 - Inclua a funÃ§Ã£o abaixo num mÃ³dulo:
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

2 - No evento Form_Load do formulÃ¡rio que deseja manter em primeiro plano:
Call SetWindowPos(Me.hwnd, -1, 0, 0, 0, 0, &H1 Or &H2)

Se desejar que todo o seu projeto fique em primeiro plano, deverÃ¡ colocar a linha instruÃ§Ã£o acima em todos os forms.

IP gravado

Resposta
Moderadores

Registrado: 24 Abr 2006
Localização: Brazil
Online Status: Offline
Mensagens: 127

Enviado: 26 Abr 2006 em 7:56pm

apenas ponha , ME no final do show
ex form.show, me

IP gravado

emersoneumesmo
Usuário Novo

Registrado: 22 Jun 2010
Localização: Brazil
Online Status: Offline
Mensagens: 2

Enviado: 22 Jun 2010 em 3:44pm

Postada por Resposta

1 - Inclua a funÃ§Ã£o abaixo num mÃ³dulo: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 Long2 - No evento Form_Load do formulÃ¡rio que deseja manter em primeiro plano:Call SetWindowPos(Me.hwnd, -1, 0, 0, 0, 0, &H1 Or &H2)Se desejar que todo o seu projeto fique em primeiro plano, deverÃ¡ colocar a linha instruÃ§Ã£o acima em todos os forms.

tentei usar esse e não deu certo
Me.hwnd nesse trecho aparece que ele não pertence ao meu projeto http://www.webmundi.org/smileys/smiley18.gif

Obrigado desde já

IP gravado

emersoneumesmo
Usuário Novo

Registrado: 22 Jun 2010
Localização: Brazil
Online Status: Offline
Mensagens: 2

Enviado: 22 Jun 2010 em 3:45pm

Postada por Resposta

apenas ponha , ME no final do show ex form.show, me

e esse também não funciona

Obrigado desde já

IP gravado

	Tópicos recentes Membros Calendário Procurar Ajuda
	Registrar Entrar

Visual Basic
Web Mundi - Fóruns :Programação :Visual Basic

Autor	Mensagem
Pergunta Moderadores Registrado: 24 Abr 2006 Localização: Brazil Online Status: Offline Mensagens: 115	Tópico: Janela sempre em primeiro plano Enviado: 26 Abr 2006 em 7:31pm
	Como poderia fazer com que a janela de um formulário permanecesse sempre à frente de qualquer outra aplicação executada no windows?

	IP gravado

Resposta Moderadores Registrado: 24 Abr 2006 Localização: Brazil Online Status: Offline Mensagens: 127	Enviado: 26 Abr 2006 em 7:40pm
	1 - Inclua a funÃ§Ã£o abaixo num mÃ³dulo: 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 2 - No evento Form_Load do formulÃ¡rio que deseja manter em primeiro plano: Call SetWindowPos(Me.hwnd, -1, 0, 0, 0, 0, &H1 Or &H2) Se desejar que todo o seu projeto fique em primeiro plano, deverÃ¡ colocar a linha instruÃ§Ã£o acima em todos os forms.
	IP gravado

Resposta Moderadores Registrado: 24 Abr 2006 Localização: Brazil Online Status: Offline Mensagens: 127	Enviado: 26 Abr 2006 em 7:56pm
	apenas ponha , ME no final do show ex form.show, me
	IP gravado

emersoneumesmo Usuário Novo Registrado: 22 Jun 2010 Localização: Brazil Online Status: Offline Mensagens: 2	Enviado: 22 Jun 2010 em 3:44pm
	*Postada por Resposta* 1 - Inclua a funÃ§Ã£o abaixo num mÃ³dulo: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 Long2 - No evento Form_Load do formulÃ¡rio que deseja manter em primeiro plano:Call SetWindowPos(Me.hwnd, -1, 0, 0, 0, 0, &H1 Or &H2)Se desejar que todo o seu projeto fique em primeiro plano, deverÃ¡ colocar a linha instruÃ§Ã£o acima em todos os forms. tentei usar esse e não deu certo Me.hwnd nesse trecho aparece que ele não pertence ao meu projeto http://www.webmundi.org/smileys/smiley18.gif
	Obrigado desde já
	IP gravado

emersoneumesmo Usuário Novo Registrado: 22 Jun 2010 Localização: Brazil Online Status: Offline Mensagens: 2	Enviado: 22 Jun 2010 em 3:45pm
	*Postada por Resposta* apenas ponha , ME no final do show ex form.show, me e esse também não funciona
	Obrigado desde já
	IP gravado