Redimensionnement fenêtre

Aide et conseils concernant AutoIt et ses outils.
Règles du forum
.
Répondre
Beelise
Niveau 1
Niveau 1
Messages : 2
Enregistré le : jeu. 04 oct. 2018 16:20
Status : Hors ligne

Redimensionnement fenêtre

#1

Message par Beelise »

Salut à tous!
Ca fait déjà quelques semaines que j'écume ce super forum, il m'a bien servi mais là j'avoue que je bloque :?

Je suis en train de faire un petit questionnaire pour faciliter la récupération d'infos, je l'ai développé avec des écrans 1920x1080
Le code remplit bien sa fonction, mais quand je le lance sur un autre pc la fenêtre et les objets ne sont pas du tout correctement dimensionnés... Et c'est normal puisque j'ai fixé toutes les valeurs de dimension :lol:

Ma question est: y a-il un moyen de dimensionner automatiquement ma fenêtre pour s'adapter à la taille des différents écrans de pc. Et par quel moyen je peux fixer l'emplacement de mes boutons dans cette fenêtre qui s'adapte aux écrans?

Je vous laisse le code ci-dessous, il est long mais c'est toujours la même chose :D
Merci d'avoir suivi jusqu'au bout!

Code : Tout sélectionner

#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <GuiComboBox.au3>
#include <StaticConstants.au3>
#include <Date.au3>
#include <WindowsConstants.au3>


#StartRegion #
$ABD = GUICreate("ABD", 499, 549, 192, 124)

;Création du titre
$Title = GUICtrlCreateLabel("Type de demande", 147, 8, 204, 23, $SS_CENTER)

;Création des de navigation
$Btn_Creation = GUICtrlCreateButton("Création", 107, 40, 100, 50)
GUICtrlSetFont(-1, 12, 400, 0, "Myriad Pro")

$Btn_Modification = GUICtrlCreateButton("Modification", 291, 40, 100, 50)
GUICtrlSetFont(-1, 12, 400, 0, "Myriad Pro")

;Création des champs code article
$Lbl_CodeArticle = GUICtrlCreateLabel("Code article", 24, 112, 83, 23)
$Lbl_AstCode=GUICtrlCreateLabel("*",105,110,10,10)
GUICtrlSetColor ( $Lbl_AstDesignation, 0xFF0000)

$Input_CodeArticle = GUICtrlCreateInput("", 184, 110, 297, 27)
GUICtrlSetLimit(-1, 7)

;Création des champs désignation
$Lbl_Designation = GUICtrlCreateLabel("Designation", 24, 154, 86, 23)
$Lbl_AstDesignation=GUICtrlCreateLabel("*",108,152,10,10)
GUICtrlSetColor ( $Lbl_AstDesignation, 0xFF0000)

$Input_Designation = GUICtrlCreateInput("", 184, 152, 297, 27)
GUICtrlSetLimit(-1, 105)

;Création des champs fournisseur
$Lbl_Fournisseur = GUICtrlCreateLabel("Fournisseur", 23, 197, 82, 23)

$Lbl_AstFourn=GUICtrlCreateLabel("*",103,195,10,10)
GUICtrlSetColor ( $Lbl_AstFourn, 0xFF0000)

$Cb_Fournisseur = GUICtrlCreateCombo("", 184, 193, 297, 32, BitOR($CBS_DROPDOWN, $CBS_AUTOHSCROLL))
GUICtrlSetData(-1, "FOURNISSEUR EXTERNE|PARTENAIRE")

;Création des champs poids
$Lbl_Poids = GUICtrlCreateLabel("Poids", 25, 239, 41, 23)
$Input_Poids = GUICtrlCreateInput("", 185, 235, 297, 27)

;Création des champs matiere
$Lbl_Matiere = GUICtrlCreateLabel("Matiere/ref fournisseur", 23, 282, 156, 23)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO + $GUI_DOCKRIGHT + $GUI_DOCKBOTTOM)

$Input_Matiere = GUICtrlCreateInput("", 183, 276, 297, 27)

;Création des champs commentaire
$Lbl_Commentaire = GUICtrlCreateLabel("Raison de la demande", 22, 324, 151, 23)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO + $GUI_DOCKRIGHT + $GUI_DOCKBOTTOM)

$Lbl_AstComm=GUICtrlCreateLabel("*",171,322,10,10)
GUICtrlSetColor ( $Lbl_AstComm, 0xFF0000)
$Input_Commentaire=GUICtrlCreateEdit("",182,318,297,80,$ES_MULTILINE)

;Création des champs de réédition
$Lbl_Reediter = GUICtrlCreateLabel("Rééditer cmd vente?", 22, 413, 139, 23)
GUICtrlSetResizing(-1, $GUI_DOCKAUTO + $GUI_DOCKRIGHT + $GUI_DOCKBOTTOM)

$Rd_Oui = GUICtrlCreateRadio("Oui", 184, 416, 57, 17)
$Rd_Non = GUICtrlCreateRadio("Non", 247, 416, 57, 17)
GUICtrlSetState(-1, $GUI_CHECKED)

;Création des champs constants demandeur et date
$Lbl_Demandeur = GUICtrlCreateLabel("Demandeur :", 20, 456, 72, 20)
$Lbl_DemandeurNom = GUICtrlCreateLabel(@UserName, 92, 456, 72, 20)

$Lbl_Date = GUICtrlCreateLabel("Date :", 19, 481, 36, 20)
$Lbl_Now = GUICtrlCreateLabel(_Now(), 59, 481, 180,20)

;Création des boutons d'envoi et de RAZ
$Btn_Envoyer = GUICtrlCreateButton("Envoyer", 302, 463, 100, 50, $BS_DEFPUSHBUTTON)

$Btn_Rafraichir = GUICtrlCreateButton("Rafraichir", 408, 463, 70, 50)

GUISetState(@SW_SHOW)
#EndRegion #




While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg

		Case $GUI_EVENT_CLOSE
			Exit
	EndSwitch
WEnd
Avatar du membre
mikell
Spammer !
Spammer !
Messages : 6292
Enregistré le : dim. 29 mai 2011 17:32
Localisation : Deep Cévennes
Status : Hors ligne

Re: Redimensionnement fenêtre  

#2

Message par mikell »

C'est un peu galère (faut penser à la taille des polices, etc) mais on peut
Il faut définir un ratio en début de script, et l'appliquer à TOUT ce qui a une dimension....
Example cy-dessous. Goude leuque :mrgreen:

NB : tu peux aussi ne redimensionner que la gui, et utiliser GUICtrlSetResizing pour que les controles suivent

#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <GuiComboBox.au3>
#include <StaticConstants.au3>
#include <Date.au3>
#include <WindowsConstants.au3>


; ratios
Global $w = @desktopWidth / 1920
Global $h = @desktopheight / 1080


#StartRegion #
$ABD = GUICreate("ABD", $w*499, $h*549, $w*192, $h*124)


;Création du titre
$Title = GUICtrlCreateLabel("Type de demande", $w*147, $h*8, $w*204, $h*23, $SS_CENTER)

;Création des de navigation
$Btn_Creation = GUICtrlCreateButton("Création", $w*107, $h*40, $w*100, $h*50)
GUICtrlSetFont(-1, $h*12, 400, 0, "Myriad Pro")

$Btn_Modification = GUICtrlCreateButton("Modification", $w*291, $h*40, $w*100, $h*50)
GUICtrlSetFont(-1, $h*12, 400, 0, "Myriad Pro")

;Création des champs code article
$Lbl_CodeArticle = GUICtrlCreateLabel("Code article", $w*24, $h*112, $w*83, $h*23)

$Input_CodeArticle = GUICtrlCreateInput("", $w*184, $h*110, $w*297, $h*27)
GUICtrlSetLimit(-1, 7)

GUISetState(@SW_SHOW)
#EndRegion #


While 1
   $nMsg = GUIGetMsg()
   Switch $nMsg
      Case $GUI_EVENT_CLOSE
         Exit
   EndSwitch
WEnd
" L'échec est le fondement de la réussite. " (Lao-Tseu )
" Plus ça rate, plus on a de chances que ça marche " (les Shadoks )
Beelise
Niveau 1
Niveau 1
Messages : 2
Enregistré le : jeu. 04 oct. 2018 16:20
Status : Hors ligne

Re: Redimensionnement fenêtre

#3

Message par Beelise »

@mikell aaaaaaah, merci! J'étais pas loin hier mais je n'y étais quand même pas!
Merci tu m'as bien débloqué! :mrgreen:
Répondre