GetDesktopWindow-Funktion Liefert den Fensterhandle des Desktops.
Betriebssystem:  Win95, Win98, WinNT, Win2000, WinME	Views:  647

Beschreibung:
Liefert den Fensterhandle des Desktops.

Deklaration:

Declare Function GetDesktopWindow Lib "user32" () As Long

Parameter:

keine

Rückgabewert:
Zurückgegeben wird ein Long-Wert (Handle des Desktop-Windows). Tritt ein Fehler auf, wird 0 zurückgegeben.

Beispiel:

Oftmals benötigt man für andere API-Aufrufe ein Fensterhandle, welches als Parameter übergeben wird. Dies ist ja auch nicht schwer, solange eine Form geladen ist. Ist aber noch keine Form geladen (z.B. gleich zu Beginn der Sub Main), so ermittelt man einfach das Handle des Desktops und übergebt der API-Funktion eben das Desktop-Handle.

Private Declare Function GetDesktopWindow Lib "user32" () As Long 
 
Dim DeskWin As Long
Dim lRet AS Long
 
DeskWin = GetDesktopWindow()
lRet = ShellExecute(DeskWin, "open", sFilename, _
    vbNullString, vbNullString, vbNormalFocus)