; Auteur : Le Soldat Inconnu
; Version de PB : 3.9
;
; Explication du programme :
; Lier une fenêtre au bureau. Ainsi, quand on réduit les applications, cette fenêtre reste visible.
; Création de la fenêtre liée au bureau
OpenWindow(0, 0, 0, 100, 100, #PB_Window_BorderLess | #PB_Window_ScreenCentered, "Liée au bureau", GetShellWindow_())
; Il suffit de mettre en parent la fenêtre qui représente le bureau
; La fonction GetShellWindow_() permet de récupérer le handle du bureau
; Création de la GadgetList
CreateGadgetList(WindowID())
ButtonGadget(0, 0, 0, 100, 100, "Quitter")
Repeat
Event = WaitWindowEvent()
If Event = #PB_Event_Gadget
Select EventGadgetID()
Case 0 ; Appui sur le bouton quitter
Event = #PB_EventCloseWindow
EndSelect
EndIf
Until Event = #PB_EventCloseWindow
comme ça, impossible de réduire la fenêtre. sauf si on clique sur le bureau et qu'on fait Windows+D
Je ne suis pas à moitié Polonais mais ma moitié est polonaise ... Vous avez suivi ?
[Intel quad core Q9400 2.66mhz, ATI 4870, 4Go Ram, XP (x86) / 7 (x64)]
Sous XP, avec jaPBe ou l'éditeur de Pure, c'est idem. Message d'erreur.
Editeur PureBasic a écrit :---------------------------
PureBasic - Linker error
---------------------------
POLINK: error: Unresolved external symbol '_GetShellWindow'.
POLINK: fatal error: 1 unresolved external(s).
---------------------------
OK
---------------------------
jaPBe a écrit :---------------------------
jaPBe - Erreur à l'édition de liens !
---------------------------
< no message >
---------------------------
OK
---------------------------
Ah, ben si c'est ça que tu veux, en voilà:
Code:
hTmp = GetShellWindow_()
hInstance = GetWindowLong_(hTmp, #GWL_HINSTANCE)
Buffer$ = Space(256)
Repeat
hTmp = GetTopWindow_(hTmp)
GetClassName_(hTmp,Buffer$,256)
Until Buffer$ = "SysListView32"
Debug hTmp
Chris
