Okey ça tiens sur plusieurs pages

j'enleve la page procédure car il n'y a rien dedans... :
Index :
Code : Tout sélectionner
Enumeration
; Fenetres
#Window_detected
#Window_Login
; Gadgets
#Image_Detected
#bouton_image_login
#Image_login
#Pseudo_input
#Pseudo_text
#Password_input
#Validation_login
#Button_image_inscription
#Button_image_inscription_load
#Button_image_version_load
#Button_image_version
#Button_image_error_load
#Button_image_error
#Button_image_infos_load
#Button_image_infos
#Event_quitter
EndEnumeration
IncludeFile "detected.pb"
IncludeFile "login.pb"
IncludeFile "procedures.pb"
;Open_Window_detected()
;Delay(5000)
Open_Window_Login()
Repeat
Gadget = EventGadget()
Event = WaitWindowEvent ()
Select Event
Case #PB_Event_Gadget
Select EventGadget()
Case #Validation_login
Connexion()
Case #Button_image_inscription
If EventType() = #PB_EventType_LeftClick
Inscription()
EndIf
Case #Button_image_error
If EventType() = #PB_EventType_LeftClick
quitter = 1
EndIf
Case #Button_image_infos
If EventType() = #PB_EventType_LeftClick
Infos()
EndIf
EndSelect
EndSelect
Until quitter = 1
End
login.pb :
Code : Tout sélectionner
;- Image Plugins
UsePNGImageDecoder()
;- Image Globals
Global Image_login
;- Catch Images
Imagelogin = CatchImage(#Image_login, ?Imagelogin)
Buttonimageversion = CatchImage(#Button_image_version, ?Buttonimageversion)
Buttonimageinscription = CatchImage(#Button_image_inscription, ?Buttonimageinscription)
Buttonimageerror = CatchImage(#Button_image_error, ?Buttonimageerror)
Buttonimageinfos = CatchImage(#Button_image_infos, ?Buttonimageinfos)
;- Images
DataSection
Imagelogin:
IncludeBinary "images\login.png"
Buttonimageversion:
IncludeBinary "images\version.png"
Buttonimageinscription:
IncludeBinary "images\inscriptiontranspa.png"
Buttonimageerror:
IncludeBinary "images\Error.png"
Buttonimageinfos:
IncludeBinary "images\Information.png"
EndDataSection
Procedure Open_Window_Login()
If OpenWindow(#Window_Login, 0, 0, 652, 445, "Detected", #PB_Window_BorderLess | #PB_Window_ScreenCentered )
StringGadget(#Pseudo_input, 79, 180, 110, 22, "")
StringGadget(#Password_input, 221, 180, 110, 22, "", #PB_String_Password)
ButtonGadget(#Validation_login, 165, 222, 75, 30, "Connexion")
ImageGadget(#Button_image_version, 3, 5, 138, 38, ImageID(#Button_image_version))
ImageGadget(#Button_image_error, 573, 3, 50, 50, ImageID(#Button_image_error))
ImageGadget(#Button_image_infos, 520, 3, 50, 50, ImageID(#Button_image_infos))
ImageGadget(#Button_image_inscription, 59, 265, 300, 125, ImageID(#Button_image_inscription))
ImageGadget(#Image_login, 0, 0, 652, 445, ImageID(#Image_login))
EndIf
EndProcedure
detected.pb :
Code : Tout sélectionner
;- Image Plugins
UsePNGImageDecoder()
;- Image Globals
Global Image_Detected
;- Catch Images
ImageDetected = CatchImage(#Image_Detected, ?ImageDetected)
;- Images
DataSection
Detected:
IncludeBinary "images\detected.png"
EndDataSection
Procedure Open_Window_detected()
If OpenWindow(#Window_detected, 250, 220, 500, 200, "Detected", #PB_Window_BorderLess | #PB_Window_ScreenCentered )
ImageGadget(#Image_Detected, 0, 0, 500, 200, ImageID(#Image_Detected))
EndIf
EndProcedure
Voila
edit : detected.pb à pas s'occuper enfaite puisqu'il est en commentaire
edit2 : enfaite je crois savoir d'ou ça vient :
l'image login qui prend toute la surface de la fenêtre est mis en derniere position ce qui veux dire que ça devrait effacé le reste des gadgets, mais enfaite j'ai fais comme ça car si je la place en premier, alors je ne peux pas cliqué sur le gadget par exemple un string gadget je ne peux rien écrire dedans par contre je vois la case, de plus les imagegadget ne sont pas visible de cette façon où alors il faut la faire passer en arriere plan et la faire revenir et tout est visible mais les events n'existe plus...
Je ne sais plus quoi faire
