Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function SetParent Lib "user32" (ByVal hWndChild As Long, ByVal hWndNewParent As Long) As Long
Private Sub Form_Click()
Dim hDesk As Long
hDesk = FindWindow(vbNullString, "Program Manager")
SetParent Form1.hWnd, hDesk
End Sub
Trådstart#1
Kan man på något sätt göra tvär emot ontop.
så att om man har en form öppen.
och startar ett annat program som är markerat och när jag markerar mitt program så ska det fortfarande vara under dom andra program fönstren som är öppna.
dvs. mitt program ska alltid vara underst.