************************
In module:
Option Explicit

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

Public Const conHwndTopmost = -1
Public Const conHwndNoTopmost = -2
Public Const conSwpNoActivate = &H10
Public Const conSwpShowWindow = &H40

******************
In form:
Option Explicit

Private Sub Form_Load()
      SetWindowPos hWnd, conHwndTopmost, 100, 100, 300, 300,
conSwpNoActivate Or conSwpShowWindow
End Sub

Any help greatly appreciated.

Thanks
Alan in San Antonio

I would experiment with resetting the top-most status (as you are doing) in,
perhaps, the Activate or Deactivate events and see what works.

I know it's a pain but I haven't seen this problem with C programs so it
must be something VB is doing.

--
Jonathan Wood
SoftCircuits Programming
http://www.softcircuits.com

--

Randy Birch, MVP Visual Basic

http://www.mvps.org/vbnet/
http://www.mvps.org/ccrp/

Please correspond only using the newsgroups so all can benefit.

| I need to make a form that is ALWAYS on top of every other form.  I can
| create a form from the example in Vis. Studio help that stays on top most
of
| the time.  But if I minimize a form underneath mine and then restore that
| form from the task bar it covers mine up.  What I require is a form that
| will not be covered by anything as long as its open.  Can the Z order for
a
| form be coded to always be first?  The following is the code I have tried.
| Developing with VB6.0
|
| ************************
| In module:
| Option Explicit
|
| 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
|
|
| Public Const conHwndTopmost = -1
| Public Const conHwndNoTopmost = -2
| Public Const conSwpNoActivate = &H10
| Public Const conSwpShowWindow = &H40
|
| ******************
| In form:
| Option Explicit
|
| Private Sub Form_Load()
|       SetWindowPos hWnd, conHwndTopmost, 100, 100, 300, 300,
| conSwpNoActivate Or conSwpShowWindow
| End Sub
|
|
| Any help greatly appreciated.
|
| Thanks
| Alan in San Antonio
|
|
|

--
Jonathan Wood
SoftCircuits Programming
http://www.softcircuits.com

?I need to make a form that is ALWAYS on top of every other form.  I
can
?create a form from the example in Vis. Studio help that stays on top
most of
?the time.  But if I minimize a form underneath mine and then restore
that
?form from the task bar it covers mine up.  What I require is a form
that
?will not be covered by anything as long as its open.  Can the Z order
for a
?form be coded to always be first?  The following is the code I have
tried.
?Developing with VB6.0

I can confirm what Jonathan mentioned. Topmost forms have a habit of
losing their topmostness (sorry about that), so it's a good idea to
call this function when the app is activated.

Paul
~~~~

Neil P. Fallon