Page 1 sur 1
Rendre le cadre de la fenetre invisible ?
Publié : mer. 22/mars/2006 17:55
par wolfjeremy
Salut,
Je voulais savoir si il était possible de rentre le cadre d'une fenetre invisible en laissant les image et gadget visible ? (quand je dit cadre, c'est la bare de titre au dessus et les bord de la fenetre)
Merci d'avance pour votre réponse.
Publié : mer. 22/mars/2006 20:10
par nico
Oui c'est possible, voici les étapes:
-après avoir pirater PureBasic, tu télécharge le fichier d'aide fournit avec la version de démo
-ensuite, tu lance le fichier d'aide et tu vas sur la rubrique OpenWindow
et tu fais une capture
-lance maintenant Paint qui est livré en standard avec toutes les versions de windows, et colle ton image.
-zoom au maximum et recules de dix mètres ta chaise, alors devrait apparaitre la constante recherchée.
Publié : mer. 22/mars/2006 20:25
par wolfjeremy
Attend tu insinue que je n'ai pas acheter purebasic ? mais je t'emmerde mon grand arrete de juger les gens comme si, si c'est a sa que tu pensai ! (si non je te prie de m'excuser) et voici une screen a te mettre où tu veu pour te prouver que j'ai bien pb :
(La partie grise est en faite mon nom de famille que je ne souhaite pas divulquer sur internet...)
Donc si tu me prend vraiment pour un gars mal honete et bien je te dit *merde* (excusez de l'expression), si ce n'était pas le cas et bien je m'en excuse...
Et au lieu de repondre dans le tas réfléchi car hidewindow masque toute la fenetre...

Publié : mer. 22/mars/2006 20:42
par nico
Dans l'aide de PB, tu vas sur OpenWindow et tu verras la constante #PB_Window_BorderLess que tu recherches.
Publié : mer. 22/mars/2006 20:46
par wolfjeremy
Ok merci
P.S.: excuse si je t'ai choqué plus haut mais j'aime pas qu'on me prenne pour un gars mal honete alors que j'ai mis tout mon argent que j'avais de coté pour m'acheter la licence ! je n'ai déjà pas beaucoup de sous...
Publié : mer. 22/mars/2006 20:50
par nico
Ne t'excuse pas, tu as bien réagit au contraire, c'est bien fait pour moi!

Publié : mer. 22/mars/2006 20:52
par wolfjeremy
Tant que sa repart bien et qu'on s'entend bien moi y a pas de prob c'est comme si c'était jamais arriver
Et merci sa marche tres bien pour #PB_Window_BorderLess
Tu na pas une idée de la maniere que je pourrai faire pour deplacer la fenetre sans les bordure ?
merci d'avance pour ton aide

Publié : mer. 22/mars/2006 21:02
par nico
Tu peux faire comme ceci:
OpenWindow(0, 100, 200, 195, 260, #PB_Window_BorderLess|#WS_THICKFRAME, "PureBasic Window")
#WS_THICKFRAME est une constante window.

Publié : mer. 22/mars/2006 21:06
par wolfjeremy
Ok, super ! merci
EDIT : mais en faite sa ne permet que de redimensioner la fenetre

moi je cherche pour la faire bouger où on veut sur l'ecran. (merci car sa me servira aussi

, tu les trouves où ces commandes ?)
Publié : mer. 22/mars/2006 21:09
par venom
oui c'est sa suis se qu'a dit nico

ou tu fait comme ca :d
Code : Tout sélectionner
;/Constantes Window
Enumeration
#Window_0
EndEnumeration
;/Constantes Gadget
Enumeration
#Minimize
#Maximize
#Close
EndEnumeration
If OpenWindow(#Window_0, 300, 300, 300, 200, #PB_Window_BorderLess, "essaie wolfjeremy",0) ; a cet endroie la tu met #PB_Window_BorderLess et tu a une fenetre sans bord
If CreateGadgetList(WindowID(#Window_0))
ButtonGadget(#Minimize, 0, 0, 20, 20, "_")
ButtonGadget(#Maximize, 20, 0, 20, 20, "||")
ButtonGadget(#Close, 40, 0, 20, 20, "X")
EndIf
EndIf
Repeat
Select WaitWindowEvent()
Case #PB_EventGadget
Select EventGadgetID()
Case #Minimize ;fonction reduire la fenetre
ShowWindow_(WindowID(#Window_0), #SW_MINIMIZE)
Case #Maximize ;fonction qui sert a agrandir ou remetre a la taille normal de la fenetre avec un buttongadget
If IsZoomed_(WindowID(#Window_0))
ShowWindow_(WindowID(#Window_0), #SW_RESTORE)
Else
ShowWindow_(WindowID(#Window_0), #SW_MAXIMIZE)
EndIf
Case #Close ; fonction fermer la fenetre
quit = #True
EndSelect
Case #PB_EventCloseWindow : quit = #True
EndSelect
Until quit
End
voila @++
Publié : mer. 22/mars/2006 21:12
par wolfjeremy
Ok merci a vous deux.
Publié : mer. 22/mars/2006 21:45
par nico
Tu peux faire cela:
Code de Chris.
Code : Tout sélectionner
;- Window Constants
;
#Window_0 = 0
#SizeWindowX = 300
#SizeWindowY = 200
Procedure Open_Window_0()
If OpenWindow(#Window_0, 366, 211, #SizeWindowX, #SizeWindowY, #PB_Window_BorderLess, "New window ( 0 )")
If CreateGadgetList(WindowID())
EndIf
EndIf
EndProcedure
;- debut du prog
Open_Window_0()
Repeat
Select WaitWindowEvent()
Case #WM_LBUTTONDOWN
SendMessage_(WindowID(), #WM_NCLBUTTONDOWN, #HTCAPTION, 0)
EndSelect
Until Event = #PB_EventCloseWindow
End
Publié : mer. 22/mars/2006 21:51
par wolfjeremy
Ha ben merci sa marche tres bien
