Form Position [RESOLVED]

Hi All,

I want to make my form so it is NOT on top, I want my form to be pinned to the desktop so to speak. I have been trying to find a way to do it but I cannot and it is driving me mad now.

Can anyone help?

Many Thanks,

TrUz

Quote:

---

Originally Posted by Truz

Hi All,

I want to make my form so it is NOT on top, I want my form to be pinned to the desktop so to speak. I have been trying to find a way to do it but I cannot and it is driving me mad now.

Can anyone help?

Many Thanks,

TrUz

---

Can you either more clearly state your question or attach an image of what you are looking to do.

do you want your form to be on top always or not

No I do not want my form to be on top. I want it to be always on the bottom so nothing can be under it.

Hope this is a little more clear.

Many Thanks,

sfx

Quote:

---

Originally Posted by Truz

No I do not want my form to be on top. I want it to be always on the bottom so nothing can be under it.

Hope this is a little more clear.

Many Thanks,

sfx

---

If you want it to be last form why not make it invisible? Also do you want to for to be the last form in your application or for windows?

please explain the reason why do you want to make so, it might help people to help you

I want it to be the last form for windows. So no other application can be under it. The form cannot be invisible as there is controls on it that users need to use.

I want this for to be under everything because I call other DLL's from this form and when ever I call a DLL the form comes to the top and it is very annoying.

Thanks,

sfx

mmm....the form will come into focus when you try to execute any statement in it...

Quote:

---

Originally Posted by ganeshmoorthy

mmm....the form will come into focus when you try to execute any statement in it...

---

Good point!

This will keep your form always at the bottom

VB Code:

Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" ( _
                ByVal lpClassName As String, _
                ByVal lpWindowName As String) As Long
                
Private Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" ( _
                ByVal hWnd1 As Long, _
                ByVal hWnd2 As Long, _
                ByVal lpsz1 As String, _
                ByVal lpsz2 As String) As Long
                
Private Declare Function SetParent Lib "user32" ( _
                ByVal hWndChild As Long, _
                ByVal hWndNewParent As Long) As Long
 
Private Sub Form_Load()
    Dim ProgMan&, shellDllDefView&, sysListView&
    
    ProgMan = FindWindow("progman", vbNullString)
    shellDllDefView = FindWindowEx(ProgMan&, 0&, "shelldll_defview", vbNullString)
    sysListView = FindWindowEx(shellDllDefView&, 0&, "syslistview32", vbNullString)
    
    SetParent Me.hwnd, sysListView
End Sub

Neat trick, just set the desktop as parent.

Thanks bushmobile,

I will give it a bash. :)

Thanks,

TrUz

Don't forget to mark this thread resolved.