[R] Problème de combo box avec le caractère |

[pierrotm777]

J'ai un petit soucis avec le caractère | qui me découpe une ligne en deux s'il existe dans une ligne du fichier ini !

le format de mon fichier ini est le suivant !

Code : Tout sélectionner

[SkinToolDS]
FrontEnd=DS
GuiFormat=1
WinPosition=1081,333
PaintEditor=mspaint.exe
CleanAutoLog=yes
[Commands]
AUDIO=
activate;Sygic FLEET[color=#FF0000]||[/color]sendkey;{F1}{ENTER}{RIGHT}{RIGHT}{RIGHT}{DOWN}{ENTER}{ENTER}=
runlog=
[Variables]
TIME=

► Afficher le texte

Code : Tout sélectionner

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
Dim $Inifile = @ScriptDir&"\skintoolds.ini"

Dim $CmdsList = IniReadSection($Inifile, "Commands")
Dim $VarList = IniReadSection($Inifile, "Variables")

$MainGUI = GUICreate("Skinner Tool ", 500, 603, -1,-1)
$CommandToSend1 = GUICtrlCreateCombo("", 10, 65, 360, 30)
$Command1 = GUICtrlCreateButton("Send Command", 380, 65, 100, 25, $WS_GROUP, BitOR($WS_EX_CLIENTEDGE,$WS_EX_STATICEDGE))
$CommandToSend2 = GUICtrlCreateCombo("", 10, 95, 360, 30)
$Command2 = GUICtrlCreateButton("Send Command", 380, 95, 100, 25, $WS_GROUP, BitOR($WS_EX_CLIENTEDGE,$WS_EX_STATICEDGE))
$CommandToSend3 = GUICtrlCreateCombo("", 10, 125, 360, 30)
$Command3 = GUICtrlCreateButton("Send Command", 380, 125, 100, 25, $WS_GROUP, BitOR($WS_EX_CLIENTEDGE,$WS_EX_STATICEDGE))
$CommandToSend4 = GUICtrlCreateCombo("", 10, 155, 360, 30)
$Command4 = GUICtrlCreateButton("Send Command", 380, 155, 100, 25, $WS_GROUP, BitOR($WS_EX_CLIENTEDGE,$WS_EX_STATICEDGE))
GUISetState()
For $i = 1 To $CmdsList[0][0];creation liste pour $CommandToSend par lecture du fichier ini
    GUICtrlSetData($CommandToSend1, $CmdsList[$i][0])
    GUICtrlSetData($CommandToSend2, $CmdsList[$i][0])
    GUICtrlSetData($CommandToSend3, $CmdsList[$i][0])
    GUICtrlSetData($CommandToSend4, $CmdsList[$i][0])
Next
While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
    EndSwitch
Wend

Comment pourais-je contourner cela svp !

Merci par avance

[Tlem]

En lisant l'aide de le commande GUICtrlSetData, vous y trouverez ceci :

Remarks

For Combo or List control :
If the "data" corresponds to an already existing entry it is set as the default.
If the "data" starts with GUIDataSeparatorChar or is an empty string "" the previous list is destroyed.

► Afficher le texte

Au cas ou l'élément pointé du doigt ne suffit pas :Rajoutez ceci avant votre boucle FOR :

Code : Tout sélectionner

Opt("GUIDataSeparatorChar","")

[pierrotm777]

Merci Tlem, c'est impeccable!
A noter que j'avais le même problème avec une liste , qui a été résolu avec cet ajout !

J'ai donc ajouté l'option au dessus de la boucle for .. next, Opt("GUIDataSeparatorChar","")

► Afficher le texte

Code : Tout sélectionner

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
Dim $Inifile = @ScriptDir&"\skintoolds.ini"

Dim $CmdsList = IniReadSection($Inifile, "Commands")
Dim $VarList = IniReadSection($Inifile, "Variables")

$MainGUI = GUICreate("Skinner Tool ", 500, 603, -1,-1)
$CommandToSend1 = GUICtrlCreateCombo("", 10, 65, 360, 30)
$Command1 = GUICtrlCreateButton("Send Command", 380, 65, 100, 25, $WS_GROUP, BitOR($WS_EX_CLIENTEDGE,$WS_EX_STATICEDGE))
$CommandToSend2 = GUICtrlCreateCombo("", 10, 95, 360, 30)
$Command2 = GUICtrlCreateButton("Send Command", 380, 95, 100, 25, $WS_GROUP, BitOR($WS_EX_CLIENTEDGE,$WS_EX_STATICEDGE))
$CommandToSend3 = GUICtrlCreateCombo("", 10, 125, 360, 30)
$Command3 = GUICtrlCreateButton("Send Command", 380, 125, 100, 25, $WS_GROUP, BitOR($WS_EX_CLIENTEDGE,$WS_EX_STATICEDGE))
$CommandToSend4 = GUICtrlCreateCombo("", 10, 155, 360, 30)
$Command4 = GUICtrlCreateButton("Send Command", 380, 155, 100, 25, $WS_GROUP, BitOR($WS_EX_CLIENTEDGE,$WS_EX_STATICEDGE))
GUISetState()
[color=#FF0000]Opt("GUIDataSeparatorChar","");autorise le caractère | à être présent dans la liste[/color]
For $i = 1 To $CmdsList[0][0];creation liste pour $CommandToSend par lecture du fichier ini
    GUICtrlSetData($CommandToSend1, $CmdsList[$i][0])
    GUICtrlSetData($CommandToSend2, $CmdsList[$i][0])
    GUICtrlSetData($CommandToSend3, $CmdsList[$i][0])
    GUICtrlSetData($CommandToSend4, $CmdsList[$i][0])
Next
While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
    EndSwitch
Wend

Merci encore

[Tlem]

Ok, sauf que GUIDataSeparatorChar ne protège rien (contrairement à ce que vous avez indiqué dans le code). En fait, cette option permet de déterminer le caractère qui servira de séparateur lors de l'envoi d'une chaine dans des combos, listes, tableaux, etc ...

[pierrotm777]

ah, ok, donc si je comprend bien la doc, le fait d'écrire Opt("GUIDataSeparatorChar",""), autorise le caractère | à être présent dans une liste quelconque ! Je comprends mieux, merci

[Tlem]

Humm, je sais que je vais paraitre tatillons, mais ce n'est pas tout à fait ça.
Tout les caractères sont autorisés dans une chaine, le problème n'est pas vraiment là.

En fait, avec GUIDataSeparatorChar, vous pouvez déterminer un caractère qui servira de séparateur. Mais la prise en compte de ce séparateur n'est fait que dans certaines circonstances et dans votre cas c'est GuiCtrlSetData qui le prend en charge.

Sinon, si vous avez une chaine du genre "ABCD|EFGH|IJKL", elle apparaitra telle quelle dans une boite de message, un tooltip, un label graphique, etc ... Mais si vous utilisez GuiCtrlSetData pour attribuer cette valeur dans un combo ou tout contrôle prenant en compte le caractère de séparation, alors les données formerons trois groupes de quatre lettres.
Donc pour un combo, trois lignes de quatre lettres et pour une listview, trois colonnes de quatre lettres.

Voilà, j'espère que cette nouvelle explication vous apporte plus de compréhension sur cette fonction.

[pierrotm777]

Oui, je l'avais bien compris ainsi, mais merci pour cette précision