Code : Tout sélectionner
; Auteur : Le Soldat Inconnu
; Version de PB : 3.90
; ** CODE POUR PB 4 **
; Explication du programme :
; Mettre la fenêtre toujours au premier plan
;(la fenêtre reste au dessus des autres fenêtres ouvertes)
If OpenWindow(0, 0, 0, 300, 300, "Toujours au premier plan",#PB_Window_ScreenCentered | #PB_Window_SystemMenu)
SetWindowPos_(WindowID(0), -1, 0, 0, 0, 0, #SWP_NOSIZE | #SWP_NOMOVE)
; paramètres SetWindowPos_() pour mettre la fentre au premier plan
; resultat : handle de la fenetre
;- 1 : définis la position de la fenetre, une valeur négative donne une fenetre toujours devant les autres
; 230, 230 : position de la fenetre
; 0, 0 : nouvelle taille de la fenetre mais ne sert pas car j'ai mis l'option #SWP_NOSIZE qui interdit de redimmentionner la fenetre
; l'option #SWP_NOSIZE interdit de redimmentionner la fenetre avec la fonction SetWindowPos_() donc les paramètres de taille peuvent être mis à 0, 0
Repeat
Event = WaitWindowEvent()
Until Event = #WM_CLOSE
EndIf