Zobrazení výzvy k restartování systému |
![]() |
Postup: Deklarujte: Private Declare Function SHRestartSystemMB Lib _ "shell32" Alias "#59" (ByVal hOwner As Long, ByVal _ sExtraPrompt As String, ByVal uFlags As Long) As Long Private Const SystemChangeRestart = 4 Public Sub SettingsChanged(FormName As Form) SHRestartSystemMB FormName.hWnd, vbNullString, SystemChangeRestart End Sub Použití: SettingsChanged
Form1 |
![]() |
Autor: The Bozena |