Windows # Per disabilitare la combinazione di tasti ALT+TAB (o il corrispondente tasto Win95)occorre dichiarare la seguente funzione e costante:
Private Declare Function SystemParametersInfo Lib "user32" _ Alias "SystemParametersInfoA" (ByVal uAction As Long, _ ByVal uParam As Long, lpvParam As Any, _ ByVal fuWinIni As Long) As Long Private Const SPI_SCREENSAVERRUNNING = 97 Per disabilitare il multitasking e' sufficiente dichiarare: Dim ret As Integer Dim pOld As Boolean ret = SystemParametersInfo(SPI_SCREENSAVERRUNNING, True, pOld, 0) Per abilitare nuovamente il multitasking dichiarare: Dim ret As Integer Dim pOld As Boolean ret = SystemParametersInfo(SPI_SCREENSAVERRUNNING, False, pOld, 0) |