Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.
Amigos,
Estou desenvolvendo uma barra com informações parecida com o letreiro da bovespa (http://pregao-online.bmfbovespa.com.br/) que mostra as cotações do dia, mas preciso que essa barra fique sobre todas as janelas e não na frente, ou seja, todo programa ou janela aberto deve ser maximizado até o limite inferior dessa barra.
Uso esse código em um módulo para o projeto ficar sobre as janelas:
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
E chamo no evento load do form:
Private Sub Form_Load()
Call SetWindowPos(Me.hwnd, -1, 0, 0, 0, 0, &H1 Or &H2)
End Sub
Hoje o projeto está assim sobre as janelas:
/applications/core/interface/imageproxy/imageproxy.php?img=http://s17.postimg.org/ix7wv5473/Imagem1.png&key=7a5f06f85e80f11fa53c90c7297218299f6e8b706f7041af6aac34f6f06cb386" alt="Imagem1.png" />
Mas deveria ficar assim:
/applications/core/interface/imageproxy/imageproxy.php?img=http://s21.postimg.org/5pq2hqvkn/Imagem2.png&key=4def776a39f2cd38248c736259d8c06eec97f101ae1320430dba24185942579e" alt="Imagem2.png" />
Abraço!
Carregando comentários...