Page 1 sur 1

[R] Réduire ou Agrandir une GUICreate en temps réelle

Posté : dim. 09 mars 2008 15:55
par Vins83
Aprés plusieurs test,par fonction ou autre,pas moyen..

Voilà un bou de code pour que vous compreniez mieux ce que je recherche.
Je veux juste pouvoir agrandir ma fenetre(pas en plein écran) et la réduire(mais pas la rendre invisible)

Code : Tout sélectionner

#include <GUIConstants.au3>
$h = 50
$w = 120

$fenetre = GUICreate("test", $w, $h, -1, -1)

$agrandir = GUICtrlCreateButton("Agrandir", 10, 10, 100, 30)

GUISetState(@SW_SHOW)

While 1
    $msg = GUIGetMsg()
    If $msg = $GUI_EVENT_CLOSE Then Exit

    Select
        Case $msg = $agrandir
            ;MsgBox(0, "test", "test", 1)
            $h = 600
            $w = 800
            $fenetre = GUICreate("test", $w, $h, -1, -1)
    EndSelect
WEnd
Si quelqu'un a une idée,j'suis preneur..Merci beaucoup

Re: [..]Réduire ou Agrandir une GUICreate en temps réelle

Posté : dim. 09 mars 2008 16:19
par Vins83
A moitié résolu,mais toujours le probleme avec agrandir,qui prend la taille de l'écran,alors que j'aimerais une taille fixe que j'aurais renseigné avant.GUISetState(@SW_MAXIMIZE, $fenetre) ne me convient donc pas.

Code : Tout sélectionner

#include <GUIConstants.au3>
$h = 50
$w = 120

$fenetre = GUICreate("test", $w, $h, -1, -1)

$agrandir = GUICtrlCreateButton("Agrandir", 10, 10, 100, 30)
$reduire = GUICtrlCreateButton("Réduire", 10, 10, 100, 30)
GUICtrlSetState($reduire, $GUI_HIDE)

GUISetState(@SW_SHOW)

While 1
    $msg = GUIGetMsg()
    If $msg = $GUI_EVENT_CLOSE Then Exit

    Select
        Case $msg = $agrandir
            GUICtrlSetState($agrandir, $GUI_HIDE)
            GUICtrlSetState($reduire, $GUI_SHOW)
            GUISetState(@SW_MAXIMIZE, $fenetre)
        Case $msg = $reduire
            GUICtrlSetState($agrandir, $GUI_SHOW)
            GUICtrlSetState($reduire, $GUI_HIDE)
            GUISetState(@SW_RESTORE, $fenetre)
    EndSelect
WEnd

Re: [..]Réduire ou Agrandir une GUICreate en temps réelle

Posté : dim. 09 mars 2008 18:16
par eln
Bonjour

Code : Tout sélectionner

WinMove

Code : Tout sélectionner

#include <GUIConstants.au3>
$h = 50
$w = 120

$fenetre = GUICreate("test", $w, $h, -1, -1)

$agrandir = GUICtrlCreateButton("Agrandir", 10, 10, 100, 30)
$reduire = GUICtrlCreateButton("Réduire", 10, 10, 100, 30)
GUICtrlSetState($reduire, $GUI_HIDE)

GUISetState(@SW_SHOW)

While 1
    $msg = GUIGetMsg()
    If $msg = $GUI_EVENT_CLOSE Then Exit

    Select
        Case $msg = $agrandir
            GUICtrlSetState($agrandir, $GUI_HIDE)
            GUICtrlSetState($reduire, $GUI_SHOW)
            WinMove($fenetre, "test", Default, Default, $w * 4, $h * 4)
        Case $msg = $reduire
            GUICtrlSetState($agrandir, $GUI_SHOW)
            GUICtrlSetState($reduire, $GUI_HIDE)
            WinMove($fenetre, "test", Default, Default, 126 , 82)
    EndSelect
WEnd

Re: [..]Réduire ou Agrandir une GUICreate en temps réelle

Posté : dim. 09 mars 2008 19:13
par Vins83
Merci eln, je ne connaissais pas cette fonction..