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

tabarra

[VB6] Janela no topo

5 mensagens neste tópico

Ajuda aqui plzzzzz

é assim, eu quero saber o comando pra fazer uma janela ficar no topo, URGENTE !!!

agradeço des de já !

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Ora bem não sei se é isto que queres. Mas é assim isto é o que encontro no Google.

Eu não sei nada de VB. Se não é isto peço desculpa.

A frequent request is how to make a window float on top of every other window. This is actually quite simple using the code below

Simply call MakeTopMost to make the window appear on top, and MakeNormal to return it to its normal behaviour

Private Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, y, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long
Private Const HWND_TOPMOST = -1
Private Const HWND_NOTOPMOST = -2
Private Const SWP_NOMOVE = &H2
Private Const SWP_NOSIZE = &H1
Private Const TOPMOST_FLAGS = SWP_NOMOVE Or SWP_NOSIZE

Public Sub MakeNormal(hwnd As Long)
    SetWindowPos hwnd, HWND_NOTOPMOST, 0, 0, 0, 0, TOPMOST_FLAGS
End Sub
Public Sub MakeTopMost(hwnd As Long)
    SetWindowPos hwnd, HWND_TOPMOST, 0, 0, 0, 0, TOPMOST_FLAGS
End Sub

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Todas as mensagens que não estiverem de acordo com as regras apartir desta data serão removidas, edita a thread inicial !

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