frmParent
'   frmParent   : Form object to always be below frmTopMost
'   bState      : Whether to set topmost (True) or normal (False)
'
' *********************************************************
Dim iRval As Integer
    If (bState) Then
        SetWindowLong frmTopMost.hwnd, SWW_HPARENT, frmParent.hwnd
    Else
        SetWindowLong frmTopMost.hwnd, SWW_HPARENT, 0
    End If
End Sub


</pre><p>&#160;</p><p>&#160;</p><p>&#160;</p><p>&#160;</p><p>&#160;</p><p>&#160;</p></td><td class="rightbar" valign="top