Topmost window

Ok. When my prog is minimized it sits in the taktray. When a user clicks the icon it restores to vbnormal. Now, I need this window to be seen (As in on top). My problem is, for some reason the forcewindowontop function isn't working?

Code:

---

Declare Function SetForegroundWindow Lib "user32.dll" (ByVal hwnd As Long) As Long

---

Why?

To make your Form TopMost use the SetWindowPos API with the HWND_TOPMOST constant, i.e.

Code:

---

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
Private Const SWP_NOMOVE = &H2
Private Const SWP_NOSIZE = &H1
Private Const HWND_TOPMOST = -1

Private Sub Form_Activate()
    Call SetWindowPos(hwnd, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE)
End Sub

---

Tried that one already, also didn't work

It does work, but won't appear to work when run from within the VB IDE environment, compile the EXE and it's fine.

I know, and have compiled. Still didn't work. Maybe I should say that I am running Win 2000 Server. It worked fine before on 98 and NT!

Ok now this is weird. If I call both api functions the window comes to the top (even in the IDE) but not if I only call one.

Can anyone explain or should I just blame this on Microsoft?