[R] GuiCtrlCreateLabel et GuiGetMsg

[Uranium]

Bonjour !

Premièrement , je ne sais pas si mon titre est correct ou pas , car je ne vois pas mon erreur

Je tourne en rond , et je trouve mon code correct donc je ne vois pas du tout où elle se cache
Explication : Je créer une GUI sans bord et utilise des labels pour délimiter ma GUI , hors 2 labels répondent au GuiGetMsg sur les 3 actuellement crées ... J'ne ai rajouter un quatrième et il ne réponds pas non plus.

Si quelqu'un trouve une solution sans passer par ds GuiSetOnEvent car je déteste ce moyen

► Afficher le texte

Code : Tout sélectionner

Global Const $WS_SYSMENU = 0x00080000, $WS_POPUP = 0x80000000 , $GUI_WS_EX_PARENTDRAG = 0x00100000 , $SS_CENTER = 0x1
Global $gestion[4][3]

$MainForm = GUICreate("Logiciel de restauration",@DesktopWidth,@DesktopHeight,0,0 ,$WS_SYSMENU + $WS_POPUP)
GUICtrlCreateLabel('  Logiciel de restauration',0,0,@DesktopWidth - 18 , @DesktopHeight - 1000, 0, $GUI_WS_EX_PARENTDRAG);  ParentDrag pour pouvoir quitter/bouger la fenêtre , à supprimer ?
GUICtrlSetColor(-1 , 0xD8DED3)
GUICtrlSetBkColor(-1 , 0x5A6A50)
GUICtrlSetFont(-1,10,800)
$Exit = GUICtrlCreateLabel("X" , @DesktopWidth - 18 , 0 , 18 , @DesktopHeight - 1000 , $SS_CENTER)
GUICtrlSetFont(-1, 10, 800, 0, "Arial Black")
GUICtrlSetColor($Exit , 0xD8DED3)
GUICtrlSetBkColor($Exit, 0x5A6A50)
$Minimize = GUICtrlCreateLabel("_" , @DesktopWidth - (18*2) , 0 , 18 , @DesktopHeight - 1000 , $SS_CENTER)
GUICtrlSetFont(-1, 10, 800, 0, "Arial Black")
GUICtrlSetColor($Minimize , 0xD8DED3)
GUICtrlSetBkColor($Minimize, 0x5A6A50)
GUISetState(@SW_SHOW)

While (1)
    $Msg = GUIGetMsg(1)
    Switch $Msg[1]
        Case $MainForm
            Switch $Msg[0]
                Case $Exit
                    Exit
                Case $Minimize
                    GUISetState(@SW_MINIMIZE , $MainForm)
            EndSwitch
    EndSwitch
WEnd

Cordialement,

[mikell]

Chtite erreur dans les mensurations... c'est classique une label qui en recouvre une autre

Code : Tout sélectionner

GUICtrlCreateLabel('  Logiciel de restauration',0,0,@DesktopWidth - [color=#FF0000]18*2[/color] , @DesktopHeight - 1000, 0, $GUI_WS_EX_PARENTDRAG);  

[Uranium]

Arf ...

Merci mikell , je cherchais depuis assez longtemps sauf que je ne voyais rien , c'est juste ... une erreur idiote :/

Cordialement ,