Hej alle vb-nørder
Jeg har et lille problem med et ellers perfekt program jeg har lavet, til at vise hvis der er kommet nye ordre i en internet butik. Programmet kommer kørerende op nede i højre hjørne, fx ligesom når der kommer en ny chatbesked i messenger/G-talk. Det virker også fint.
Selvfølgelig har jeg sat programmet til "always on top" med koden:
Private 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
---
Const SWP_NOSIZE = &H1
Const SWP_NOMOVE = &H2
Const SWP_NOACTIVATE = &H10
Const SWP_SHOWWINDOW = &H40
Const HWND_TOPMOST = -1
wFlags = SWP_NOMOVE Or SWP_NOSIZE Or SWP_SHOWWINDOW Or SWP_NOACTIVATE
SetWindowPos hWindow, HWND_TOPMOST, 0, 0, 0, 0, wFlags
Det virker også fint, men "HWND_TOPMOST" dvs. -1 sætter mit program over alt andet i windows OGSÅ taskbaren når programmet ruller op fra bunden, hvilket ikke er hensigtsmæssigt.
Er der nogen der ved hvordan man sætter et program til "always on top", men under taskbaren?
NB:
"HWND_TOP = 0", "Me.show vbModal", "Me.show vbSystemModal" eller "Me.show(1)" virker heller ikke!
Jeg har søgt google + div. fora tomme, for at finde svar, så håber at i kan give mig svar.