Un'altra API:
Questa serve per rendere una finestra sempre visibile sullo schermo, anche se non ha lo stato attivo:
Public Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long
Se si vuole che sia sempre visibile chiamarla così:
SetWindowPos
.hwnd, -1, 0, 0, 0, 0, "modalità"
Se si vuole ritornare alla finestra normale:
SetWindowPos .hwnd, -2, 0, 0, 0, 0, "modalità"
modalità è un parametro che può essere impostato su:
- &H1 -> in questo caso la finestra sarà messa nell'angolo in alto a sinistra dello schermo
- &H2 -> rimpicciolisce la finestra fino a rendere visibile solo la barra del titolo
- &H3 -> non sposta nè ridimensiona la finestra
Si possono anche chiamare più parametri insieme, basta concatenarli. Attenzione: non bisogna concatenare i parametri come se fossero stringhe, ma concatenare i loro bit. Quindi non bisogna usare gli operatori "&" o "+" che servono per concatenare stringhe. In Visual Basic si usa l'operatore logico "Or".