[..] Récupérer un choix dans Combo

[krank]

Bonjour je cherche à récupérer des choix dans des Combo et concaténer
les résultats dans une zone texte ... je cherche la fonction qui le permet

Code : Tout sélectionner

[spoiler=]
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Icon=9070.ico
#AutoIt3Wrapper_Res_Description=GE SENSING - UNIK 5000
#AutoIt3Wrapper_Res_Fileversion=1
#AutoIt3Wrapper_Res_Fileversion_AutoIncrement=y
#AutoIt3Wrapper_Res_LegalCopyright=ARM - MARC
#AutoIt3Wrapper_Res_Language=1036
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <ComboConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("UNIK 5000 configurateur", 715, 538, 192, 124)
GUISetBkColor(0x1e1e1e)

$LOGO = GUICtrlCreateLabel ("GX SXXXX",63,395,210,30)
GUICtrlSetFont(-1,24,400,2)
GUICtrlSetColor($LOGO,0xff0000)

$societe = GUICtrlCreateLabel("NOM" & @lf & "mail@temp.fr",15,340)
GUICtrlSetFont(-1,8.5,400,2)
GUICtrlSetColor($societe,0xff0000)

$Combo1 = GUICtrlCreateCombo("Variantes principales du produit", 36, 22, 297, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
GUISetState(@SW_SHOW)
$Reponse1 = GUICtrlSetData(-1, "PMP - Transducteur de pression à sortie amplifiée |PDCR - Transducteur de pression à sortie mV |PTX - Transmetteur de pression à sortie 4-20 mA", "")

$Combo2 = GUICtrlCreateCombo("Séries du produit", 36, 52, 297, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
GUISetState(@SW_SHOW)
GUICtrlSetData(-1, "5 - UNIK 5000 |   |   ", "")

$Combo3 = GUICtrlCreateCombo("Diamètre et matériau", 36, 82, 297, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
GUISetState(@SW_SHOW)
GUICtrlSetData(-1, "0 - Acier inoxydable 25 mm 316L |   |   ", "")

$Combo4 = GUICtrlCreateCombo("Connecteur électrique", 36, 112, 397, 55, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
GUISetState(@SW_SHOW)
GUICtrlSetData(-1, "0 - Sans connecteur électrique|1 - Presse-étoupe (câble Polyuréthane)|2 - Câble Raychem|3 - Câble Polyuréthane (Immergeable)|4 - Câble Hytrel (Immergeable)|6 - MIL-C-26482 (6 broches Corps taille 10) (Connecteurnon fourni)|7 - DIN 43650 Démontable (Connecteur de raccordement fourni)|C - Conduit 1/2” NPT (câble Polyuréthane)", "")

$Combo5 = GUICtrlCreateCombo("Option électronique", 36, 142, 297, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
GUISetState(@SW_SHOW)
GUICtrlSetData(-1, "0 - mV Passif 4 fils (PDCR) Remarque : 1|1 - mV Linéarisé 4 fils (PDCR)|2 - 4 à 20 mA 2 fils (PTX)|3 - 0 à 5 V 4 fils (PMP)|4 - 0 à 5 V 3 fils (PMP)|5 - 1 à 6 V 3 fils (PMP)|6 - 0 à 10 V 4 fils (PMP)|7 - 0,5 à 4,5 V ratiométrique 3 fils (PMP)|8 - Isolé/Configurable V 4 fils (PMP)", "")

$Combo6 = GUICtrlCreateCombo("Plage de compensation en température", 36, 172, 297, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
GUISetState(@SW_SHOW)
GUICtrlSetData(-1, "TA -10 à +50 °C (14 à 122 °F)|TB -20 à +80 °C (-4 à +176 °F|TC -40 à +80 °C (-40 à  +176 °F)|TD -40 à +125 °C (-40 à 257 °F)", "")

$Combo7 = GUICtrlCreateCombo("Précision", 36, 202, 297, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
GUISetState(@SW_SHOW)
GUICtrlSetData(-1, "A1 - Industriel |A2 - Amélioré|A3 - Premium", "")

$Combo8 = GUICtrlCreateCombo("Etalonnage", 36, 232, 297, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
GUISetState(@SW_SHOW)
GUICtrlSetData(-1, "CA - Zéro et pleine échelle |CB - Linéarité à température ambiante|CC - Complet en températures ", "")

$Combo9 = GUICtrlCreateCombo("Agrément zone dangereuse", 36, 262, 297, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
GUISetState(@SW_SHOW)
GUICtrlSetData(-1, "H0 - Néant |   |   ", "")

$Combo10 = GUICtrlCreateCombo("Connecteur de pression", 36, 292, 297, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
GUISetState(@SW_SHOW)
GUICtrlSetData(-1, "PA - G1/4 Femelle Remarque 3|PB - G1/4 mâle plat|PC - G1/4 Mâle 60 degrés cône int.|PD - G1/8 Mâle 60 degrés cône int.|PE - 1/4 NPT Femelle Remarque 3|PF - 1/4 NPT Mâle|PG - 1/8 NPT Mâle|PH - M20x1,5|PJ - M14x1,5 60° Cône|PK - M12x1 Cône interne|PL - 7/16 UNF Mâle|PN - G1/2 Mâle via adaptateur Remarque 3|PR - 1/2 NPT Mâle via adaptateur Remarque 3|PW - Cône immergeagle (G1/4 femelle)", "")

$Button1 = GUICtrlCreateButton("COPIE", 448, 224, 75, 25)
$Button2 = GUICtrlCreateButton("PRIX", 448, 272, 75, 25)
$Input1 = GUICtrlCreateInput("ECHELLE", 416, 26, 129, 21)
$Input2 = GUICtrlCreateInput("UNITE", 416, 46, 129, 21)
$Input3 = GUICtrlCreateInput("XXXXX", 416, 66, 129, 21)


$Edit1 = GUICtrlCreateEdit("", 338, 340, 269, 137)
GUICtrlSetData(-1, $Reponse1)
GUISetState(@SW_SHOW)

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit

    EndSwitch
WEnd
 

[/spoiler]

[krank]

je viens de trouver la fonction mais maintenant j'ai pas l'actualisation ... je cherche

Code : Tout sélectionner

$Combo1 = GUICtrlCreateCombo("Variantes principales du produit", 36, 22, 297, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
GUISetState(@SW_SHOW)
GUICtrlSetData(-1, "PMP - Transducteur de pression à sortie amplifiée |PDCR - Transducteur de pression à sortie mV |PTX - Transmetteur de pression à sortie 4-20 mA", "")
$Reponse1 = GUICtrlRead ($Combo1)

[mikell]

Tu veux quoi au juste ? que le bouton "copie" envoie tout ça dans l'edit ?

[krank]

oui ça aussi je le cherche !

Je cherche a mettre dans une zone texte chaque élément sélectionnés
pour l'instant je parviens juste à mettre une seule des lignes ...

[mikell]

Et elle est où cette zone de texte où tu veux mettre chaque élément ?
Pour concaténer les données des combo et les envoyer dans l'edit, c'est ça (bouton 'copie')

► Afficher le texte

Code : Tout sélectionner

#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Icon=9070.ico
#AutoIt3Wrapper_Res_Description=GE SENSING - UNIK 5000
#AutoIt3Wrapper_Res_Fileversion=1
#AutoIt3Wrapper_Res_Fileversion_AutoIncrement=y
#AutoIt3Wrapper_Res_LegalCopyright=ARM - MARC
#AutoIt3Wrapper_Res_Language=1036
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <ComboConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("UNIK 5000 configurateur", 715, 538, 192, 124)
GUISetBkColor(0x1e1e1e)

$LOGO = GUICtrlCreateLabel ("GX SXXXX",63,395,210,30)
GUICtrlSetFont(-1,24,400,2)
GUICtrlSetColor($LOGO,0xff0000)

$societe = GUICtrlCreateLabel("NOM" & @lf & "mail@temp.fr",15,340)
GUICtrlSetFont(-1,8.5,400,2)
GUICtrlSetColor($societe,0xff0000)

$Combo1 = GUICtrlCreateCombo("Variantes principales du produit", 36, 22, 297, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
GUISetState(@SW_SHOW)
$Reponse1 = GUICtrlSetData(-1, "PMP - Transducteur de pression à sortie amplifiée |PDCR - Transducteur de pression à sortie mV |PTX - Transmetteur de pression à sortie 4-20 mA", "")

$Combo2 = GUICtrlCreateCombo("Séries du produit", 36, 52, 297, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
GUISetState(@SW_SHOW)
GUICtrlSetData(-1, "5 - UNIK 5000 |   |   ", "")

$Combo3 = GUICtrlCreateCombo("Diamètre et matériau", 36, 82, 297, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
GUISetState(@SW_SHOW)
GUICtrlSetData(-1, "0 - Acier inoxydable 25 mm 316L |   |   ", "")

$Combo4 = GUICtrlCreateCombo("Connecteur électrique", 36, 112, 397, 55, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
GUISetState(@SW_SHOW)
GUICtrlSetData(-1, "0 - Sans connecteur électrique|1 - Presse-étoupe (câble Polyuréthane)|2 - Câble Raychem|3 - Câble Polyuréthane (Immergeable)|4 - Câble Hytrel (Immergeable)|6 - MIL-C-26482 (6 broches Corps taille 10) (Connecteurnon fourni)|7 - DIN 43650 Démontable (Connecteur de raccordement fourni)|C - Conduit 1/2” NPT (câble Polyuréthane)", "")

$Combo5 = GUICtrlCreateCombo("Option électronique", 36, 142, 297, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
GUISetState(@SW_SHOW)
GUICtrlSetData(-1, "0 - mV Passif 4 fils (PDCR) Remarque : 1|1 - mV Linéarisé 4 fils (PDCR)|2 - 4 à 20 mA 2 fils (PTX)|3 - 0 à 5 V 4 fils (PMP)|4 - 0 à 5 V 3 fils (PMP)|5 - 1 à 6 V 3 fils (PMP)|6 - 0 à 10 V 4 fils (PMP)|7 - 0,5 à 4,5 V ratiométrique 3 fils (PMP)|8 - Isolé/Configurable V 4 fils (PMP)", "")

$Combo6 = GUICtrlCreateCombo("Plage de compensation en température", 36, 172, 297, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
GUISetState(@SW_SHOW)
GUICtrlSetData(-1, "TA -10 à +50 °C (14 à 122 °F)|TB -20 à +80 °C (-4 à +176 °F|TC -40 à +80 °C (-40 à  +176 °F)|TD -40 à +125 °C (-40 à 257 °F)", "")

$Combo7 = GUICtrlCreateCombo("Précision", 36, 202, 297, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
GUISetState(@SW_SHOW)
GUICtrlSetData(-1, "A1 - Industriel |A2 - Amélioré|A3 - Premium", "")

$Combo8 = GUICtrlCreateCombo("Etalonnage", 36, 232, 297, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
GUISetState(@SW_SHOW)
GUICtrlSetData(-1, "CA - Zéro et pleine échelle |CB - Linéarité à température ambiante|CC - Complet en températures ", "")

$Combo9 = GUICtrlCreateCombo("Agrément zone dangereuse", 36, 262, 297, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
GUISetState(@SW_SHOW)
GUICtrlSetData(-1, "H0 - Néant |   |   ", "")

$Combo10 = GUICtrlCreateCombo("Connecteur de pression", 36, 292, 297, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
GUISetState(@SW_SHOW)
GUICtrlSetData(-1, "PA - G1/4 Femelle Remarque 3|PB - G1/4 mâle plat|PC - G1/4 Mâle 60 degrés cône int.|PD - G1/8 Mâle 60 degrés cône int.|PE - 1/4 NPT Femelle Remarque 3|PF - 1/4 NPT Mâle|PG - 1/8 NPT Mâle|PH - M20x1,5|PJ - M14x1,5 60° Cône|PK - M12x1 Cône interne|PL - 7/16 UNF Mâle|PN - G1/2 Mâle via adaptateur Remarque 3|PR - 1/2 NPT Mâle via adaptateur Remarque 3|PW - Cône immergeagle (G1/4 femelle)", "")

$Button1 = GUICtrlCreateButton("COPIE", 448, 224, 75, 25)
$Button2 = GUICtrlCreateButton("PRIX", 448, 272, 75, 25)
$Input1 = GUICtrlCreateInput("ECHELLE", 416, 26, 129, 21)
$Input2 = GUICtrlCreateInput("UNITE", 416, 46, 129, 21)
$Input3 = GUICtrlCreateInput("XXXXX", 416, 66, 129, 21)


$Edit1 = GUICtrlCreateEdit("", 338, 340, 269, 137)
GUICtrlSetData(-1, $Reponse1)
GUISetState(@SW_SHOW)

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Button1
        $txt = "" 
        For $i = 1 to 10
            $txt &= GuiCtrlRead(Eval("Combo" & $i)) & @CRLF
        Next
        GuiCtrlSetData($Edit1, $txt)
        $txt = "" 
    EndSwitch
WEnd

[parazitenew]

J'ai fait ça pour l'occasion:

► Afficher le texte

Code : Tout sélectionner

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <GuiEdit.au3>




GUICreate("",200,200)
GUISetState(@SW_SHOW)

$combo = GUICtrlCreateCombo("",10,10,100,0)

$edit = GUICtrlCreateEdit("",10,100,100,50)

$bouton = GUICtrlCreateButton("ok",150,50)

While 1
    $msg = GUIGetMsg()
    Select
        Case $msg = $GUI_EVENT_CLOSE
            Exit
        Case $msg = $bouton
            _GUICtrlEdit_InsertText($edit, GUICtrlRead($combo) & @LF)
            
    
    EndSelect
WEnd

       

Il lit l'information affichée sur la Combo et l'écrit dans un Edit, en appuyant sur le bouton "ok", à toi de l'adapter à tes besoins car je n'ai pas pu lire tout ton script ^_^

J'espère que ça va t'aider.

[krank]

Merci à vous je vais pouvoir avancer ça fonctionne bien