ASP_Volume3 Miscellaneous #55995

Refresh Desktop

★★★★★

4.8 · ダウンロード数: 2,341

Refresh / Redraw / Repaint the users desktop. Used when you have changed something on the desktop and you want the user to see it :) - Comments and Rates will be appreciated.

AIサマリー: This codebase represents a historical implementation of the logic described in the metadata. Our preservation engine analyzes the structure to provide context for modern developers.

ソースコード

Public Sub RefreshDesktop()
 Dim DeskWin As Long
 DeskWin = FindWindowEx(0&, 0&, "Progman", vbNullString)
 DeskWin = FindWindowEx(DeskWin, 0&, "SHELLDLL_DefView", vbNullString)
 DeskWin = FindWindowEx(DeskWin, 0&, "SysListView32", vbNullString)
 PostMessage DeskWin, WM_KEYDOWN, &H74, &H3F0001
End Sub

オリジナルのコメント (3)

Wayback Machineから復元